diff options
| author | Alan Zimmerman <alan.zimm@gmail.com> | 2021-10-23 10:49:55 +0100 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-10-24 01:27:21 -0400 |
| commit | 691c450f1e9cc3fd83b662be3c0134fde03e97db (patch) | |
| tree | dff88e789b1af701542301d7303559b3585856e2 /compiler/GHC/Hs.hs | |
| parent | 3bab222c585343f8febe2a627d280b7be9401e92 (diff) | |
| download | haskell-691c450f1e9cc3fd83b662be3c0134fde03e97db.tar.gz | |
EPA: Use LocatedA for ModuleName
This allows us to use an Anchor with a DeltaPos in it when exact
printing.
Diffstat (limited to 'compiler/GHC/Hs.hs')
| -rw-r--r-- | compiler/GHC/Hs.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/Hs.hs b/compiler/GHC/Hs.hs index 0de279e597..fc50346b21 100644 --- a/compiler/GHC/Hs.hs +++ b/compiler/GHC/Hs.hs @@ -73,7 +73,7 @@ data HsModule hsmodLayout :: LayoutInfo, -- ^ Layout info for the module. -- For incomplete modules (e.g. the output of parseHeader), it is NoLayoutInfo. - hsmodName :: Maybe (Located ModuleName), + hsmodName :: Maybe (LocatedA ModuleName), -- ^ @Nothing@: \"module X where\" is omitted (in which case the next -- field is Nothing too) hsmodExports :: Maybe (LocatedL [LIE GhcPs]), |