summaryrefslogtreecommitdiff
path: root/libraries/template-haskell/Language
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2020-12-15 11:21:06 -0500
committerBen Gamari <ben@smart-cactus.org>2020-12-15 11:21:06 -0500
commit331f556886e611af3d2633d1cebb868574a2aa13 (patch)
treecc38fae1d51227ca86677435aaee311c2e6bbbe0 /libraries/template-haskell/Language
parent535dae66271af0ce4ab9c0a772614b700bc4c92a (diff)
downloadhaskell-331f556886e611af3d2633d1cebb868574a2aa13.tar.gz
Revert "Implement BoxedRep proposal"
This was inadvertently merged. This reverts commit 6c2eb2232b39ff4720fda0a4a009fb6afbc9dcea.
Diffstat (limited to 'libraries/template-haskell/Language')
-rw-r--r--libraries/template-haskell/Language/Haskell/TH/Syntax.hs8
1 files changed, 0 insertions, 8 deletions
diff --git a/libraries/template-haskell/Language/Haskell/TH/Syntax.hs b/libraries/template-haskell/Language/Haskell/TH/Syntax.hs
index c7d5c81c68..a3104ed684 100644
--- a/libraries/template-haskell/Language/Haskell/TH/Syntax.hs
+++ b/libraries/template-haskell/Language/Haskell/TH/Syntax.hs
@@ -61,10 +61,6 @@ import Foreign.ForeignPtr
import Foreign.C.String
import Foreign.C.Types
-#if __GLASGOW_HASKELL__ >= 901
-import GHC.Types ( Levity(..) )
-#endif
-
-----------------------------------------------------
--
-- The Quasi class
@@ -820,11 +816,7 @@ class Lift (t :: TYPE r) where
-- | Turn a value into a Template Haskell expression, suitable for use in
-- a splice.
lift :: Quote m => t -> m Exp
-#if __GLASGOW_HASKELL__ >= 901
- default lift :: (r ~ ('BoxedRep 'Lifted), Quote m) => t -> m Exp
-#else
default lift :: (r ~ 'LiftedRep, Quote m) => t -> m Exp
-#endif
lift = unTypeCode . liftTyped
-- | Turn a value into a Template Haskell typed expression, suitable for use