Mercurial > emacs

changeset 86499:8337a257fe94

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(math-provably-realp): Fix typo.
author Jay Belanger <jay.p.belanger@gmail.com>
date Tue, 27 Nov 2007 04:53:27 +0000
parents ec825106d4b8
children 83c2e8f0909e
files lisp/calc/calc-ext.el
diffstat 1 files changed, 1 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/calc/calc-ext.el	Tue Nov 27 04:25:37 2007 +0000
+++ b/lisp/calc/calc-ext.el	Tue Nov 27 04:53:27 2007 +0000
@@ -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 @@
 ;;; 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]