diff options
Diffstat (limited to 'compiler/GHC/Utils/Binary/Typeable.hs')
| -rw-r--r-- | compiler/GHC/Utils/Binary/Typeable.hs | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/compiler/GHC/Utils/Binary/Typeable.hs b/compiler/GHC/Utils/Binary/Typeable.hs index c5b89bf35a..735e4e3989 100644 --- a/compiler/GHC/Utils/Binary/Typeable.hs +++ b/compiler/GHC/Utils/Binary/Typeable.hs @@ -128,10 +128,8 @@ instance Binary RuntimeRep where put_ bh Word8Rep = putByte bh 13 put_ bh Int16Rep = putByte bh 14 put_ bh Word16Rep = putByte bh 15 -#if __GLASGOW_HASKELL__ >= 809 put_ bh Int32Rep = putByte bh 16 put_ bh Word32Rep = putByte bh 17 -#endif get bh = do tag <- getByte bh @@ -152,10 +150,8 @@ instance Binary RuntimeRep where 13 -> pure Word8Rep 14 -> pure Int16Rep 15 -> pure Word16Rep -#if __GLASGOW_HASKELL__ >= 809 16 -> pure Int32Rep 17 -> pure Word32Rep -#endif _ -> fail "Binary.putRuntimeRep: invalid tag" instance Binary KindRep where |