X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FArena.h;h=7a2989e5432736f8e0a155677c0cea147cd5fcd4;hb=4417e97d436e2796bed886cb1a830acb88d3da28;hp=7b7ac911af5fee579b3a4ac89ae5506810c39046;hpb=bda943136e7dee3ad36e368fd81014850b5d6db9;p=ghc-hetmet.git

diff --git a/ghc/rts/Arena.h b/ghc/rts/Arena.h
index 7b7ac91..7a2989e 100644
--- a/ghc/rts/Arena.h
+++ b/ghc/rts/Arena.h
@@ -1,11 +1,11 @@
 /* -----------------------------------------------------------------------------
-   $Id: Arena.h,v 1.1 2001/10/18 14:41:01 simonmar Exp $ 
    (c) The University of Glasgow 2001
 
    Arena allocation interface.
    -------------------------------------------------------------------------- */
 
 #ifndef ARENA_H
+#define ARENA_H
 
 // Abstract type of arenas
 typedef struct _Arena Arena;
@@ -22,4 +22,4 @@ extern void    arenaFree  ( Arena * );
 // For internal use only:
 extern unsigned long arenaBlocks( void );
 
-#endif // ARENA_H
+#endif /* ARENA_H */