improve debug messages a bit

interpreter/code.c

@@ -302,15 +302,21 @@ void exec(Code* expr, int frame_ptr, int root_frame_ptr)
         {
             Desc* slice = ((AppEntry*) expr)->f;
 
+#ifdef DEBUG_EXEC            
+            printf("FUN1(ARGS): <");
+            printDesc(slice);
+            printf(">\n");
+#endif            
+            
             int argmask = 1;            
             arg_from_code(slice, ((AppEntry*) expr)->args[0]);
-              
+                          
 #ifdef DEBUG_EXEC            
             printf("FUN1: <");
             printDesc(slice);
             printf(">\n");
 #endif            
-            
+                        
             expr = ((FunEntry*) slice)->body;
             frame_ptr = stack_top_a - 1;
             continue;                        
@@ -319,6 +325,12 @@ void exec(Code* expr, int frame_ptr, int root_frame_ptr)
         {
             Desc* slice = ((AppEntry*) expr)->f;
 
+#ifdef DEBUG_EXEC
+            printf("FUN2(ARGS): <");
+            printDesc(slice);
+            printf(">\n");
+#endif
+            
             int argmask = 1;
             
             arg_from_code(slice, ((AppEntry*) expr)->args[0]);
@@ -338,18 +350,24 @@ void exec(Code* expr, int frame_ptr, int root_frame_ptr)
         {            
             Desc* slice = ((AppEntry*) expr)->f;
             
+#ifdef DEBUG_EXEC
+            printf("FUN(ARGS): <");
+            printDesc(slice);
+            printf(">\n");
+#endif            
+            
             int new_frame_ptr = stack_top_a;
             int argmask = 1;
             
             for (int i = 0; i < expr->nr_args; i++) {
                 arg_from_code(slice, ((AppEntry*) expr)->args[i]);
-            }
+            }            
 
 #ifdef DEBUG_EXEC
             printf("FUN: <");
             printDesc(slice);
             printf(">\n");
-#endif
+#endif            
             
             expr = ((FunEntry*) slice)->body;