diff options
| -rw-r--r-- | compiler/GHC/Iface/Ext/Types.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/compiler/GHC/Iface/Ext/Types.hs b/compiler/GHC/Iface/Ext/Types.hs index 73a4012f23..a0a8a41ece 100644 --- a/compiler/GHC/Iface/Ext/Types.hs +++ b/compiler/GHC/Iface/Ext/Types.hs @@ -155,6 +155,7 @@ type HieTypeFlat = HieType TypeIndex -- | Roughly isomorphic to the original core 'Type'. newtype HieTypeFix = Roll (HieType (HieTypeFix)) + deriving Eq instance Binary (HieType TypeIndex) where put_ bh (HTyVarTy n) = do |