Wolfgang Jeltsch pushed to branch wip/jeltsch/base-buildable-with-ghc-9-14 at Glasgow Haskell Compiler / GHC

Commits:

1 changed file:

Changes:

  • libraries/base/src/System/IO.hs
    ... ... @@ -279,7 +279,11 @@ import GHC.IO.StdHandles
    279 279
                stdout,
    
    280 280
                stderr
    
    281 281
            )
    
    282
    +#if __GLASGOW_HASKELL__ < 1000
    
    283
    +import GHC.Internal.System.IO (fixIO)
    
    284
    +#else
    
    282 285
     import GHC.Internal.Control.Monad.Fix (fixIO)
    
    286
    +#endif
    
    283 287
     import Control.Monad (return, (>>=))
    
    284 288
     import Control.Exception (ioError)
    
    285 289
     import Data.Eq ((==))