git.iko.soy/rowtype-yoga/purescript-native
on golang help sign in
Make tests a bit easier to follow
4fbebffHarry Garrood
tests/Main.hs+10
@@ -172,9 +172,19 @@ assertDoesNotCompile inputFiles foreigns = do
172
172
173main :: IO ()
173main :: IO ()
174main = do
174main = do
175+ heading "Main compiler test suite"
175 testCompiler
176 testCompiler
177+ heading "psc-publish test suite"
176 testPscPublish
178 testPscPublish
177
179
180+ where
181+ heading msg = do
182+ putStrLn ""
183+ putStrLn $ replicate 79 '#'
184+ putStrLn $ "# " ++ msg
185+ putStrLn $ replicate 79 '#'
186+ putStrLn ""
187+
178testCompiler :: IO ()
188testCompiler :: IO ()
179testCompiler = do
189testCompiler = do
180 fetchSupportCode
190 fetchSupportCode