diff options
Diffstat (limited to 'src/data.c')
| -rw-r--r-- | src/data.c | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/src/data.c b/src/data.c index 1a66e52632a..992aac66476 100644 --- a/src/data.c +++ b/src/data.c | |||
| @@ -2699,9 +2699,7 @@ usage: (/ DIVIDEND DIVISOR &rest DIVISORS) */) | |||
| 2699 | Lisp_Object *args; | 2699 | Lisp_Object *args; |
| 2700 | { | 2700 | { |
| 2701 | int argnum; | 2701 | int argnum; |
| 2702 | if (nargs == 2) | 2702 | for (argnum = 2; argnum < nargs; argnum++) |
| 2703 | return arith_driver (Adiv, nargs, args); | ||
| 2704 | for (argnum = 0; argnum < nargs; argnum++) | ||
| 2705 | if (FLOATP (args[argnum])) | 2703 | if (FLOATP (args[argnum])) |
| 2706 | return float_arith_driver (0, 0, Adiv, nargs, args); | 2704 | return float_arith_driver (0, 0, Adiv, nargs, args); |
| 2707 | return arith_driver (Adiv, nargs, args); | 2705 | return arith_driver (Adiv, nargs, args); |