diff options
Diffstat (limited to 'src/algebra/strap/RCAGG.lsp')
-rw-r--r-- | src/algebra/strap/RCAGG.lsp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/algebra/strap/RCAGG.lsp b/src/algebra/strap/RCAGG.lsp index 5a8aba91..21edd2b4 100644 --- a/src/algebra/strap/RCAGG.lsp +++ b/src/algebra/strap/RCAGG.lsp @@ -41,8 +41,8 @@ '((|List| $) (|Boolean|) (|Integer|) (|List| |t#1|)) NIL)))))))) - (|setShellEntry| #0# 0 - (LIST '|RecursiveAggregate| (|devaluate| |t#1|))) + (SETF (|shellEntry| #0# 0) + (LIST '|RecursiveAggregate| (|devaluate| |t#1|))) #0#)) (DEFUN |RecursiveAggregate| (#0=#:G1373) |