From: simonmar <unknown>
Date: Thu, 26 Feb 2004 16:36:21 +0000 (+0000)
Subject: [project @ 2004-02-26 16:36:21 by simonmar]
X-Git-Tag: Approx_11550_changesets_converted~48
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=7aa38e04cfdee5d162ba8ae8a1c6f4e52fd0dea0;p=ghc-hetmet.git

[project @ 2004-02-26 16:36:21 by simonmar]
Add the usual multi-slurp protection
---

diff --git a/ghc/rts/RtsUtils.h b/ghc/rts/RtsUtils.h
index 4f2b296..cd02f47 100644
--- a/ghc/rts/RtsUtils.h
+++ b/ghc/rts/RtsUtils.h
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: RtsUtils.h,v 1.19 2003/11/12 17:49:10 sof Exp $
+ * $Id: RtsUtils.h,v 1.20 2004/02/26 16:36:21 simonmar Exp $
  *
  * (c) The GHC Team, 1998-1999
  *
@@ -7,6 +7,9 @@
  *
  * ---------------------------------------------------------------------------*/
 
+#ifndef RTSUTILS_H
+#define RTSUTILS_H
+
 /* (Checked) dynamic allocation: */
 extern void *stgMallocBytes(int n, char *msg);
 extern void *stgReallocBytes(void *p, int n, char *msg);
@@ -39,3 +42,5 @@ extern void heapCheckFail( void );
 
 extern void* __hscore_get_saved_termios(int fd);
 extern void __hscore_set_saved_termios(int fd, void* ts);
+
+#endif // RTSUTILS_H