Index: /branches/working-0711/ccl/lisp-kernel/thread_manager.c
===================================================================
--- /branches/working-0711/ccl/lisp-kernel/thread_manager.c	(revision 12752)
+++ /branches/working-0711/ccl/lisp-kernel/thread_manager.c	(revision 12753)
@@ -722,5 +722,5 @@
 #ifdef USE_POSIX_SEMAPHORES
     sem_destroy((sem_t *)*s);
-    if (0) { /* (lisp_global(IN_GC)) */
+    if (lisp_global(IN_GC)) {
       postGCfree(*s);
     } else {