diff options
| author | Juanma Barranquero | 2004-05-09 00:49:06 +0000 |
|---|---|---|
| committer | Juanma Barranquero | 2004-05-09 00:49:06 +0000 |
| commit | 7ef980534901045d60839f814a32c2f3d6d6a3bb (patch) | |
| tree | 35ecf96faec53303ee24a04346362ba0e9289501 /src/data.c | |
| parent | fef3a3ab7c63a3e9d399b90e75dbd28b129e16f0 (diff) | |
| download | emacs-7ef980534901045d60839f814a32c2f3d6d6a3bb.tar.gz emacs-7ef980534901045d60839f814a32c2f3d6d6a3bb.zip | |
(Fquo): Simplify.
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); |