diff options
Diffstat (limited to 'src/algebra/strap/EUCDOM.lsp')
-rw-r--r-- | src/algebra/strap/EUCDOM.lsp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/algebra/strap/EUCDOM.lsp b/src/algebra/strap/EUCDOM.lsp index 1704e681..8a9e63ef 100644 --- a/src/algebra/strap/EUCDOM.lsp +++ b/src/algebra/strap/EUCDOM.lsp @@ -36,7 +36,7 @@ '((|List| $) (|NonNegativeInteger|) (|Boolean|)) NIL)))) - (|setShellEntry| #0# 0 '(|EuclideanDomain|)) + (SETF (|shellEntry| #0# 0) '(|EuclideanDomain|)) #0#)) (DEFUN |EuclideanDomain| () |