RTS tidyup sweep, first phase

[ghc-hetmet.git] / rts / Sanity.h

diff --git a/rts/Sanity.h b/rts/Sanity.h
index 48f3383..3020246 100644 (file)
--- a/rts/Sanity.h
+++ b/rts/Sanity.h
@@ -7,6 +7,7 @@
  * ---------------------------------------------------------------------------*/
 
 #ifndef SANITY_H
+#define SANITY_H
 
 #ifdef DEBUG
 
@@ -39,4 +40,3 @@ extern rtsBool isBlackhole( StgTSO* tso, StgClosure* p );
 #endif /* DEBUG */
  
 #endif /* SANITY_H */
-