diff options
Diffstat (limited to 'ghc/rts/Main.c')
| -rw-r--r-- | ghc/rts/Main.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/ghc/rts/Main.c b/ghc/rts/Main.c index 931371c1a0..aa10c44eb8 100644 --- a/ghc/rts/Main.c +++ b/ghc/rts/Main.c @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: Main.c,v 1.37 2003/03/25 18:00:19 sof Exp $ + * $Id: Main.c,v 1.38 2003/06/23 10:35:23 simonpj Exp $ * * (c) The GHC Team 1998-2000 * @@ -41,7 +41,7 @@ # include <windows.h> #endif -extern void __stginit_Main(void); +extern void __stginit_zdMain(void); /* Hack: we assume that we're building a batch-mode system unless * INTERPRETER is set @@ -53,7 +53,7 @@ int main(int argc, char *argv[]) SchedulerStatus status; /* all GranSim/GUM init is done in startupHaskell; sets IAmMainThread! */ - startupHaskell(argc,argv,__stginit_Main); + startupHaskell(argc,argv,__stginit_zdMain); /* kick off the computation by creating the main thread with a pointer to mainIO_closure representing the computation of the overall program; |