summaryrefslogtreecommitdiff
path: root/lisp/calc/calc-funcs.el
diff options
context:
space:
mode:
authorMattias EngdegÄrd <mattiase@acm.org>2020-09-11 13:02:59 +0200
committerMattias EngdegÄrd <mattiase@acm.org>2020-09-11 13:02:59 +0200
commit891bbec2e09986f6ef562f2172cd349e9f55cbe8 (patch)
tree621ac4c11fc00fbbd2d13f23600e18cb9708b687 /lisp/calc/calc-funcs.el
parentb5fe4474804104f383b21b4dcb091d14adc9b610 (diff)
Simplify big integer constants in Calc
* lisp/calc/calc-comb.el (math-small-factorial-table): * lisp/calc/calc-funcs.el (math-bernoulli-b-cache): * lisp/calc/calc.el (math-2-word-size, math-half-2-word-size): No need for math-read-number-simple.
Diffstat (limited to 'lisp/calc/calc-funcs.el')
-rw-r--r--lisp/calc/calc-funcs.el14
1 files changed, 7 insertions, 7 deletions
diff --git a/lisp/calc/calc-funcs.el b/lisp/calc/calc-funcs.el
index add39b6f8b9..14f5e321080 100644
--- a/lisp/calc/calc-funcs.el
+++ b/lisp/calc/calc-funcs.el
@@ -816,25 +816,25 @@
(list
(list 'frac
-174611
- (math-read-number-simple "802857662698291200000"))
+ 802857662698291200000)
(list 'frac
43867
- (math-read-number-simple "5109094217170944000"))
+ 5109094217170944000)
(list 'frac
-3617
- (math-read-number-simple "10670622842880000"))
+ 10670622842880000)
(list 'frac
1
- (math-read-number-simple "74724249600"))
+ 74724249600)
(list 'frac
-691
- (math-read-number-simple "1307674368000"))
+ 1307674368000)
(list 'frac
1
- (math-read-number-simple "47900160"))
+ 47900160)
(list 'frac
-1
- (math-read-number-simple "1209600"))
+ 1209600)
(list 'frac
1
30240)