diff options
Diffstat (limited to 'src/algebra/strap/ALAGG.lsp')
| -rw-r--r-- | src/algebra/strap/ALAGG.lsp | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/algebra/strap/ALAGG.lsp b/src/algebra/strap/ALAGG.lsp index 28958d18..738a2062 100644 --- a/src/algebra/strap/ALAGG.lsp +++ b/src/algebra/strap/ALAGG.lsp @@ -29,9 +29,9 @@ |t#1| $)) T)) NIL 'NIL NIL))))))))) - (|setShellEntry| #0# 0 - (LIST '|AssociationListAggregate| (|devaluate| |t#1|) - (|devaluate| |t#2|))) + (SETF (|shellEntry| #0# 0) + (LIST '|AssociationListAggregate| (|devaluate| |t#1|) + (|devaluate| |t#2|))) #0#)) (DEFUN |AssociationListAggregate| (&REST #0=#:G1377 &AUX #1=#:G1375) |