diff options
| -rw-r--r-- | lisp/calc/calc-ext.el | 42 |
1 files changed, 42 insertions, 0 deletions
diff --git a/lisp/calc/calc-ext.el b/lisp/calc/calc-ext.el index bb054de4951..31203f98244 100644 --- a/lisp/calc/calc-ext.el +++ b/lisp/calc/calc-ext.el | |||
| @@ -30,6 +30,48 @@ | |||
| 30 | (require 'calc) | 30 | (require 'calc) |
| 31 | (require 'calc-macs) | 31 | (require 'calc-macs) |
| 32 | 32 | ||
| 33 | ;; Declare functions which are defined elsewhere. | ||
| 34 | (declare-function math-clip "calc-bin" (a &optional w)) | ||
| 35 | (declare-function math-round "calc-arith" (a &optional prec)) | ||
| 36 | (declare-function math-simplify "calc-alg" (top-expr)) | ||
| 37 | (declare-function math-simplify-extended "calc-alg" (a)) | ||
| 38 | (declare-function math-simplify-units "calc-units" (a)) | ||
| 39 | (declare-function calc-set-language "calc-lang" (lang &optional option no-refresh)) | ||
| 40 | (declare-function calc-flush-caches "calc-stuff" (&optional inhibit-msg)) | ||
| 41 | (declare-function calc-save-modes "calc-mode" ()) | ||
| 42 | (declare-function calc-embedded-modes-change "calc-embed" (vars)) | ||
| 43 | (declare-function calc-embedded-var-change "calc-embed" (var &optional buf)) | ||
| 44 | (declare-function math-mul-float "calc-arith" (a b)) | ||
| 45 | (declare-function math-arctan-raw "calc-math" (x)) | ||
| 46 | (declare-function math-sqrt-float "calc-math" (a &optional guess)) | ||
| 47 | (declare-function math-exp-minus-1-raw "calc-math" (x)) | ||
| 48 | (declare-function math-normalize-polar "calc-cplx" (a)) | ||
| 49 | (declare-function math-normalize-hms "calc-forms" (a)) | ||
| 50 | (declare-function math-normalize-mod "calc-forms" (a)) | ||
| 51 | (declare-function math-make-sdev "calc-forms" (x sigma)) | ||
| 52 | (declare-function math-make-intv "calc-forms" (mask lo hi)) | ||
| 53 | (declare-function math-normalize-logical-op "calc-prog" (a)) | ||
| 54 | (declare-function math-possible-signs "calc-arith" (a &optional origin)) | ||
| 55 | (declare-function math-infinite-dir "calc-math" (a &optional inf)) | ||
| 56 | (declare-function math-calcFunc-to-var "calc-map" (f)) | ||
| 57 | (declare-function calc-embedded-evaluate-expr "calc-embed" (x)) | ||
| 58 | (declare-function math-known-nonzerop "calc-arith" (a)) | ||
| 59 | (declare-function math-read-expr-level "calc-aent" (exp-prec &optional exp-term)) | ||
| 60 | (declare-function math-read-big-rec "calc-lang" (math-rb-h1 math-rb-v1 math-rb-h2 math-rb-v2)) | ||
| 61 | (declare-function math-read-big-balance "calc-lang" (h v what &optional commas)) | ||
| 62 | (declare-function math-format-date "calc-forms" (math-fd-date)) | ||
| 63 | (declare-function math-vector-is-string "calccomp" (a)) | ||
| 64 | (declare-function math-vector-to-string "calccomp" (a &optional quoted)) | ||
| 65 | (declare-function math-format-radix-float "calc-bin" (a prec)) | ||
| 66 | (declare-function math-compose-expr "calccomp" (a prec)) | ||
| 67 | (declare-function math-abs "calc-arith" (a)) | ||
| 68 | (declare-function math-format-bignum-binary "calc-bin" (a)) | ||
| 69 | (declare-function math-format-bignum-octal "calc-bin" (a)) | ||
| 70 | (declare-function math-format-bignum-hex "calc-bin" (a)) | ||
| 71 | (declare-function math-format-bignum-radix "calc-bin" (a)) | ||
| 72 | (declare-function math-compute-max-digits "calc-bin" (w r)) | ||
| 73 | |||
| 74 | |||
| 33 | (defvar math-simplifying nil) | 75 | (defvar math-simplifying nil) |
| 34 | (defvar math-living-dangerously nil) ; true if unsafe simplifications are okay. | 76 | (defvar math-living-dangerously nil) ; true if unsafe simplifications are okay. |
| 35 | (defvar math-integrating nil) | 77 | (defvar math-integrating nil) |