diff options
| author | Ian Lynagh <igloo@earth.li> | 2013-04-28 00:15:55 +0100 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2013-04-28 00:15:55 +0100 |
| commit | f6f1252e32adcc0a3d995fcf0077847c67ddac5d (patch) | |
| tree | 989e1356fe45736136f81f6421a37b358682ef78 /rts/StgCRun.c | |
| parent | e5944d9f04bc6f6e62367be71d5b76e7d0473ee2 (diff) | |
| download | haskell-f6f1252e32adcc0a3d995fcf0077847c67ddac5d.tar.gz | |
Fix build on Windows
Diffstat (limited to 'rts/StgCRun.c')
| -rw-r--r-- | rts/StgCRun.c | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/rts/StgCRun.c b/rts/StgCRun.c index 1d3d71e749..a45c52fd02 100644 --- a/rts/StgCRun.c +++ b/rts/StgCRun.c @@ -166,7 +166,9 @@ StgRunIsImplementedInAssembler(void) { __asm__ volatile ( STG_GLOBAL STG_RUN "\n" +#if !defined(mingw32_HOST_OS) STG_HIDDEN STG_RUN "\n" +#endif STG_RUN ":\n\t" /* @@ -255,7 +257,9 @@ StgRunIsImplementedInAssembler(void) * save callee-saves registers on behalf of the STG code. */ STG_GLOBAL STG_RUN "\n" +#if !defined(mingw32_HOST_OS) STG_HIDDEN STG_RUN "\n" +#endif STG_RUN ":\n\t" "subq %1, %%rsp\n\t" "movq %%rsp, %%rax\n\t" |