@@ -77,7 +77,7 @@ assertDoesNotCompile preludeExterns inputFile = do
77 putStrLn $ "Assert " ++ inputFile ++ " does not compile"
77 putStrLn $ "Assert " ++ inputFile ++ " does not compile"
78 assert preludeExterns (P.defaultCompileOptions { P.optionsAdditional = P.CompileOptions "Tests" [] [] }) inputFile $ \e ->
78 assert preludeExterns (P.defaultCompileOptions { P.optionsAdditional = P.CompileOptions "Tests" [] [] }) inputFile $ \e ->
80− Left _ -> return Nothing
80+ Left err -> putStrLn err >> return Nothing
81 Right _ -> return $ Just "Should not have compiled"
81 Right _ -> return $ Just "Should not have compiled"
83findNodeProcess :: IO (Maybe String)
83findNodeProcess :: IO (Maybe String)