diff options
Diffstat (limited to 'rts/StablePtr.c')
-rw-r--r-- | rts/StablePtr.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/rts/StablePtr.c b/rts/StablePtr.c index c2e7cda2c3..c9282a66a8 100644 --- a/rts/StablePtr.c +++ b/rts/StablePtr.c @@ -100,7 +100,8 @@ spEntry *stable_ptr_table = NULL; static spEntry *stable_ptr_free = NULL; -static unsigned int SPT_size = 0; +// static unsigned int SPT_size = 0; +unsigned int SPT_size = 0; #define INIT_SPT_SIZE 64 /* Each time the stable pointer table is enlarged, we temporarily retain the old @@ -312,7 +313,7 @@ getStablePtr(StgPtr p) spEntry *__end_ptr = &stable_ptr_table[SPT_size]; \ for (p = stable_ptr_table; p < __end_ptr; p++) { \ /* Internal pointers are free slots. NULL is last in free */ \ - /* list. */ \ + /* list. (when addr null don't trace) */ \ if (p->addr && \ (p->addr < (P_)stable_ptr_table || p->addr >= (P_)__end_ptr)) \ { \ |