new arg handling works on arm

release-rpi2/shell.l

@@ -595,8 +595,6 @@
     (run-tasks)
     (send scr 0)
     (gc)
-
-    (import "/sd/tests/gtn.l")
   ))
 )))
 

sledge/alloc.c

@@ -187,7 +187,7 @@ Cell* collect_garbage(env_t* global_env, void* stack_end, void* stack_pointer) {
         // maybe type/signature byte frame header?
         if ((Cell*)item>cell_heap) {
           //printf("[gc] stack %p\r\n",item);
-          //mark_tree((Cell*)item);
+          mark_tree((Cell*)item);
         }
       }
     }

sledge/compiler_new.c

@@ -9,7 +9,7 @@
 #define env_t StrMap
 static env_t* global_env = NULL;
 
-#define CHECK_BOUNDS    // enforce boundaries of array put/get
+//#define CHECK_BOUNDS    // enforce boundaries of array put/get
 #define ARG_SPILLOVER 3 // max 4 args (0-3) via regs, rest via stack
 #define LBDREG R4       // register base used for passing args to functions
 

sledge/os/shell.l

@@ -595,8 +595,6 @@
     (run-tasks)
     (send scr 0)
     (gc)
-
-    (import "/sd/tests/gtn.l")
   ))
 )))