summaryrefslogtreecommitdiff
path: root/src/Run.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Run.hs')
-rw-r--r--src/Run.hs4
1 files changed, 4 insertions, 0 deletions
diff --git a/src/Run.hs b/src/Run.hs
index 7e61c1f..1d637d3 100644
--- a/src/Run.hs
+++ b/src/Run.hs
@@ -75,6 +75,8 @@ data SingleTestReport = SingleTestReport
{ reportTestName :: TestName
, reportTestFailed :: Maybe Failed
, reportTime :: Scientific
+ , reportOutput :: Text
+ , reportOutputError :: Text
}
runTests :: Output -> TestOptions -> GlobalDefs -> [ Test ] -> IO Report
@@ -187,6 +189,8 @@ runTest out opts gdefs test = do
( res, [] ) <- takeMVar testRunResult
reportTime <- getElapsedTime out
+ reportOutput <- collectOutput out
+ reportOutputError <- collectErrorOutput out
void $ installHandler processStatusChanged oldHandler Nothing