# HG changeset patch
# User Juanma Barranquero <lekktu@gmail.com>
# Date 1084063746 0
# Node ID c1c4318a218967d46772ea09e2fa15617746577f
# Parent  3b8721850659cb342d0fffaba8bd658a7bc28de6
(Fquo): Simplify.

diff -r 3b8721850659 -r c1c4318a2189 src/data.c
--- 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);