aboutsummaryrefslogtreecommitdiff
path: root/src/algebra/strap/CLAGG.lsp
diff options
context:
space:
mode:
Diffstat (limited to 'src/algebra/strap/CLAGG.lsp')
-rw-r--r--src/algebra/strap/CLAGG.lsp3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/algebra/strap/CLAGG.lsp b/src/algebra/strap/CLAGG.lsp
index 85246919..3bc59621 100644
--- a/src/algebra/strap/CLAGG.lsp
+++ b/src/algebra/strap/CLAGG.lsp
@@ -66,7 +66,8 @@
(|has| |t#1|
(|ConvertibleTo| (|InputForm|)))))
'((|List| |t#1|)) NIL))))))))
- (|setShellEntry| #0# 0 (LIST '|Collection| (|devaluate| |t#1|)))
+ (SETF (|shellEntry| #0# 0)
+ (LIST '|Collection| (|devaluate| |t#1|)))
#0#))
(DEFUN |Collection| (#0=#:G1373)