Revert "core: primitive-load: Force top level."

This reverts commit 5912cbefbb.
2019-11-15 16:36:00 +01:00 · 2019-11-15 16:36:00 +01:00 · ddf51ecba8
parent 83fc300c76
commit ddf51ecba8
1 changed files with 0 additions and 2 deletions
--- a/src/eval-apply.c
+++ b/src/eval-apply.c
@ -806,8 +806,6 @@ begin:
            {
              program = cons (R1->car, cell_nil);
              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;
            begin_primitive_load:
              R2->car = R1;