[svn:parrot] r41649 - branches/pcc_reapply/src

bacek at svn.parrot.org bacek at svn.parrot.org
Sat Oct 3 22:34:00 UTC 2009


Author: bacek
Date: Sat Oct  3 22:33:59 2009
New Revision: 41649
URL: https://trac.parrot.org/parrot/changeset/41649

Log:
Comment out more stuff in frame_builder.c

Modified:
   branches/pcc_reapply/src/frame_builder.c

Modified: branches/pcc_reapply/src/frame_builder.c
==============================================================================
--- branches/pcc_reapply/src/frame_builder.c	Sat Oct  3 22:24:57 2009	(r41648)
+++ branches/pcc_reapply/src/frame_builder.c	Sat Oct  3 22:33:59 2009	(r41649)
@@ -573,37 +573,37 @@
             emitm_movl_m_r(interp, pc, emit_EAX, emit_EAX, 0, 1, 0);
             if (*sig == 2)      /* short */
                 emitm_movswl_r_r(pc, emit_EAX, emit_EAX);
-            emitm_call_cfunc(pc, set_nci_I);
+            //emitm_call_cfunc(pc, set_nci_I);
             break;
         case 'f':
         case 'd':
             jit_emit_fstore_mb_n(interp, pc, emit_EBP, temp_calls_offset + 8);
-            emitm_call_cfunc(pc, set_nci_N);
+            //emitm_call_cfunc(pc, set_nci_N);
             /* pop num from st(0) and mov to reg */
             break;
         case 's':
             /* movswl %ax, %eax */
             emitm_movswl_r_r(pc, emit_EAX, emit_EAX);
             emitm_movl_r_m(interp, pc, emit_EAX, emit_EBP, 0, 1, temp_calls_offset + 8);
-            emitm_call_cfunc(pc, set_nci_I);
+            //emitm_call_cfunc(pc, set_nci_I);
             break;
         case 'c':
             /* movsbl %al, %eax */
             emitm_movsbl_r_r(pc, emit_EAX, emit_EAX);
             emitm_movl_r_m(interp, pc, emit_EAX, emit_EBP, 0, 1, temp_calls_offset + 8);
-            emitm_call_cfunc(pc, set_nci_I);
+            //emitm_call_cfunc(pc, set_nci_I);
             break;
         case 'I':   /* INTVAL */
         case 'l':
         case 'i':
             emitm_movl_r_m(interp, pc, emit_EAX, emit_EBP, 0, 1, temp_calls_offset + 8);
-            emitm_call_cfunc(pc, set_nci_I);
+           // emitm_call_cfunc(pc, set_nci_I);
             break;
         case 'v': /* void - do nothing */
             break;
         case 'P':
             emitm_movl_r_m(interp, pc, emit_EAX, emit_EBP, 0, 1, temp_calls_offset + 8);
-            emitm_call_cfunc(pc, set_nci_P);
+            //emitm_call_cfunc(pc, set_nci_P);
             break;
         case 'p':   /* make a new unmanaged struct */
             /* save return value on stack */
@@ -632,11 +632,11 @@
             emitm_lea_m_r(interp, pc, emit_EAX, emit_EBP, 0, 1, st_offset);
             emitm_movl_r_m(interp, pc, emit_EAX, emit_EBP, 0, 1, temp_calls_offset + 4);
 
-            emitm_call_cfunc(pc, set_nci_P);
+            //emitm_call_cfunc(pc, set_nci_P);
             break;
         case 'S':
             emitm_movl_r_m(interp, pc, emit_EAX, emit_EBP, 0, 1, temp_calls_offset + 8);
-            emitm_call_cfunc(pc, set_nci_S);
+            //emitm_call_cfunc(pc, set_nci_S);
             break;
         case 't':   /* string */
             /* EAX is char* */
@@ -653,7 +653,7 @@
             emitm_lea_m_r(interp, pc, emit_EAX, emit_EBP, 0, 1, st_offset);
             emitm_movl_r_m(interp, pc, emit_EAX, emit_EBP, 0, 1, temp_calls_offset + 4);
 
-            emitm_call_cfunc(pc, set_nci_S);
+            //emitm_call_cfunc(pc, set_nci_S);
             break;
         default:
             Parrot_ex_throw_from_c_args(interp, NULL, EXCEPTION_JIT_ERROR,


More information about the parrot-commits mailing list