Skip to content

Commit 0c8b72a

Browse files
authored
Fix CPP on Instances.TH.Lift import (#931)
This prevents a build error with GHC 8.10.1 and 8.10.2 which bundle text-1.2.3.2: src/Nix/Expr/Types.hs:497:21: error: • Could not deduce (TH.Lift Text) arising from a use of ‘TH.lift’ from the context: Data b bound by a type expected by the context: forall b. Data b => b -> Maybe (TH.Q TH.Exp) at src/Nix/Expr/Types.hs:(490,7)-(498,7) or from: b ~ Text bound by a pattern with constructor: HRefl :: forall k1 (a :: k1). a :~~: a, in a pattern binding in a 'do' block at src/Nix/Expr/Types.hs:493:11-15 • In the expression: TH.lift b In the first argument of ‘pure’, namely ‘[| $(TH.lift b) |] pending(rn) [<splice, TH.lift b>]’ In a stmt of a 'do' block: pure [| $(TH.lift b) |] pending(rn) [<splice, TH.lift b>] | 497 | pure [| $(TH.lift b) |] | ^^^^^^^^^
1 parent 8c02b73 commit 0c8b72a

File tree

1 file changed

+1
-1
lines changed

1 file changed

+1
-1
lines changed

src/Nix/Expr/Types.hs

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -54,7 +54,7 @@ import Text.Read.Deriving
5454
import Text.Show.Deriving
5555
import qualified Type.Reflection as Reflection
5656
import Type.Reflection ( eqTypeRep )
57-
#if !MIN_VERSION_base(4,13,0)
57+
#if !MIN_VERSION_text(1,2,4)
5858
-- NOTE: Remove package @th-lift-instances@ removing this
5959
import Instances.TH.Lift () -- importing Lift Text fo GHC 8.6
6060
#endif

0 commit comments

Comments
 (0)