suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix JIT bug

Browse Source
This commit is contained in:
Matthew Flatt 2012-01-08 11:25:47 -07:00
parent 7153fbd4d5
commit 824e540cb0
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/racket/src/jitarith.c
View File

@ -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)) { if ((arith == ARITH_INEX_EX) && (unsafe_fl < 1)) {
/* need a slow path */ /* need a slow path */
mz_rs_sync(); /* needed if arguments were unboxed */
if (args_unboxed) { if (args_unboxed) {
(void)jit_calli(sjc.box_flonum_from_reg_code); (void)jit_calli(sjc.box_flonum_from_reg_code);
} }