From 287681a847f1df6b0eff513f68763e6628380317 Mon Sep 17 00:00:00 2001 From: sof Date: Sat, 13 Apr 2002 05:17:11 +0000 Subject: [PATCH] [project @ 2002-04-13 05:17:11 by sof] debug versions of ACQUIRE_LOCK() and RELEASE_LOCK() macros --- ghc/rts/OSThreads.h | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/ghc/rts/OSThreads.h b/ghc/rts/OSThreads.h index eb5d9e7..571c90e 100644 --- a/ghc/rts/OSThreads.h +++ b/ghc/rts/OSThreads.h @@ -20,8 +20,13 @@ typedef pthread_t OSThreadId; #define INIT_MUTEX_VAR PTHREAD_MUTEX_INITIALIZER #define INIT_COND_VAR PTHREAD_COND_INITIALIZER +#ifdef LOCK_DEBUG +#define ACQUIRE_LOCK(mutex) fprintf(stderr, "ACQUIRE_LOCK(0x%p) %s %d\n", mutex,__FILE__,__LINE__); fflush(stderr); pthread_mutex_lock(mutex) +#define RELEASE_LOCK(mutex) fprintf(stderr, "RELEASE_LOCK(0x%p) %s %d\n", mutex,__FILE__,__LINE__); fflush(stderr); pthread_mutex_unlock(mutex) +#else #define ACQUIRE_LOCK(mutex) pthread_mutex_lock(mutex) #define RELEASE_LOCK(mutex) pthread_mutex_unlock(mutex) +#endif # elif defined(HAVE_WINDOWS_H) #include -- 1.7.10.4