From: Jay Belanger Date: Tue, 27 Nov 2007 04:53:27 +0000 (+0000) Subject: (math-provably-realp): Fix typo. X-Git-Tag: emacs-pretest-23.0.90~9419 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ae51ae1108370a4dcce5368cc5399ce57694db8c;p=emacs.git (math-provably-realp): Fix typo. --- diff --git a/lisp/calc/calc-ext.el b/lisp/calc/calc-ext.el index 31203f98244..44465a24790 100644 --- a/lisp/calc/calc-ext.el +++ b/lisp/calc/calc-ext.el @@ -71,7 +71,6 @@ (declare-function math-format-bignum-radix "calc-bin" (a)) (declare-function math-compute-max-digits "calc-bin" (w r)) - (defvar math-simplifying nil) (defvar math-living-dangerously nil) ; true if unsafe simplifications are okay. (defvar math-integrating nil) @@ -2132,7 +2131,7 @@ calc-kill calc-kill-region calc-yank)))) ;;; True if A is a real or will evaluate to a real. [P x] [Public] (defun math-provably-realp (a) (or (Math-realp a) - (math-provably-integer a) + (math-provably-integerp a) (memq (car-safe a) '(abs arg)))) ;;; True if A is a non-real, complex number. [P x] [Public]