diff src/data.c @ 55455:c1c4318a2189

(Fquo): Simplify.
author Juanma Barranquero <lekktu@gmail.com>
date Sun, 09 May 2004 00:49:06 +0000
parents 1ca30263e9d4
children c2be5da8c8cb
line wrap: on
line diff
--- a/src/data.c	Sun May 09 00:45:49 2004 +0000
+++ b/src/data.c	Sun May 09 00:49:06 2004 +0000
@@ -2699,9 +2699,7 @@
      Lisp_Object *args;
 {
   int argnum;
-  if (nargs == 2)
-    return arith_driver (Adiv, nargs, args);
-  for (argnum = 0; argnum < nargs; argnum++)
+  for (argnum = 2; argnum < nargs; argnum++)
     if (FLOATP (args[argnum]))
       return float_arith_driver (0, 0, Adiv, nargs, args);
   return arith_driver (Adiv, nargs, args);