aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/strap/LNAGG-.lsp
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2009-08-16 14:17:40 +0000
committerdos-reis <gdr@axiomatics.org>2009-08-16 14:17:40 +0000
commitab480e7c03c9f3ab95856eaff6e6493882ff0c36 (patch)
treebba846f3e063f72834df5121dfff6d68ad7f4f91 /src/algebra/strap/LNAGG-.lsp
parentd2afe2366c2c592327cd0eb6593a3536a6eff54d (diff)
downloadopen-axiom-ab480e7c03c9f3ab95856eaff6e6493882ff0c36.tar.gz
* interp/i-map.boot (addMap): Fix typo from last commit.
* interp/compiler.boot (compElt): Fix thinko, one more time. * interp/nruncomp.boot (optDeltaEntry): Don't overquote VM forms for constants. * algebra/algext.spad.pamphlet: Call niladic functions with empty argument lists. * algebra/ddfact.spad.pamphlet: Likewise. * algebra/gpgcd.spad.pamphlet: Likewise. * algebra/modmon.spad.pamphlet: Likewise. * algebra/pf.spad.pamphlet: Likewise. * algebra/polycat.spad.pamphlet: Likewise. * algebra/twofact.spad.pamphlet: Likewise. * algebra/list.spad.pamphlet: "nil" is now a ocnstant. * algebra/string.spad.pamphlet: "space", "quote", "escape" are now constants.
Diffstat (limited to 'src/algebra/strap/LNAGG-.lsp')
-rw-r--r--src/algebra/strap/LNAGG-.lsp2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/algebra/strap/LNAGG-.lsp b/src/algebra/strap/LNAGG-.lsp
index 2d48d5c5..d91e5ede 100644
--- a/src/algebra/strap/LNAGG-.lsp
+++ b/src/algebra/strap/LNAGG-.lsp
@@ -38,7 +38,7 @@
(COND
((>= |i| (SPADCALL |a| (|getShellEntry| $ 9)))
(NOT (> |i| (SPADCALL |a| (|getShellEntry| $ 10)))))
- ('T 'NIL)))
+ ('T NIL)))
(DEFUN |LNAGG-;concat;ASA;3| (|a| |x| $)
(SPADCALL |a| (SPADCALL 1 |x| (|getShellEntry| $ 22))