# HG changeset patch # User Jay Belanger # Date 1196136356 0 # Node ID 577a47c95cf8a1d272779148f7901d1d726e44f2 # Parent d76be4a4a0a5de910405a128793a046fa8f1e54c (math-zerop, math-negp, math-looks-negp) (math-posp, math-compare, math-bignum, math-compare-bignum): Declare as functions. diff -r d76be4a4a0a5 -r 577a47c95cf8 lisp/calc/calc-macs.el --- a/lisp/calc/calc-macs.el Tue Nov 27 04:05:19 2007 +0000 +++ b/lisp/calc/calc-macs.el Tue Nov 27 04:05:56 2007 +0000 @@ -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))))