diff options
Diffstat (limited to 'src/algebra/strap/LIST.lsp')
| -rw-r--r-- | src/algebra/strap/LIST.lsp | 11 |
1 files changed, 5 insertions, 6 deletions
diff --git a/src/algebra/strap/LIST.lsp b/src/algebra/strap/LIST.lsp index 26eaf30c..4e255fbb 100644 --- a/src/algebra/strap/LIST.lsp +++ b/src/algebra/strap/LIST.lsp @@ -170,12 +170,11 @@ |LIST;convert;$If;13|) NIL)) (GO G191))) - (SEQ (EXIT (LETT #0# - (CONS - (SPADCALL |a| - (|getShellEntry| $ 48)) - #0#) - |LIST;convert;$If;13|))) + (LETT #0# + (CONS (SPADCALL |a| + (|getShellEntry| $ 48)) + #0#) + |LIST;convert;$If;13|) (LETT #1# (CDR #1#) |LIST;convert;$If;13|) (GO G190) G191 (EXIT (NREVERSE0 #0#))))) (|getShellEntry| $ 52)))))) |