projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
A small GC optimisation
[ghc-hetmet.git]
/
rts
/
sm
/
MarkWeak.h
diff --git
a/rts/sm/MarkWeak.h
b/rts/sm/MarkWeak.h
index
7b3a806
..
64ccb0f
100644
(file)
--- a/
rts/sm/MarkWeak.h
+++ b/
rts/sm/MarkWeak.h
@@
-11,6
+11,11
@@
*
* ---------------------------------------------------------------------------*/
*
* ---------------------------------------------------------------------------*/
+#ifndef SM_MARKWEAK_H
+#define SM_MARKWEAK_H
+
+#include "BeginPrivate.h"
+
extern StgWeak *old_weak_ptr_list;
extern StgTSO *resurrected_threads;
extern StgTSO *exception_threads;
extern StgWeak *old_weak_ptr_list;
extern StgTSO *resurrected_threads;
extern StgTSO *exception_threads;
@@
-18,4
+23,7
@@
extern StgTSO *exception_threads;
void initWeakForGC ( void );
rtsBool traverseWeakPtrList ( void );
void markWeakPtrList ( void );
void initWeakForGC ( void );
rtsBool traverseWeakPtrList ( void );
void markWeakPtrList ( void );
-rtsBool traverseBlackholeQueue ( void );
+
+#include "EndPrivate.h"
+
+#endif /* SM_MARKWEAK_H */