From fd93e502e12894bdbac862ba4f2e1f76a9210845 Mon Sep 17 00:00:00 2001 From: Kevin Tew Date: Sun, 24 Apr 2011 20:40:58 -0600 Subject: [PATCH] keygen can be shared see comment --- src/racket/src/hash.c | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/src/racket/src/hash.c b/src/racket/src/hash.c index f93f02c9f5..f9d5df9552 100644 --- a/src/racket/src/hash.c +++ b/src/racket/src/hash.c @@ -54,9 +54,9 @@ static void register_traversers(void); #ifdef MZ_PRECISE_GC /* keygen race conditions below are ok, because keygen is randomness used - to create a hashkey. Setting a hashkey on a Scheme_Object however, may - lead to race conditions */ -FIXME_LATER static uintptr_t keygen; + to create a hashkey. (Make sure that only one thread at a time sets + a hash code in a specific object, though.) */ +SHARED_OK static uintptr_t keygen; XFORM_NONGCING static MZ_INLINE uintptr_t PTR_TO_LONG(Scheme_Object *o)