diff options
author | dos-reis <gdr@axiomatics.org> | 2011-07-02 08:04:49 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2011-07-02 08:04:49 +0000 |
commit | cd75300236a7e0bd4b2ba0818721deb92c522aa7 (patch) | |
tree | dd43b8c8330e9df4beefac62e7108409c0dde687 /src/interp/macros.lisp | |
parent | 5e63328f3bcd8b1d1cc7d59350f92cc4185df7c0 (diff) | |
download | open-axiom-cd75300236a7e0bd4b2ba0818721deb92c522aa7.tar.gz |
* interp/macros.lisp (sayALGEBRA): Remove as duplicate of sayMSG.
* interp/i-output.boot: Replace sayALGBEBRA with sayMSG.
* interp/msg.boot (ncHardError): Remove dead variable ergMsg.
(ncBug): Likewise.
Diffstat (limited to 'src/interp/macros.lisp')
-rw-r--r-- | src/interp/macros.lisp | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/src/interp/macros.lisp b/src/interp/macros.lisp index bdc4d7e7..13018ade 100644 --- a/src/interp/macros.lisp +++ b/src/interp/macros.lisp @@ -371,9 +371,6 @@ (TERPRI out) (force-output out)))) -(defun |sayALGEBRA| (X) "Prints on Algebra output stream." - (if (NULL X) NIL (sayBrightly1 X |$algebraOutputStream|))) - (defun |sayMSG| (X) (if (NULL X) NIL (sayBrightly1 X |$algebraOutputStream|))) |