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

Fixed traversers_registered THREAD_LOCAL

Browse Source 
svn: r15053
This commit is contained in:
Kevin Tew 2009-06-02 16:24:45 +00:00
parent 4370da0192
commit 0f62e95366
2 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
src/mzscheme/src/module.c
View File

@ -197,6 +197,7 @@ static Scheme_Object *empty_self_modname;
static Scheme_Bucket_Table *starts_table;
/* caches */
static THREAD_LOCAL Scheme_Modidx *modidx_caching_chain;
static THREAD_LOCAL Scheme_Object *global_shift_cache;
#define GLOBAL_SHIFT_CACHE_SIZE 40

2
src/mzscheme/src/salloc.c
View File

@ -1039,7 +1039,7 @@ static void do_next_finalization(void *o, void *data)
/* Makes gc2 xformer happy: */
typedef void (*finalizer_function)(void *p, void *data);
static int traversers_registered;
static THREAD_LOCAL int traversers_registered;
static THREAD_LOCAL Finalizations **save_fns_ptr;
static void add_finalizer(void *v, void (*f)(void*,void*), void *data,