# HG changeset patch # User Jay Belanger # Date 1196136056 0 # Node ID 7777ff0392d6887af7a9cd694368ab692debd54f # Parent c1445e6992c4c1053fc4bf4b870b3a24937c9dcb (calc-refresh-evaltos, calc-execute-kbd-macro) (math-is-true, calc-explain-why, calc-alg-edit) (math-composite-inequalities, math-flatten-lands) (math-multi-subst, calcFunc-vmatches, math-simplify) (math-known-matrixp, math-parse-fortran-subscr, math-to-radians-2) (math-read-string, math-read-brackets, math-read-angle-brackets): Declare as functions. diff -r c1445e6992c4 -r 7777ff0392d6 lisp/calc/calc-aent.el --- a/lisp/calc/calc-aent.el Tue Nov 27 04:00:50 2007 +0000 +++ b/lisp/calc/calc-aent.el Tue Nov 27 04:00:56 2007 +0000 @@ -32,6 +32,25 @@ (require 'calc) (require 'calc-macs) +;; Declare functions which are defined elsewhere. +(declare-function calc-refresh-evaltos "calc-ext" (&optional which-var)) +(declare-function calc-execute-kbd-macro "calc-prog" (mac arg &rest prefix)) +(declare-function math-is-true "calc-ext" (expr)) +(declare-function calc-explain-why "calc-stuff" (why &optional more)) +(declare-function calc-alg-edit "calc-yank" (str)) +(declare-function math-composite-inequalities "calc-prog" (x op)) +(declare-function math-flatten-lands "calc-rewr" (expr)) +(declare-function math-multi-subst "calc-map" (expr olds news)) +(declare-function calcFunc-vmatches "calc-rewr" (expr pat)) +(declare-function math-simplify "calc-alg" (top-expr)) +(declare-function math-known-matrixp "calc-arith" (a)) +(declare-function math-parse-fortran-subscr "calc-lang" (sym args)) +(declare-function math-to-radians-2 "calc-math" (a)) +(declare-function math-read-string "calc-ext" ()) +(declare-function math-read-brackets "calc-vec" (space-sep math-rb-close)) +(declare-function math-read-angle-brackets "calc-forms" ()) + + (defvar calc-quick-calc-history nil "The history list for quick-calc.")