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

fix JIT fuel update in non-signal-/-thread-decrement mode

Browse Source 
svn: r2178
This commit is contained in:
Matthew Flatt 2006-02-08 19:47:29 +00:00
parent f8bd35592d
commit b854ff4e50
1 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
src/mzscheme/src/jit.c
View File

@ -895,6 +895,10 @@ static int generate_tail_call(mz_jit_state *jitter, int num_rands, int direct_na
mz_push_local_p(JIT_R0, JIT_LOCAL2);
(void)jit_calli(thread_block);
mz_pop_local_p(JIT_R0, JIT_LOCAL2);
#ifndef FUEL_AUTODECEREMENTS
(void)jit_movi_p(JIT_R1, &scheme_fuel_counter);
jit_ldr_i(JIT_R2, JIT_R1);
#endif
mz_patch_branch(ref5);
#ifndef FUEL_AUTODECEREMENTS
jit_subi_p(JIT_R2, JIT_R2, 0x1);