diff options
| author | Richard Eisenberg <rae@richarde.dev> | 2020-09-04 17:27:00 -0400 |
|---|---|---|
| committer | Richard Eisenberg <rae@richarde.dev> | 2020-09-04 17:27:00 -0400 |
| commit | 025c8c92060d8fc6aa9723302b5e7b250735151b (patch) | |
| tree | 7c182fc115fd999696279070937e387c74b283c5 /compiler/GHC/Iface/Syntax.hs | |
| parent | c1e54439be3d38a1f972ac772cca7eec5e1519a9 (diff) | |
| download | haskell-wip/no-iface-tuple-ty.tar.gz | |
Remove IfaceTupleTy.wip/no-iface-tuple-ty
It seemed to be serving no purpose, so I removed it.
Still to do: remove tcTupleTyCon, but that will be much
easier after !3954.
Diffstat (limited to 'compiler/GHC/Iface/Syntax.hs')
| -rw-r--r-- | compiler/GHC/Iface/Syntax.hs | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/compiler/GHC/Iface/Syntax.hs b/compiler/GHC/Iface/Syntax.hs index bd576b26cf..2bdbb8ac1b 100644 --- a/compiler/GHC/Iface/Syntax.hs +++ b/compiler/GHC/Iface/Syntax.hs @@ -1638,7 +1638,6 @@ freeNamesIfType (IfaceFreeTyVar _) = emptyNameSet freeNamesIfType (IfaceTyVar _) = emptyNameSet freeNamesIfType (IfaceAppTy s t) = freeNamesIfType s &&& freeNamesIfAppArgs t freeNamesIfType (IfaceTyConApp tc ts) = freeNamesIfTc tc &&& freeNamesIfAppArgs ts -freeNamesIfType (IfaceTupleTy _ _ ts) = freeNamesIfAppArgs ts freeNamesIfType (IfaceLitTy _) = emptyNameSet freeNamesIfType (IfaceForAllTy tv t) = freeNamesIfVarBndr tv &&& freeNamesIfType t freeNamesIfType (IfaceFunTy _ w s t) = freeNamesIfType s &&& freeNamesIfType t &&& freeNamesIfType w |