aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJay Belanger2007-11-27 04:05:56 +0000
committerJay Belanger2007-11-27 04:05:56 +0000
commit84309b3b0133f3bf87e81dfc7d736630f3734842 (patch)
tree33981705e3e4ed882e102057254ec694340aa5fc
parent41f4eebc9971dac96110ef128159f9557de91687 (diff)
downloademacs-84309b3b0133f3bf87e81dfc7d736630f3734842.tar.gz
emacs-84309b3b0133f3bf87e81dfc7d736630f3734842.zip
(math-zerop, math-negp, math-looks-negp)
(math-posp, math-compare, math-bignum, math-compare-bignum): Declare as functions.
-rw-r--r--lisp/calc/calc-macs.el10
1 files changed, 10 insertions, 0 deletions
diff --git a/lisp/calc/calc-macs.el b/lisp/calc/calc-macs.el
index 27001b43f36..8e939cdde7b 100644
--- a/lisp/calc/calc-macs.el
+++ b/lisp/calc/calc-macs.el
@@ -27,6 +27,16 @@
27 27
28;;; Code: 28;;; Code:
29 29
30;; Declare functions which are defined elsewhere.
31(declare-function math-zerop "calc-misc" (a))
32(declare-function math-negp "calc-misc" (a))
33(declare-function math-looks-negp "calc-misc" (a))
34(declare-function math-posp "calc-misc" (a))
35(declare-function math-compare "calc-ext" (a b))
36(declare-function math-bignum "calc" (a))
37(declare-function math-compare-bignum "calc-ext" (a b))
38
39
30(defmacro calc-wrapper (&rest body) 40(defmacro calc-wrapper (&rest body)
31 `(calc-do (function (lambda () 41 `(calc-do (function (lambda ()
32 ,@body)))) 42 ,@body))))