Matthew Pickering pushed to branch wip/splice-imports-2025 at Glasgow Haskell Compiler / GHC Commits: 109a58bf by Matthew Pickering at 2025-04-16T19:21:28+01:00 missing files - - - - - 2 changed files: - + compiler/Language/Haskell/Syntax/ImpExp/ImportLevel.hs - + compiler/Language/Haskell/Syntax/ImpExp/IsBoot.hs Changes: ===================================== compiler/Language/Haskell/Syntax/ImpExp/ImportLevel.hs ===================================== @@ -0,0 +1,10 @@ +-- | A module to define 'ImportLevel' so it can be given an Outputable instance +-- without introducing module loops. +module Language.Haskell.Syntax.ImpExp.ImportLevel ( ImportLevel(..) ) where + + +import Prelude (Eq, Ord, Show, Enum) +import Data.Data (Data) + +data ImportLevel = NormalLevel | SpliceLevel | QuoteLevel deriving (Eq, Ord, Data, Show, Enum) + ===================================== compiler/Language/Haskell/Syntax/ImpExp/IsBoot.hs ===================================== @@ -0,0 +1,15 @@ +module Language.Haskell.Syntax.ImpExp.IsBoot ( IsBootInterface(..) ) where + +import Prelude (Eq, Ord, Show) +import Data.Data (Data) +import Control.DeepSeq (NFData(..), rwhnf) + +-- | Indicates whether a module name is referring to a boot interface (hs-boot +-- file) or regular module (hs file). We need to treat boot modules specially +-- when building compilation graphs, since they break cycles. Regular source +-- files and signature files are treated equivalently. +data IsBootInterface = NotBoot | IsBoot + deriving (Eq, Ord, Show, Data) + +instance NFData IsBootInterface where + rnf = rwhnf \ No newline at end of file View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/109a58bf52f76ffaefc12b73a7691062... -- View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/109a58bf52f76ffaefc12b73a7691062... You're receiving this email because of your account on gitlab.haskell.org.