(math-zerop, math-negp, math-looks-negp)
(math-posp, math-compare, math-bignum, math-compare-bignum): Declare as functions.
This commit is contained in:
parent
41f4eebc99
commit
84309b3b01
1 changed files with 10 additions and 0 deletions
|
@ -27,6 +27,16 @@
|
|||
|
||||
;;; Code:
|
||||
|
||||
;; Declare functions which are defined elsewhere.
|
||||
(declare-function math-zerop "calc-misc" (a))
|
||||
(declare-function math-negp "calc-misc" (a))
|
||||
(declare-function math-looks-negp "calc-misc" (a))
|
||||
(declare-function math-posp "calc-misc" (a))
|
||||
(declare-function math-compare "calc-ext" (a b))
|
||||
(declare-function math-bignum "calc" (a))
|
||||
(declare-function math-compare-bignum "calc-ext" (a b))
|
||||
|
||||
|
||||
(defmacro calc-wrapper (&rest body)
|
||||
`(calc-do (function (lambda ()
|
||||
,@body))))
|
||||
|
|
Loading…
Add table
Reference in a new issue