Changeset 15333

Timestamp:

Apr 18, 2012, 3:02:36 PM (13 years ago)

Author:

Gary Byers

Message:

Terminate the application via fatal_oserr() if a Mach semaphore
can't be created.

File:

• trunk/source/lisp-kernel/thread_manager.c (modified) (1 diff)

trunk/source/lisp-kernel/thread_manager.c

@@ -682 +682 @@
 #endif
 #ifdef USE_MACH_SEMAPHORES
+  kern_return_t kret;
   semaphore_t s = (semaphore_t)0;
-  semaphore_create(mach_task_self(),&s, SYNC_POLICY_FIFO, count);
+  kret = semaphore_create(mach_task_self(),&s, SYNC_POLICY_FIFO, count);
+  if (kret != KERN_SUCCESS) {
+    fatal_oserr("Can't create Mach semaphore.",(OSErr)kret);
+  }
   return (void *)(natural)s;
 #endif