Fix build on Windows
authorIan Lynagh <igloo@earth.li>
Sat, 27 Apr 2013 23:15:55 +0000 (00:15 +0100)
committerIan Lynagh <igloo@earth.li>
Sat, 27 Apr 2013 23:15:55 +0000 (00:15 +0100)
rts/StgCRun.c

index 1d3d71e..a45c52f 100644 (file)
@@ -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"