Fix benchmark compilation with ghc-9.0.1

Problem: for some reason ghc-9.0.1 is unable to compile benchmark code which is successfully compiled by older versions of ghc. Solution: provide explicit type annotations to help ghc compile this code, it appeared to be sufficient.
serokell · Nov 16, 2021 · c1c6837 · c1c6837
1 parent 38fbda7
commit c1c6837
Showing 1 changed file with 3 additions and 2 deletions.
diff --git a/benchmark/Main.hs b/benchmark/Main.hs
@@ -110,10 +110,11 @@ bgroupSuperComposition = bgroup "(...)"
                    ]
   ]
  where
+  super10 :: [()] -> Bool
   super10 = null
-        ... (: []) ... Unsafe.head ... pure ... Unsafe.head
+        ... ((: []) ... Unsafe.head ... pure ... Unsafe.head
         ... (: [(), (), (), ()]) ... Unsafe.head ... (: []) ... Unsafe.head
-        ... (: [()]) ... Unsafe.head ... (: [(), ()]) ... Unsafe.head
+        ... (: [()]) ... Unsafe.head ... (: [(), ()]) ... Unsafe.head :: [()] -> [()])
 
   norm10 = null
          . (: []) . Unsafe.head . pure . Unsafe.head