test-framework 0.2.1 → 0.2.2
raw patch · 2 files changed
+3/−3 lines, 2 files
Files
Test/Framework/Runners/Console.hs view
@@ -144,7 +144,7 @@ property_suceeded <- showImprovingTestResult (return ()) indent_level name progress_bar improving_result return $ updateTestStatistics (\count -> adjustTestCount test_type count mempty) property_suceeded test_statistics showRunTest indent_level test_statistics (RunTestGroup name tests) = do- putDoc $ indent indent_level (text name <> char ':' <> linebreak)+ putDoc $ (indent indent_level (text name <> char ':')) <> linebreak showRunTests (indent_level + 2) test_statistics tests showRunTests :: Int -> TestStatistics -> [RunTest] -> IO TestStatistics@@ -211,4 +211,4 @@ intermediate_str = show intermediate putTestHeader :: Int -> String -> Doc -> IO ()-putTestHeader indent_level test_name result = putDoc $ indent indent_level (text test_name <> char ':' <+> result) <> linebreak+putTestHeader indent_level test_name result = putDoc $ (indent indent_level (text test_name <> char ':' <+> result)) <> linebreak
test-framework.cabal view
@@ -1,5 +1,5 @@ Name: test-framework-Version: 0.2.1+Version: 0.2.2 Cabal-Version: >= 1.2.3 Category: Testing Synopsis: Framework for running and organising tests, with HUnit and QuickCheck support