summaryrefslogtreecommitdiff
path: root/lisp/calc/calc-lang.el
diff options
context:
space:
mode:
authorJay Belanger <jay.p.belanger@gmail.com>2004-11-27 04:10:15 +0000
committerJay Belanger <jay.p.belanger@gmail.com>2004-11-27 04:10:15 +0000
commit0aba68f8ca01ca275d8d3b1ec12c0ade018d7851 (patch)
tree50e49a8a5dc05abc70f307db07d017a4a30ee5b9 /lisp/calc/calc-lang.el
parent90b44097293c3fcf786275193f9116cf76212236 (diff)
downloademacs-0aba68f8ca01ca275d8d3b1ec12c0ade018d7851.tar.gz
(math-expr-data, math-expr-token, math-exp-old-pos): Declare them.
Diffstat (limited to 'lisp/calc/calc-lang.el')
-rw-r--r--lisp/calc/calc-lang.el7
1 files changed, 7 insertions, 0 deletions
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")))