From e2618c92315f6b544e41c9b7d4cad92adcf98655 Mon Sep 17 00:00:00 2001 From: dos-reis Date: Fri, 4 Feb 2011 00:04:31 +0000 Subject: * interp/c-util.boot (mutateConditionalFormWithUnaryFunction): Rename from mutateCONDFormWithUnaryFunction. Update callers (mutateBindingFormWithUnaryFunction): Rename from mutateLETFormWithUnaryFunction. Allow %bind form too. Update callers. --- src/algebra/strap/ILIST.lsp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/algebra/strap/ILIST.lsp') 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 -- cgit v1.2.3