diff options
author | dos-reis <gdr@axiomatics.org> | 2011-02-04 00:04:31 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2011-02-04 00:04:31 +0000 |
commit | e2618c92315f6b544e41c9b7d4cad92adcf98655 (patch) | |
tree | 82393fded88c670ad34286063f30c20d9ad9e9e0 /src/algebra/strap/ILIST.lsp | |
parent | a6dfd60ca4931a8c11f0afbd4533d4c6cc960e1e (diff) | |
download | open-axiom-e2618c92315f6b544e41c9b7d4cad92adcf98655.tar.gz |
* interp/c-util.boot (mutateConditionalFormWithUnaryFunction):
Rename from mutateCONDFormWithUnaryFunction. Update callers
(mutateBindingFormWithUnaryFunction): Rename from
mutateLETFormWithUnaryFunction. Allow %bind form too.
Update callers.
Diffstat (limited to 'src/algebra/strap/ILIST.lsp')
-rw-r--r-- | src/algebra/strap/ILIST.lsp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/algebra/strap/ILIST.lsp b/src/algebra/strap/ILIST.lsp index 84a22d1f..27411076 100644 --- a/src/algebra/strap/ILIST.lsp +++ b/src/algebra/strap/ILIST.lsp @@ -195,7 +195,7 @@ (EXIT |x|))) (DEFUN |ILIST;copy;2$;20| (|x| $) - (LET ((|y| (SPADCALL (|getShellEntry| $ 16)))) + (LET ((|y| NIL)) (SEQ (LET ((|i| 0)) (LOOP (COND |