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

fix thread-local fuel counters in JIT

Browse Source 
svn: r16835
This commit is contained in:
Matthew Flatt 2009-11-17 18:33:27 +00:00
parent fe939fa2bd
commit a91ff1c603
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -10234,13 +10234,15 @@ void scheme_jit_fill_threadlocal_table() {
thread_local_pointers[tl_GC_gen0_alloc_page_ptr] = (&GC_gen0_alloc_page_ptr); thread_local_pointers[tl_GC_gen0_alloc_page_ptr] = (&GC_gen0_alloc_page_ptr);
thread_local_pointers[tl_retry_alloc_r1] = (&retry_alloc_r1); thread_local_pointers[tl_retry_alloc_r1] = (&retry_alloc_r1);
thread_local_pointers[tl_save_fp] = (&save_fp); thread_local_pointers[tl_save_fp] = (&save_fp);
#else # else
# ifdef INLINE_FP_OPS # ifdef INLINE_FP_OPS
thread_local_pointers[tl_double_result] = (&double_result); thread_local_pointers[tl_double_result] = (&double_result);
# endif # endif
# endif # endif
thread_local_pointers[tl_fixup_runstack_base] = (&fixup_runstack_base); thread_local_pointers[tl_fixup_runstack_base] = (&fixup_runstack_base);
thread_local_pointers[tl_fixup_already_in_place] = (&fixup_already_in_place); thread_local_pointers[tl_fixup_already_in_place] = (&fixup_already_in_place);
thread_local_pointers[tl_scheme_fuel_counter] = (&scheme_fuel_counter);
thread_local_pointers[tl_scheme_jit_stack_boundary] = (&scheme_jit_stack_boundary);
#endif #endif
} }