From: Jay Belanger <jay.p.belanger@gmail.com>
Date: Sat, 27 Nov 2004 04:10:15 +0000 (+0000)
Subject: (math-expr-data, math-expr-token, math-exp-old-pos): Declare them.
X-Git-Tag: ttn-vms-21-2-B4~3614
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=0aba68f8ca01ca275d8d3b1ec12c0ade018d7851;p=emacs.git

(math-expr-data, math-expr-token, math-exp-old-pos): Declare them.
---

diff --git a/lisp/calc/calc-lang.el b/lisp/calc/calc-lang.el
index 66a2fbe3276..9e9110ae80d 100644
--- a/lisp/calc/calc-lang.el
+++ b/lisp/calc/calc-lang.el
@@ -257,6 +257,13 @@
 (put 'fortran 'math-input-filter 'calc-input-case-filter)
 (put 'fortran 'math-output-filter 'calc-output-case-filter)
 
+;; The next few variables are local to math-read-exprs in calc-aent.el 
+;; and math-read-expr in calc-ext.el, but are set in functions they call.
+
+(defvar math-exp-token)
+(defvar math-expr-data)
+(defvar math-exp-old-pos)
+
 (defvar math-parsing-fortran-vector nil)
 (defun math-parse-fortran-vector (op)
   (let ((math-parsing-fortran-vector '(end . "\000")))