A small GC optimisation

[ghc-hetmet.git] / rts / sm / Sweep.h

diff --git a/rts/sm/Sweep.h b/rts/sm/Sweep.h
index e7904a9..4eacd11 100644 (file)
--- a/rts/sm/Sweep.h
+++ b/rts/sm/Sweep.h
@@ -1,6 +1,6 @@
 /* -----------------------------------------------------------------------------
  *
- * (c) The GHC Team 2008 
+ * (c) The GHC Team 2008
  *
  * Simple mark/sweep, collecting whole blocks.
  *
@@ -11,4 +11,9 @@
  *
  * ---------------------------------------------------------------------------*/
 
-void sweep(step *gen);
+#ifndef SM_SWEEP_H
+#define SM_SWEEP_H
+
+RTS_PRIVATE void sweep(generation *gen);
+
+#endif /* SM_SWEEP_H */