Wolfgang Jeltsch pushed to branch wip/jeltsch/base-buildable-with-ghc-9-14 at Glasgow Haskell Compiler / GHC Commits: 9175d5d8 by Wolfgang Jeltsch at 2026-05-19T21:06:17+03:00 Use `getFileHash` from `ghc-internal` on GHC 9.14 - - - - - 1 changed file: - libraries/base/src/GHC/Fingerprint.hs Changes: ===================================== libraries/base/src/GHC/Fingerprint.hs ===================================== @@ -1,3 +1,4 @@ +{-# LANGUAGE CPP #-} {-# LANGUAGE Safe #-} module GHC.Fingerprint ( @@ -10,6 +11,8 @@ module GHC.Fingerprint ( import GHC.Internal.Fingerprint +#if __GLASGOW_HASKELL__ >= 1000 + import Data.Function (($)) import Control.Monad (return, when) import Data.Bool (not, (&&)) @@ -51,3 +54,5 @@ getFileHash path = withBinaryFile path ReadMode $ \ hdl -> ) return (if isFinished then Just chunkSize else Nothing) in fingerprintBufferedStream readChunk + +#endif View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/9175d5d8928b8a80299dfdecdcdfc0bc... -- View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/9175d5d8928b8a80299dfdecdcdfc0bc... You're receiving this email because of your account on gitlab.haskell.org.