Commit 9ba74407 authored by Daniel Kochmański's avatar Daniel Kochmański
Browse files

bytecmp: be smart wrt bytecompiled code

bytecompiled functions may not have a name (i.e lambda assigned to
smothing). Recognize that fact, so when we read back such functions
from file we can call bc-compile on them. Fixes #313.
parent b851e857
......@@ -130,9 +130,9 @@ cl_function_lambda_expression(cl_object fun)
case t_bytecodes:
name = fun->;
output = fun->bytecodes.definition;
if (name == ECL_NIL)
if (name == ECL_NIL && output != ECL_NIL)
output = cl_cons(@'lambda', output);
else if (name != @'si::bytecodes')
else if (name != @'si::bytecodes' && output != ECL_NIL)
output = @list*(3, @'ext::lambda-block', name, output);
case t_cfun:
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment