diff options
Diffstat (limited to 'src/algebra/strap/CLAGG.lsp')
-rw-r--r-- | src/algebra/strap/CLAGG.lsp | 3 |
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) |