on master help sign in
Type-safe identifiers in tests
3c8f310Jasper Van der Jeugt
tests/TestSuite/Util.hs+2−2
@@ -33,9 +33,9 @@ makeStoreTest = makeStore "_store"
33-- | Testing for 'runCompilerJob'
33-- | Testing for 'runCompilerJob'
34--
34--
35runCompilerJobTest :: Compiler () a
35runCompilerJobTest :: Compiler () a
36− -> Identifier
36+ -> Identifier ()
37 -> ResourceProvider
37 -> ResourceProvider
38− -> [Identifier]
38+ -> [Identifier ()]
39 -> IO a
39 -> IO a
40runCompilerJobTest compiler id' provider uni = do
40runCompilerJobTest compiler id' provider uni = do
41 store <- makeStoreTest
41 store <- makeStoreTest