[project @ 2000-05-18 11:32:21 by panne]

Make stackOverflow prototype available Haskell compilation

diff --git a/ghc/includes/Stg.h b/ghc/includes/Stg.h
index 4005542..ebc471a 100644 (file)
--- a/ghc/includes/Stg.h
+++ b/ghc/includes/Stg.h
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: Stg.h,v 1.29 2000/04/14 15:10:20 sewardj Exp $
+ * $Id: Stg.h,v 1.30 2000/05/18 11:32:21 panne Exp $
  *
  * (c) The GHC Team, 1998-1999
  *
@@ -185,6 +185,8 @@ DLL_IMPORT_RTS extern int    prog_argc;
 
 extern char **environ;
 
+extern void stackOverflow(void);
+
 /* Creating and destroying an adjustor thunk.
    I cannot make myself create a separate .h file
    for these two (sof.) 

diff --git a/ghc/rts/RtsUtils.h b/ghc/rts/RtsUtils.h
index f4aea78..428061a 100644 (file)
--- a/ghc/rts/RtsUtils.h
+++ b/ghc/rts/RtsUtils.h
@@ -1,5 +1,5 @@
 /* -----------------------------------------------------------------------------
- * $Id: RtsUtils.h,v 1.9 2000/04/14 14:07:18 simonmar Exp $
+ * $Id: RtsUtils.h,v 1.10 2000/05/18 11:32:21 panne Exp $
  *
  * (c) The GHC Team, 1998-1999
  *
@@ -17,7 +17,6 @@ extern void prog_belch(char *s, ...);
 
 extern void _stgAssert (char *filename, unsigned int linenum);
 
-extern void stackOverflow(void);
 extern void heapOverflow(void);
 
 void resetNonBlockingFd(int fd);