From: Jay Belanger Date: Tue, 27 Nov 2007 04:02:56 +0000 (+0000) Subject: (calc-set-language, calc-edit-finish) X-Git-Tag: emacs-pretest-23.0.90~9447 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c68aaac5a682915a2cab88d0c439566086c0ecc8;p=emacs.git (calc-set-language, calc-edit-finish) (calc-edit-cancel, calc-do-quick-calc, calc-do-calc-eval) (calc-do-keypad, calcFunc-unixtime, math-parse-date) (math-lessp, calc-embedded-finish-command) (calc-embedded-select-buffer, calc-embedded-mode-line-change) (calc-push-list-in-macro, calc-replace-selections) (calc-record-list, calc-normalize-fancy, calc-do-handle-whys) (calc-top-selected, calc-sel-error, calc-pop-stack-in-macro) (calc-embedded-stack-change, calc-refresh-evaltos) (calc-do-refresh, calc-binary-op-fancy, calc-unary-op-fancy) (calc-delete-selection, calc-alg-digit-entry, calc-alg-entry) (calc-dots, calc-temp-minibuffer-message, math-read-radix-digit) (calc-digit-dots, math-normalize-fancy, math-normalize-nonstandard) (math-recompile-eval-rules, math-apply-rewrites, calc-record-why) (math-dimension-error, calc-incomplete-error, math-float-fancy) (math-neg-fancy, math-zerop, calc-add-fractions) (math-add-objects-fancy, math-add-symb-fancy, math-mul-zero) (calc-mul-fractions, math-mul-objects-fancy, math-mul-symb-fancy) (math-reject-arg, math-div-by-zero, math-div-zero, math-make-frac) (calc-div-fractions, math-div-objects-fancy, math-div-symb-fancy) (math-compose-expr, math-comp-width, math-composition-to-string) (math-stack-value-offset-fancy, math-format-flat-expr-fancy) (math-adjust-fraction, math-format-binary, math-format-radix) (math-group-float, math-mod, math-format-number-fancy) (math-format-bignum-fancy, math-read-number-fancy) (calc-do-grab-region, calc-do-grab-rectangle, calc-do-embedded) (calc-do-embedded-activate, math-do-defmath) (calc-load-everything): Declare as functions. --- diff --git a/lisp/calc/calc.el b/lisp/calc/calc.el index b730e4db2b1..8e0b18a4cb2 100644 --- a/lisp/calc/calc.el +++ b/lisp/calc/calc.el @@ -206,6 +206,84 @@ (require 'calc-macs) +;; Declare functions which are defined elsewhere. +(declare-function calc-set-language "calc-lang" (lang &optional option no-refresh)) +(declare-function calc-edit-finish "calc-yank" (&optional keep)) +(declare-function calc-edit-cancel "calc-yank" ()) +(declare-function calc-do-quick-calc "calc-aent" ()) +(declare-function calc-do-calc-eval "calc-aent" (str separator args)) +(declare-function calc-do-keypad "calc-keypd" (&optional full-display interactive)) +(declare-function calcFunc-unixtime "calc-forms" (date &optional zone)) +(declare-function math-parse-date "calc-forms" (math-pd-str)) +(declare-function math-lessp "calc-ext" (a b)) +(declare-function calc-embedded-finish-command "calc-embed" ()) +(declare-function calc-embedded-select-buffer "calc-embed" ()) +(declare-function calc-embedded-mode-line-change "calc-embed" ()) +(declare-function calc-push-list-in-macro "calc-prog" (vals m sels)) +(declare-function calc-replace-selections "calc-sel" (n vals m)) +(declare-function calc-record-list "calc-misc" (vals &optional prefix)) +(declare-function calc-normalize-fancy "calc-ext" (val)) +(declare-function calc-do-handle-whys "calc-misc" ()) +(declare-function calc-top-selected "calc-sel" (&optional n m)) +(declare-function calc-sel-error "calc-sel" ()) +(declare-function calc-pop-stack-in-macro "calc-prog" (n mm)) +(declare-function calc-embedded-stack-change "calc-embed" ()) +(declare-function calc-refresh-evaltos "calc-ext" (&optional which-var)) +(declare-function calc-do-refresh "calc-misc" ()) +(declare-function calc-binary-op-fancy "calc-ext" (name func arg ident unary)) +(declare-function calc-unary-op-fancy "calc-ext" (name func arg)) +(declare-function calc-delete-selection "calc-sel" (n)) +(declare-function calc-alg-digit-entry "calc-aent" ()) +(declare-function calc-alg-entry "calc-aent" (&optional initial prompt)) +(declare-function calc-dots "calc-incom" ()) +(declare-function calc-temp-minibuffer-message "calc-misc" (m)) +(declare-function math-read-radix-digit "calc-misc" (dig)) +(declare-function calc-digit-dots "calc-incom" ()) +(declare-function math-normalize-fancy "calc-ext" (a)) +(declare-function math-normalize-nonstandard "calc-alg" ()) +(declare-function math-recompile-eval-rules "calc-alg" ()) +(declare-function math-apply-rewrites "calc-rewr" (expr rules &optional heads math-apply-rw-ruleset)) +(declare-function calc-record-why "calc-misc" (&rest stuff)) +(declare-function math-dimension-error "calc-vec" ()) +(declare-function calc-incomplete-error "calc-incom" (a)) +(declare-function math-float-fancy "calc-arith" (a)) +(declare-function math-neg-fancy "calc-arith" (a)) +(declare-function math-zerop "calc-misc" (a)) +(declare-function calc-add-fractions "calc-frac" (a b)) +(declare-function math-add-objects-fancy "calc-arith" (a b)) +(declare-function math-add-symb-fancy "calc-arith" (a b)) +(declare-function math-mul-zero "calc-arith" (a b)) +(declare-function calc-mul-fractions "calc-frac" (a b)) +(declare-function math-mul-objects-fancy "calc-arith" (a b)) +(declare-function math-mul-symb-fancy "calc-arith" (a b)) +(declare-function math-reject-arg "calc-misc" (&optional a p option)) +(declare-function math-div-by-zero "calc-arith" (a b)) +(declare-function math-div-zero "calc-arith" (a b)) +(declare-function math-make-frac "calc-frac" (num den)) +(declare-function calc-div-fractions "calc-frac" (a b)) +(declare-function math-div-objects-fancy "calc-arith" (a b)) +(declare-function math-div-symb-fancy "calc-arith" (a b)) +(declare-function math-compose-expr "calccomp" (a prec)) +(declare-function math-comp-width "calccomp" (c)) +(declare-function math-composition-to-string "calccomp" (c &optional width)) +(declare-function math-stack-value-offset-fancy "calccomp" ()) +(declare-function math-format-flat-expr-fancy "calc-ext" (a prec)) +(declare-function math-adjust-fraction "calc-ext" (a)) +(declare-function math-format-binary "calc-bin" (a)) +(declare-function math-format-radix "calc-bin" (a)) +(declare-function math-group-float "calc-ext" (str)) +(declare-function math-mod "calc-misc" (a b)) +(declare-function math-format-number-fancy "calc-ext" (a prec)) +(declare-function math-format-bignum-fancy "calc-ext" (a)) +(declare-function math-read-number-fancy "calc-ext" (s)) +(declare-function calc-do-grab-region "calc-yank" (top bot arg)) +(declare-function calc-do-grab-rectangle "calc-yank" (top bot arg &optional reduce)) +(declare-function calc-do-embedded "calc-embed" (calc-embed-arg end obeg oend)) +(declare-function calc-do-embedded-activate "calc-embed" (calc-embed-arg cbuf)) +(declare-function math-do-defmath "calc-prog" (func args body)) +(declare-function calc-load-everything "calc-ext" ()) + + (defgroup calc nil "GNU Calc." :prefix "calc-"