/* -----------------------------------------------------------------------------
- * $Id: Main.c,v 1.38 2003/06/23 10:35:23 simonpj Exp $
+ * $Id: Main.c,v 1.39 2003/07/10 08:02:29 simonpj Exp $
*
* (c) The GHC Team 1998-2000
*
# include <windows.h>
#endif
-extern void __stginit_zdMain(void);
+extern void __stginit_ZCMain(void);
/* Hack: we assume that we're building a batch-mode system unless
* INTERPRETER is set
SchedulerStatus status;
/* all GranSim/GUM init is done in startupHaskell; sets IAmMainThread! */
- startupHaskell(argc,argv,__stginit_zdMain);
+ startupHaskell(argc,argv,__stginit_ZCMain);
/* kick off the computation by creating the main thread with a pointer
to mainIO_closure representing the computation of the overall program;
/* -----------------------------------------------------------------------------
- * $Id: Prelude.h,v 1.23 2003/06/23 10:35:23 simonpj Exp $
+ * $Id: Prelude.h,v 1.24 2003/07/10 08:02:29 simonpj Exp $
*
* (c) The GHC Team, 1998-2001
*
extern DLL_IMPORT StgClosure GHCziBase_False_closure;
extern DLL_IMPORT StgClosure GHCziPack_unpackCString_closure;
extern DLL_IMPORT StgClosure GHCziWeak_runFinalizzerBatch_closure;
-extern StgClosure zdMain_main_closure;
+extern StgClosure ZCMain_main_closure;
extern DLL_IMPORT StgClosure GHCziTopHandler_runIO_closure;
extern DLL_IMPORT StgClosure GHCziTopHandler_runNonIO_closure;
#define False_closure (&GHCziBase_False_closure)
#define unpackCString_closure (&GHCziPack_unpackCString_closure)
#define runFinalizerBatch_closure (&GHCziWeak_runFinalizzerBatch_closure)
-#define mainIO_closure (&zdMain_main_closure)
+#define mainIO_closure (&ZCMain_main_closure)
#define runIO_closure (&GHCziTopHandler_runIO_closure)
#define runNonIO_closure (&GHCziTopHandler_runNonIO_closure)