1.0.13.49: save source-locations for accessor methods defined via DEFCLASS

[sbcl.git] / src / runtime / pthread-lutex.c

diff --git a/src/runtime/pthread-lutex.c b/src/runtime/pthread-lutex.c
index 2da0291..6365214 100644 (file)
--- a/src/runtime/pthread-lutex.c
+++ b/src/runtime/pthread-lutex.c
@@ -22,11 +22,11 @@
 #include "arch.h"
 #include "target-arch-os.h"
 #include "os.h"
+#include "pthread-lutex.h"
+#include "gencgc.h"
 
 #include "genesis/lutex.h"
 
-typedef unsigned long tagged_lutex_t;
-
 #if 1
 # define lutex_assert(ex)                                              \
 do {                                                                   \
@@ -138,7 +138,11 @@ lutex_lock (tagged_lutex_t tagged_lutex)
     struct lutex *lutex = (struct lutex*) native_pointer(tagged_lutex);
 
     ret = thread_mutex_lock(lutex->mutex);
-    /* The mutex is locked by the same thread. */
+    /* The mutex is locked by the same thread.
+     *
+     * FIXME: Usually when POSIX says that "an error value is returned"
+     * it actually refers to errno...
+     */
     if (ret == EDEADLK)
         return ret;
     lutex_assert(ret == 0);