Fix build on OS X

ghc · Jun 22, 2013 · 3660ef9 · 3660ef9
1 parent f792ba4
commit 3660ef9
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/includes/rts/storage/SMPClosureOps.h b/includes/rts/storage/SMPClosureOps.h
@@ -73,6 +73,10 @@ EXTERN_INLINE StgInfoTable *tryLockClosure(StgClosure *p)
 
 #else /* !THREADED_RTS */
 
+EXTERN_INLINE StgInfoTable *
+reallyLockClosure(StgClosure *p)
+{ return (StgInfoTable *)p->header.info; }
+
 EXTERN_INLINE StgInfoTable *
 lockClosure(StgClosure *p)
 { return (StgInfoTable *)p->header.info; }