git.iko.soy/rowtype-yoga/purescript-native
on golang help sign in
Fix tests
b6fe164Phil Freeman
tests/Main.hs+1−1
compare with golang
unifiedsplit
@@ -104,7 +104,7 @@ readInput inputFiles = forM inputFiles $ \inputFile -> do
104type TestM = WriterT [(FilePath, String)] IO
104type TestM = WriterT [(FilePath, String)] IO
105
105
106runTest :: P.Make a -> IO (Either P.MultipleErrors a)
106runTest :: P.Make a -> IO (Either P.MultipleErrors a)
107−runTest = fmap (fmap fst) . P.runMake P.defaultOptions
107+runTest = fmap fst . P.runMake P.defaultOptions
108
108
109compile :: [FilePath] -> M.Map P.ModuleName FilePath -> IO (Either P.MultipleErrors P.Environment)
109compile :: [FilePath] -> M.Map P.ModuleName FilePath -> IO (Either P.MultipleErrors P.Environment)
110compile inputFiles foreigns = runTest $ do
110compile inputFiles foreigns = runTest $ do