diff --git a/src/System/Process/Read.hs b/src/System/Process/Read.hs index 5926f245d2..2d587b6e02 100644 --- a/src/System/Process/Read.hs +++ b/src/System/Process/Read.hs @@ -57,7 +57,7 @@ import Data.Text.Encoding.Error (lenientDecode) import qualified Data.Text.Lazy.Encoding as LT import qualified Data.Text.Lazy as LT import Data.Typeable (Typeable) -import Distribution.System (OS (Windows), Platform (Platform)) +import Distribution.System (OS (Windows, OtherOS), Platform (Platform)) import Path (Path, Abs, Dir, toFilePath, File, parseAbsFile) import Prelude -- Fix AMP warning import System.Directory (createDirectoryIfMissing, doesFileExist, getCurrentDirectory) @@ -108,6 +108,7 @@ mkEnvOverride platform tm' = do isWindows = case platform of Platform _ Windows -> True + Platform _ (OtherOS "windowsintegersimple") -> True _ -> False -- | Helper conversion function