diff options
Diffstat (limited to 'ghc/rts/Main.c')
| -rw-r--r-- | ghc/rts/Main.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/ghc/rts/Main.c b/ghc/rts/Main.c index 182f589af0..0b937dfc9e 100644 --- a/ghc/rts/Main.c +++ b/ghc/rts/Main.c @@ -49,7 +49,8 @@ int main(int argc, char *argv[]) SchedulerStatus status; /* all GranSim/GUM init is done in startupHaskell; sets IAmMainThread! */ -#if defined(PROFILING) +#if defined(PROFILING) || defined(mingw32_HOST_OS) + /* mingw32 and PROFILING (still) define __stginits in .text */ startupHaskell(argc,argv,__stginit_ZCMain); #else startupHaskell(argc,argv,NULL); |