recursion-ninja pushed to branch wip/26699 at Glasgow Haskell Compiler / GHC
Commits:
-
e4bfcc5b
by Recursion Ninja at 2026-01-27T23:03:59-05:00
1 changed file:
Changes:
| ... | ... | @@ -13,16 +13,16 @@ module GHC.Types.ImportLevel ( |
| 13 | 13 | |
| 14 | 14 | import GHC.Prelude
|
| 15 | 15 | |
| 16 | -import GHC.Utils.Outputable
|
|
| 17 | 16 | import GHC.Utils.Binary
|
| 17 | +import GHC.Utils.Outputable
|
|
| 18 | 18 | |
| 19 | 19 | import Language.Haskell.Syntax.ImpExp
|
| 20 | 20 | |
| 21 | 21 | import Data.Data
|
| 22 | 22 | |
| 23 | 23 | -- | ImportLevel
|
| 24 | - |
|
| 25 | -data ImportLevel = NormalLevel | SpliceLevel | QuoteLevel deriving (Eq, Ord, Data, Show, Enum, Bounded)
|
|
| 24 | +data ImportLevel = NormalLevel | SpliceLevel | QuoteLevel
|
|
| 25 | + deriving (Eq, Ord, Data, Show, Enum, Bounded)
|
|
| 26 | 26 | |
| 27 | 27 | instance Outputable ImportLevel where
|
| 28 | 28 | ppr NormalLevel = text "normal"
|
| ... | ... | @@ -32,7 +32,7 @@ instance Outputable ImportLevel where |
| 32 | 32 | deriving via (EnumBinary ImportLevel) instance Binary ImportLevel
|
| 33 | 33 | |
| 34 | 34 | allImportLevels :: [ImportLevel]
|
| 35 | -allImportLevels = [minBound..maxBound]
|
|
| 35 | +allImportLevels = [minBound .. maxBound]
|
|
| 36 | 36 | |
| 37 | 37 | convImportLevel :: ImportDeclLevelStyle -> ImportLevel
|
| 38 | 38 | convImportLevel (LevelStylePre level) = convImportLevelSpec level
|