Commit 90b44097 authored by Jay Belanger's avatar Jay Belanger
Browse files

(calc-command-flags, calc-gnuplot-buffer, calc-gnuplot-input)

(math-normalize-a, math-integral-cache): Declare them.
parent d37f2979
......@@ -1176,6 +1176,9 @@ calc-kill calc-kill-region calc-yank))))
;;;; Miscellaneous.
;; calc-command-flags is declared in calc.el
(defvar calc-command-flags)
(defun calc-clear-command-flag (f)
(setq calc-command-flags (delq f calc-command-flags)))
......@@ -1654,7 +1657,8 @@ calc-kill calc-kill-region calc-yank))))
(defvar calc-gnuplot-process nil)
(defvar calc-gnuplot-input)
(defvar calc-gnuplot-buffer)
(defun calc-gnuplot-alive ()
(and calc-gnuplot-process
......@@ -2217,6 +2221,11 @@ calc-kill calc-kill-region calc-yank))))
(math-normalize (car a))
(error "Can't use multi-valued function in an expression")))))
;; The variable math-normalize-a is local to math-normalize in calc.el,
;; but is used by math-normalize-nonstandard, which is called by
;; math-normalize.
(defvar math-normalize-a)
(defun math-normalize-nonstandard ()
(if (consp calc-simplify-mode)
(progn
......@@ -2656,6 +2665,10 @@ calc-kill calc-kill-region calc-yank))))
(eq (car-safe (symbol-value (nth 2 expr))) 'special-const))
(memq (nth 2 expr) '(var-inf var-uinf var-nan)))))
;; The variable math-integral-cache is originally declared in calcalg2.el,
;; but is set by math-defintegral and math-definitegral2.
(defvar math-integral-cache)
(defmacro math-defintegral (funcs &rest code)
(setq math-integral-cache nil)
(append '(progn)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment