# HG changeset patch
# User Karl Heuer <kwzh@gnu.org>
# Date 806027409 0
# Node ID bbd93011edef896e95725811dda78d7c87d50b25
# Parent  f8193b0f95ed35f42ef22e24634b7d0db3ce7bd5
(Fbyte_code): Fix variable names in previous change.

diff -r f8193b0f95ed -r bbd93011edef src/bytecode.c
--- a/src/bytecode.c	Tue Jul 18 00:25:14 1995 +0000
+++ b/src/bytecode.c	Tue Jul 18 00:30:09 1995 +0000
@@ -759,7 +759,7 @@
 	  CHECK_NUMBER_OR_FLOAT_COERCE_MARKER (v1, 0);
 	  CHECK_NUMBER_OR_FLOAT_COERCE_MARKER (v2, 0);
 #ifdef LISP_FLOAT_TYPE
-	  if (FLOATP (num1) || FLOATP (num2))
+	  if (FLOATP (v1) || FLOATP (v2))
 	    {
 	      double f1, f2;