Commit 2d4e9216 authored by simonmar's avatar simonmar

[project @ 2005-11-24 14:02:40 by simonmar]

make this compile non-threaded again
parent a141bd3b
......@@ -80,7 +80,9 @@ static snEntry *stable_ptr_free = NULL;
static unsigned int SPT_size = 0;
#ifdef THREADED_RTS
static Mutex stable_mutex;
#endif
/* This hash table maps Haskell objects to stable names, so that every
* call to lookupStableName on a given object will return the same
......@@ -143,7 +145,9 @@ initStablePtrTable(void)
//
// Also, getStablePtr is now called from __attribute__((constructor))
// functions, so initialising things here wouldn't work anyway.
#ifdef THREADED_RTS
initMutex(&stable_mutex);
#endif
}
/*
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment