@@ -61,7 +61,13 @@ overrideIdrisSubDirWith fp envVar = do
61 Just ddir -> return ddir
61 Just ddir -> return ddir
63getCC :: IO String
63getCC :: IO String
64−getCC = fromMaybe "gcc" <$> lookupEnv "IDRIS_CC"
64+getCC = fromMaybe cc <$> lookupEnv "IDRIS_CC"
66+#ifdef mingw32_HOST_OS
66getEnvFlags :: IO [String]
72getEnvFlags :: IO [String]
67getEnvFlags = maybe [] (splitOn " ") <$> lookupEnv "IDRIS_CFLAGS"
73getEnvFlags = maybe [] (splitOn " ") <$> lookupEnv "IDRIS_CFLAGS"