fix JIT bug

2012-01-08 11:25:47 -07:00 · 2012-01-08 11:25:47 -07:00 · 824e540cb0
commit 824e540cb0
parent 7153fbd4d5
1 changed files with 1 additions and 0 deletions
--- a/src/racket/src/jitarith.c
+++ b/src/racket/src/jitarith.c
@ -966,6 +966,7 @@ int scheme_generate_arith(mz_jit_state *jitter, Scheme_Object *rator, Scheme_Obj

    if ((arith == ARITH_INEX_EX) && (unsafe_fl < 1)) {
      /* need a slow path */
+      mz_rs_sync(); /* needed if arguments were unboxed */
      if (args_unboxed) {
        (void)jit_calli(sjc.box_flonum_from_reg_code);
      }