X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=includes%2FSMP.h;h=bf23e0826092a9fc69341a18281b1c08461b9675;hb=2bfdf5035220814a8ed0688ac3c2cc44d911299f;hp=e3b4cd54a2bb71048207a580cdad344b2a8fc3e2;hpb=fa4e32f81bcfbba98ba7e9d5cb96a74b75b052da;p=ghc-hetmet.git

diff --git a/includes/SMP.h b/includes/SMP.h
index e3b4cd5..bf23e08 100644
--- a/includes/SMP.h
+++ b/includes/SMP.h
@@ -16,14 +16,6 @@
  *      Unregisterised builds are ok, but only 1 CPU supported.
  */
 
-#ifdef CMINUSMINUS
-
-#define unlockClosure(ptr,info)                 \
-    prim %write_barrier() [];                   \
-    StgHeader_info(ptr) = info;    
-
-#else
-
 #if defined(THREADED_RTS)
 
 #if  defined(TICKY_TICKY)
@@ -203,6 +195,4 @@ xchg(StgPtr p, StgWord w)
 
 #endif /* !THREADED_RTS */
 
-#endif /* CMINUSMINUS */
-
 #endif /* SMP_H */