diff options
| author | Ian Lynagh <igloo@earth.li> | 2012-03-16 15:56:04 +0000 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2012-03-16 15:56:04 +0000 |
| commit | d66b9cb07b0e03282c8010bcf76168e64cb4acde (patch) | |
| tree | 540302baaae7f3431e2a3ca3d2a1a4fa21844688 /rts/RtsMain.c | |
| parent | 029cd4345a3662f9951d4b3245dc594f24f00b6a (diff) | |
| download | haskell-d66b9cb07b0e03282c8010bcf76168e64cb4acde.tar.gz | |
For now, turn off the SEH code on Win64
Diffstat (limited to 'rts/RtsMain.c')
| -rw-r--r-- | rts/RtsMain.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/rts/RtsMain.c b/rts/RtsMain.c index e89445db25..435df420c5 100644 --- a/rts/RtsMain.c +++ b/rts/RtsMain.c @@ -108,11 +108,11 @@ int hs_main (int argc, char *argv[], // program args progmain_closure = main_closure; rtsconfig = rts_config; -#if defined(mingw32_HOST_OS) +#if defined(mingw32_HOST_OS) && defined(i386_HOST_ARCH) BEGIN_CATCH #endif real_main(); -#if defined(mingw32_HOST_OS) +#if defined(mingw32_HOST_OS) && defined(i386_HOST_ARCH) END_CATCH #endif } |