X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=rts%2FStgMiscClosures.cmm;h=c981cbec18c972a33657fba0bb3663e2446b70d0;hp=c665749632c430ad0804793958e7479d31341097;hb=d15229b75a07cf1092402f87950a1887c6429f3a;hpb=df1fecb95e3a0cf901184605da96dc8ae092b173 diff --git a/rts/StgMiscClosures.cmm b/rts/StgMiscClosures.cmm index c665749..c981cbe 100644 --- a/rts/StgMiscClosures.cmm +++ b/rts/StgMiscClosures.cmm @@ -546,7 +546,7 @@ INFO_TABLE_CONSTR(stg_MVAR_TSO_QUEUE,2,0,0,PRIM,"MVAR_TSO_QUEUE","MVAR_TSO_QUEUE replace them with references to the static objects. ------------------------------------------------------------------------- */ -#if defined(__PIC__) && defined(mingw32_TARGET_OS) +#if defined(__PIC__) && defined(mingw32_HOST_OS) /* * When sticking the RTS in a Windows DLL, we delay populating the * Charlike and Intlike tables until load-time, which is only