diff options
| author | Jay Belanger | 2004-11-26 22:37:26 +0000 |
|---|---|---|
| committer | Jay Belanger | 2004-11-26 22:37:26 +0000 |
| commit | 53cbeb3de0983a7c0844e6829bd70ac5c1da6652 (patch) | |
| tree | 6acaf06d75709f1b7dd4208b0e771099181819ad | |
| parent | 8b31b5197e387a61dadd33d40341170edc296826 (diff) | |
| download | emacs-53cbeb3de0983a7c0844e6829bd70ac5c1da6652.tar.gz emacs-53cbeb3de0983a7c0844e6829bd70ac5c1da6652.zip | |
(calc-prev-char, calc-prev-prev-char, calc-digit-value): Declare them.
| -rw-r--r-- | lisp/calc/calc-incom.el | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/lisp/calc/calc-incom.el b/lisp/calc/calc-incom.el index 7dc7f08b4bd..b79daebdb40 100644 --- a/lisp/calc/calc-incom.el +++ b/lisp/calc/calc-incom.el | |||
| @@ -3,8 +3,7 @@ | |||
| 3 | ;; Copyright (C) 1990, 1991, 1992, 1993, 2001 Free Software Foundation, Inc. | 3 | ;; Copyright (C) 1990, 1991, 1992, 1993, 2001 Free Software Foundation, Inc. |
| 4 | 4 | ||
| 5 | ;; Author: David Gillespie <daveg@synaptics.com> | 5 | ;; Author: David Gillespie <daveg@synaptics.com> |
| 6 | ;; Maintainers: D. Goel <deego@gnufans.org> | 6 | ;; Maintainer: Jay Belanger <belanger@truman.edu> |
| 7 | ;; Colin Walters <walters@debian.org> | ||
| 8 | 7 | ||
| 9 | ;; This file is part of GNU Emacs. | 8 | ;; This file is part of GNU Emacs. |
| 10 | 9 | ||
| @@ -172,6 +171,12 @@ | |||
| 172 | (cons 'vec (append (cdr (cdr inc)) stuff))) | 171 | (cons 'vec (append (cdr (cdr inc)) stuff))) |
| 173 | (list 'incomplete 'vec)))))))) | 172 | (list 'incomplete 'vec)))))))) |
| 174 | 173 | ||
| 174 | ;; The following variables are initially declared in calc.el, | ||
| 175 | ;; but are used by calc-digit-dots. | ||
| 176 | (defvar calc-prev-char) | ||
| 177 | (defvar calc-prev-prev-char) | ||
| 178 | (defvar calc-digit-value) | ||
| 179 | |||
| 175 | (defun calc-digit-dots () | 180 | (defun calc-digit-dots () |
| 176 | (if (eq calc-prev-char ?.) | 181 | (if (eq calc-prev-char ?.) |
| 177 | (progn | 182 | (progn |