Programming exercises: Improve test build logs for Haskell exercises (#…

…9792)
ls1intum · Nov 24, 2024 · 9efdb06 · 9efdb06
1 parent bcaf561
commit 9efdb06
Showing 1 changed file with 7 additions and 5 deletions.
diff --git a/src/main/resources/templates/haskell/test/test/Test.hs b/src/main/resources/templates/haskell/test/test/Test.hs
@@ -5,7 +5,9 @@ import qualified Interface as Sub
 import qualified Solution as Sol
 
 import Test.Tasty
-import Test.Tasty.Runners.AntXML 
+import Test.Tasty.Ingredients (composeReporters)
+import Test.Tasty.Ingredients.Basic (consoleTestReporter)
+import Test.Tasty.Runners.AntXML
 import Test.SmallCheck.Series as SCS
 import Test.Tasty.SmallCheck as SC
 import Test.Tasty.QuickCheck as QC
@@ -69,12 +71,12 @@ main = do
   testRunner $ localOption timeoutOption tests
   where
     resultsPath = "test-reports/results.xml"
-#ifdef PROD 
-    -- on the server (production mode), run tests with xml output
-    testRunner = defaultMainWithIngredients [antXMLRunner]
+#ifdef PROD
+    -- on the server (production mode), run tests with additional xml output
+    testRunner = defaultMainWithIngredients [composeReporters antXMLRunner consoleTestReporter]
 #else
     -- locally, run tests with terminal output
     testRunner = defaultMain
-#endif    
+#endif
     -- by default, run for 1 second
     timeoutOption = mkTimeout (1 * 10^6)