Mercurial > emacs

comparison src/bytecode.c @ 12574:bbd93011edef

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(Fbyte_code): Fix variable names in previous change.
author Karl Heuer <kwzh@gnu.org>
date Tue, 18 Jul 1995 00:30:09 +0000
parents ebaf016075f1
children ab0ac0e12203
comparison
equal deleted inserted replaced
12573:f8193b0f95ed 12574:bbd93011edef
757 case Beqlsign: 757 case Beqlsign:
758 v2 = POP; v1 = TOP; 758 v2 = POP; v1 = TOP;
759 CHECK_NUMBER_OR_FLOAT_COERCE_MARKER (v1, 0); 759 CHECK_NUMBER_OR_FLOAT_COERCE_MARKER (v1, 0);
760 CHECK_NUMBER_OR_FLOAT_COERCE_MARKER (v2, 0); 760 CHECK_NUMBER_OR_FLOAT_COERCE_MARKER (v2, 0);
761 #ifdef LISP_FLOAT_TYPE 761 #ifdef LISP_FLOAT_TYPE
762 if (FLOATP (num1) || FLOATP (num2)) 762 if (FLOATP (v1) || FLOATP (v2))
763 { 763 {
764 double f1, f2; 764 double f1, f2;
765 765
766 f1 = (FLOATP (v1) ? XFLOAT (v1)->data : XINT (v1)); 766 f1 = (FLOATP (v1) ? XFLOAT (v1)->data : XINT (v1));
767 f2 = (FLOATP (v2) ? XFLOAT (v2)->data : XINT (v2)); 767 f2 = (FLOATP (v2) ? XFLOAT (v2)->data : XINT (v2));