aboutsummaryrefslogtreecommitdiff
path: root/src/algebra
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2009-07-02 15:31:18 +0000
committerdos-reis <gdr@axiomatics.org>2009-07-02 15:31:18 +0000
commitf28f87186f166f68374a132ef89065adb6752bc8 (patch)
tree51c6ca8f796bb60af91b4f6b3c08b47388d1705a /src/algebra
parent286834344cf9da4a6a4527728fbe09d8c6e425cd (diff)
downloadopen-axiom-f28f87186f166f68374a132ef89065adb6752bc8.tar.gz
* interp/sys-macros.lisp (COLLECTV): Use setSimpleArrayEntry, not
SETELT.
Diffstat (limited to 'src/algebra')
-rw-r--r--src/algebra/strap/POLYCAT-.lsp3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/algebra/strap/POLYCAT-.lsp b/src/algebra/strap/POLYCAT-.lsp
index 5901853e..3b73ad54 100644
--- a/src/algebra/strap/POLYCAT-.lsp
+++ b/src/algebra/strap/POLYCAT-.lsp
@@ -1184,7 +1184,8 @@
(GO G191)))
(SEQ
(EXIT
- (SETELT #15# #16#
+ (|setSimpleArrayEntry| #15#
+ #16#
(PROGN
(LETT #21# NIL
|POLYCAT-;conditionP;MU;27|)