[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