aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/strap/SYMBOL.lsp
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2010-06-21 03:16:39 +0000
committerdos-reis <gdr@axiomatics.org>2010-06-21 03:16:39 +0000
commitafaaaac2b55741bfe43099f819fd4a9592b1c022 (patch)
tree7a5bbd28009759b1c787d3df4c4ba5960cd11280 /src/algebra/strap/SYMBOL.lsp
parent640d839b4de4d0daf0dde00ba08eab6d264160ad (diff)
downloadopen-axiom-afaaaac2b55741bfe43099f819fd4a9592b1c022.tar.gz
Revert previous erroneous commit
Diffstat (limited to 'src/algebra/strap/SYMBOL.lsp')
-rw-r--r--src/algebra/strap/SYMBOL.lsp1
1 files changed, 0 insertions, 1 deletions
diff --git a/src/algebra/strap/SYMBOL.lsp b/src/algebra/strap/SYMBOL.lsp
index c315c0c6..a34479e4 100644
--- a/src/algebra/strap/SYMBOL.lsp
+++ b/src/algebra/strap/SYMBOL.lsp
@@ -653,7 +653,6 @@
(COND ((NOT #0#) (HREM |$ConstructorCache| '|Symbol|)))))))))
(DEFUN |Symbol;| ()
- (DECLARE (SPECIAL |$ConstructorCache|))
(LET ((|dv$| (LIST '|Symbol|)) ($ (|newShell| 165))
(|pv$| (|buildPredVector| 0 0 NIL)))
(DECLARE (SPECIAL |$ConstructorCache|))