Commit 6d3cb9fd authored by Andrew Martin's avatar Andrew Martin Committed by Ben Gamari
Browse files

Bump GHC version in ifdefs to 901

parent a005d5ca
......@@ -110,7 +110,7 @@ import Numeric.Natural
import qualified Data.Fixed as Fixed
#if __GLASGOW_HASKELL__ >= 811
#if __GLASGOW_HASKELL__ >= 901
import GHC.Exts (Levity(Lifted,Unlifted))
#endif
......@@ -889,7 +889,7 @@ instance Binary RuntimeRep where
put (VecRep a b) = putWord8 0 >> put a >> put b
put (TupleRep reps) = putWord8 1 >> put reps
put (SumRep reps) = putWord8 2 >> put reps
#if __GLASGOW_HASKELL__ >= 811
#if __GLASGOW_HASKELL__ >= 901
put (BoxedRep Lifted) = putWord8 3
put (BoxedRep Unlifted) = putWord8 4
#else
......@@ -920,7 +920,7 @@ instance Binary RuntimeRep where
0 -> VecRep <$> get <*> get
1 -> TupleRep <$> get
2 -> SumRep <$> get
#if __GLASGOW_HASKELL__ >= 811
#if __GLASGOW_HASKELL__ >= 901
3 -> pure (BoxedRep Lifted)
4 -> pure (BoxedRep Unlifted)
#else
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment