From 47cff9f6ff826835730ed6975ed883bc021a5bda Mon Sep 17 00:00:00 2001 From: Juan Jose Garcia Ripoll Date: Sat, 6 Dec 2008 13:04:27 +0100 Subject: [PATCH] Special variable declarations are no longer ignored in neither LABELS nor FLET forms. Only affected the interpreter. --- src/c/compiler.d | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) diff --git a/src/c/compiler.d b/src/c/compiler.d index a5b3de01f..b9e2b049f 100644 --- a/src/c/compiler.d +++ b/src/c/compiler.d @@ -1187,9 +1187,6 @@ c_labels_flet(int op, cl_object args, int flags) { return c_locally(args, flags); } - /* Remove declarations */ - args = c_process_declarations(args); - /* If compiling a LABELS form, add the function names to the lexical environment before compiling the functions */ if (op == OP_FLET) @@ -1219,7 +1216,7 @@ c_labels_flet(int op, cl_object args, int flags) { /* Compile the body of the form with the local functions in the lexical environment. */ - flags = compile_body(args, flags); + flags = c_locally(args, flags); /* Restore and return */ c_undo_bindings(old_vars);