Expr.Types: m upd: use TH.liftTyped

Anton-Latukha · Anton-Latukha · commit ea53439dd688 · 2021-07-06T17:48:03.000+03:00
In TH there was a transition, seems liftTyped works now for our project.
diff --git a/src/Nix/Expr/Types.hs b/src/Nix/Expr/Types.hs
@@ -507,7 +507,7 @@ instance TH.Lift NExpr where
           pure [| $(TH.lift b) |]
       )
 #if MIN_VERSION_template_haskell(2,17,0)
-  liftTyped = unsafeCodeCoerce . lift
+  liftTyped = TH.liftTyped
 #elif MIN_VERSION_template_haskell(2,16,0)
   liftTyped = TH.unsafeTExpCoerce . TH.lift
 #endif

Original file line number	Diff line number	Diff line change
`@@ -507,7 +507,7 @@ instance TH.Lift NExpr where`
`507`	`507`	`pure [\| $(TH.lift b) \|]`
`508`	`508`	`)`
`509`	`509`	`#if MIN_VERSION_template_haskell(2,17,0)`
`510`		`- liftTyped = unsafeCodeCoerce . lift`
	`510`	`+ liftTyped = TH.liftTyped`
`511`	`511`	`#elif MIN_VERSION_template_haskell(2,16,0)`
`512`	`512`	`liftTyped = TH.unsafeTExpCoerce . TH.lift`
`513`	`513`	`#endif`