diff options
Diffstat (limited to 'src/algebra/strap/CLAGG-.lsp')
| -rw-r--r-- | src/algebra/strap/CLAGG-.lsp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/algebra/strap/CLAGG-.lsp b/src/algebra/strap/CLAGG-.lsp index 9acb3b8b..759df315 100644 --- a/src/algebra/strap/CLAGG-.lsp +++ b/src/algebra/strap/CLAGG-.lsp @@ -42,7 +42,7 @@ |CLAGG-;removeDuplicates;2A;12|)) (DEFUN |CLAGG-;#;ANni;1| (|c| $) - (LENGTH (SPADCALL |c| (|getShellEntry| $ 9)))) + (LIST-LENGTH (SPADCALL |c| (|getShellEntry| $ 9)))) (DEFUN |CLAGG-;count;MANni;2| (|f| |c| $) (LET ((#0=#:G1377 NIL) (#1=#:G1378 T) |