Revert "core: primitive-load: Force top level."
This reverts commit 5912cbefbb
.
This commit is contained in:
parent
83fc300c76
commit
ddf51ecba8
|
@ -806,8 +806,6 @@ begin:
|
||||||
{
|
{
|
||||||
program = cons (R1->car, cell_nil);
|
program = cons (R1->car, cell_nil);
|
||||||
push_cc (program, R1, R0, cell_vm_begin_primitive_load);
|
push_cc (program, R1, R0, cell_vm_begin_primitive_load);
|
||||||
/* Force toplevel by moving any *closure* down. */
|
|
||||||
R0 = cons (cell_undefined, R0);
|
|
||||||
goto begin_expand;
|
goto begin_expand;
|
||||||
begin_primitive_load:
|
begin_primitive_load:
|
||||||
R2->car = R1;
|
R2->car = R1;
|
||||||
|
|
Loading…
Reference in New Issue