X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fincludes%2FSMP.h;h=319f51022056035ab5cd5f90fd2d8ede9235bb65;hb=ba2843abdfe6f055777e4e66e8add769fce31d29;hp=3a31d96c64247626f3a9e1f4e184d6d571be2a23;hpb=f832c312c2a879f98da09cf261ce4f8cb63259eb;p=ghc-hetmet.git

diff --git a/ghc/includes/SMP.h b/ghc/includes/SMP.h
index 3a31d96..319f510 100644
--- a/ghc/includes/SMP.h
+++ b/ghc/includes/SMP.h
@@ -1,5 +1,5 @@
 /* ----------------------------------------------------------------------------
- * $Id: SMP.h,v 1.2 2001/02/08 14:36:21 simonmar Exp $
+ * $Id: SMP.h,v 1.4 2002/02/04 20:10:47 sof Exp $
  *
  * (c) The GHC Team, 1999
  *
@@ -20,9 +20,7 @@
 
 #if defined(SMP)
 
-#if    defined(INTERPRETER) \
-     || defined(PROFILING)  \
-     || defined(TICKY_TICKY)
+#if  defined(PROFILING)  || defined(TICKY_TICKY)
 #error Build options incompatible with SMP.
 #endif
 
@@ -76,15 +74,10 @@
 #define LOCK_THUNK(__info)				\
   CMPXCHG(R1.cl->header.info, __info, &stg_WHITEHOLE_info);
 
-#define ACQUIRE_LOCK(mutex) pthread_mutex_lock(mutex);
-#define RELEASE_LOCK(mutex) pthread_mutex_unlock(mutex);
-
 #else /* !SMP */
 
 #define LOCK_CLOSURE(c)     /* nothing */
 #define LOCK_THUNK(__info)  /* nothing */
-#define ACQUIRE_LOCK(mutex) /* nothing */
-#define RELEASE_LOCK(mutex) /* nothing */
 
 #endif /* SMP */