diff options
| author | Jay Belanger | 2004-11-25 06:28:25 +0000 |
|---|---|---|
| committer | Jay Belanger | 2004-11-25 06:28:25 +0000 |
| commit | 95d91710e989602f6df1c63bef4e3e99700ec558 (patch) | |
| tree | b4a660174984cf1ba165a6aacc157d25d17e7815 | |
| parent | b67b1f0b32264452f02d952702eb282abb96e482 (diff) | |
| download | emacs-95d91710e989602f6df1c63bef4e3e99700ec558.tar.gz emacs-95d91710e989602f6df1c63bef4e3e99700ec558.zip | |
Finish making previous change.
| -rw-r--r-- | lisp/calc/calc-arith.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/calc/calc-arith.el b/lisp/calc/calc-arith.el index a1b2582b840..84328233860 100644 --- a/lisp/calc/calc-arith.el +++ b/lisp/calc/calc-arith.el | |||
| @@ -2279,7 +2279,7 @@ | |||
| 2279 | (math-add (math-floor (nth 3 a)) -1) | 2279 | (math-add (math-floor (nth 3 a)) -1) |
| 2280 | (math-floor (nth 3 a))))) | 2280 | (math-floor (nth 3 a))))) |
| 2281 | ((Math-vectorp a) | 2281 | ((Math-vectorp a) |
| 2282 | (math-map-vec (function (lambda (x) (math-floor x prec))) a)) | 2282 | (math-map-vec (function (lambda (x) (math-floor x math-floor-prec))) a)) |
| 2283 | ((math-infinitep a) | 2283 | ((math-infinitep a) |
| 2284 | (if (or (math-posp a) (math-negp a)) | 2284 | (if (or (math-posp a) (math-negp a)) |
| 2285 | a | 2285 | a |