diff options
| -rw-r--r-- | includes/rts/storage/SMPClosureOps.h | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/includes/rts/storage/SMPClosureOps.h b/includes/rts/storage/SMPClosureOps.h index ffa2fe8fb3..2b058fede8 100644 --- a/includes/rts/storage/SMPClosureOps.h +++ b/includes/rts/storage/SMPClosureOps.h @@ -74,6 +74,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; } |