diff --git a/tests/caasdriver.nim b/tests/caasdriver.nim
index 2de046a118..87360ed340 100644
--- a/tests/caasdriver.nim
+++ b/tests/caasdriver.nim
@@ -171,7 +171,7 @@ when isMainModule:
     verbose = false
 
   for i in 0..ParamCount() - 1:
-    let param = paramStr(i + 1)
+    let param = string(paramStr(i + 1))
     case param
     of "verbose": verbose = true
     else: filter = param
diff --git a/tests/tester.nim b/tests/tester.nim
index 8c8e31fe84..e10b897616 100644
--- a/tests/tester.nim
+++ b/tests/tester.nim
@@ -365,8 +365,9 @@ proc outputJSON(reject, compile, run: TResults) =
   writeFile(jsonFile, s)
 
 proc runCaasTests(r: var TResults) =
-  for test, output, status in caasTestsRunner():
-    r.addResult(test, "", output, if status: reSuccess else: reOutputsDiffer)
+  for test, output, status, mode in caasTestsRunner():
+    r.addResult(test, "", output & "-> " & $mode,
+                if status: reSuccess else: reOutputsDiffer)
 
 proc main() =
   os.putenv "NIMTEST_NO_COLOR", "1"