[project @ 2003-08-27 13:28:01 by panne]
[ghc-hetmet.git] / ghc / includes / Stg.h
index 17568b5..05ae7d1 100644 (file)
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: Stg.h,v 1.52 2003/05/29 14:39:30 sof Exp $
+ * $Id: Stg.h,v 1.55 2003/08/22 22:24:16 sof Exp $
  *
  * (c) The GHC Team, 1998-1999
  *
@@ -189,6 +189,13 @@ typedef StgWord64       LW_;
 /* RTS public interface */
 #include "RtsAPI.h"
 
+/* System headers: stdlib.h is eeded so that we can use NULL.  It must
+ * come after MachRegs.h, because stdlib.h might define some inline
+ * functions which may only be defined after register variables have
+ * been declared.
+ */
+#include <stdlib.h>
+
 #ifdef SMP
 #include <pthread.h>
 #endif
@@ -222,6 +229,7 @@ typedef StgWord64       LW_;
 /* Misc stuff without a home */
 DLL_IMPORT_RTS extern char **prog_argv;        /* so we can get at these from Haskell */
 DLL_IMPORT_RTS extern int    prog_argc;
+DLL_IMPORT_RTS extern char  *prog_name;
 
 extern void stackOverflow(void);