diff options
| author | Luite Stegeman <stegeman@gmail.com> | 2020-12-10 16:32:19 +0100 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2021-03-20 07:49:15 -0400 |
| commit | 26328a688183e3af49b5ac315b27afc2691bbc46 (patch) | |
| tree | 007b8105d2cabf52142cb8f5d7b790e888e42197 /compiler/GHC/IfaceToCore.hs | |
| parent | dd11f2d5e87ba83ca16510e3e1ac6c41c1df1647 (diff) | |
| download | haskell-26328a688183e3af49b5ac315b27afc2691bbc46.tar.gz | |
remove superfluous 'id' type parameter from GenTickish
The 'id' type is now determined by the pass, using the XTickishId
type family.
Diffstat (limited to 'compiler/GHC/IfaceToCore.hs')
| -rw-r--r-- | compiler/GHC/IfaceToCore.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/GHC/IfaceToCore.hs b/compiler/GHC/IfaceToCore.hs index 26694c1db4..71cbc26afc 100644 --- a/compiler/GHC/IfaceToCore.hs +++ b/compiler/GHC/IfaceToCore.hs @@ -1533,7 +1533,7 @@ tcIfaceExpr (IfaceTick tickish expr) = do return (Tick tickish' expr') ------------------------- -tcIfaceTickish :: IfaceTickish -> IfM lcl (Tickish Id) +tcIfaceTickish :: IfaceTickish -> IfM lcl Tickish tcIfaceTickish (IfaceHpcTick modl ix) = return (HpcTick modl ix) tcIfaceTickish (IfaceSCC cc tick push) = return (ProfNote cc tick push) tcIfaceTickish (IfaceSource src name) = return (SourceNote src name) |