From 2f78f9049a8b74605814453a6265b33d048a8028 Mon Sep 17 00:00:00 2001 From: Jay Belanger Date: Tue, 27 Nov 2007 04:00:56 +0000 Subject: [PATCH] (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. --- lisp/calc/calc-aent.el | 19 +++++++++++++++++++ 1 file changed, 19 insertions(+) diff --git a/lisp/calc/calc-aent.el b/lisp/calc/calc-aent.el index 18b0e194777..61bba2248e6 100644 --- a/lisp/calc/calc-aent.el +++ b/lisp/calc/calc-aent.el @@ -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.") -- 2.39.2