diff options
Diffstat (limited to 'ghc/compiler/codeGen')
| -rw-r--r-- | ghc/compiler/codeGen/CgCon.lhs | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/ghc/compiler/codeGen/CgCon.lhs b/ghc/compiler/codeGen/CgCon.lhs index 9a9f11aa4d..d94cbf03f6 100644 --- a/ghc/compiler/codeGen/CgCon.lhs +++ b/ghc/compiler/codeGen/CgCon.lhs @@ -72,7 +72,10 @@ cgTopRhsCon :: Id -- Name of thing bound to this RHS cgTopRhsCon id con args = do { ; dflags <- getDynFlags - ; ASSERT( not (isDllConApp dflags con args) ) return () +#if mingw32_TARGET_OS + -- Windows DLLs have a problem with static cross-DLL refs. + ; ASSERT( not (isDllConApp dflags con args) ) return () +#endif ; ASSERT( args `lengthIs` dataConRepArity con ) return () -- LAY IT OUT |