fix compiler bug related to `case-lambda'

Closes PR 10987
This commit is contained in:
Matthew Flatt 2010-06-27 11:02:26 -06:00
parent 7cff4028c7
commit 1254c54852

View File

@ -2442,7 +2442,7 @@ case_lambda_shift(Scheme_Object *data, int delta, int after_depth)
seq->array[i] = le;
}
return data;
return scheme_make_syntax_compiled(CASE_LAMBDA_EXPD, data);
}
Scheme_Object *scheme_unclose_case_lambda(Scheme_Object *expr, int mode)