Commit c79908c3 authored by Ben Gamari's avatar Ben Gamari 🐢

Fix cql patch for GHC 8.8

parent 8473f608
Pipeline #11565 failed with stages
in 174 minutes and 32 seconds
......@@ -89,7 +89,7 @@ index 7f8fa50..e0bcd47 100644
fn names = map (AppE (var "fromCql") . VarE) names
combine = do
names <- replicateM n (newName "x")
+#if MIN_VERSION_template_haskell(0,16,0)
+#if MIN_VERSION_template_haskell(2,16,0)
+ let f = NormalB $ TupE (map (Just . VarE) names)
+#else
let f = NormalB $ TupE (map VarE names)
......
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