tests shouldn't produce anything other than tap

the harness can parse the tap to figure out whatever it needs from that

1 files changed, 18 insertions, 2 deletions

diff --git a/src/main/scala/org/perl8/test/harness/TAPReporter.scala b/src/main/scala/org/perl8/test/harness/TAPReporter.scala
index e478880..574dd39 100644
--- a/src/main/scala/org/perl8/test/harness/TAPReporter.scala
+++ b/src/main/scala/org/perl8/test/harness/TAPReporter.scala
@@ -1,9 +1,25 @@
 package org.perl8.test.harness
 
+import java.io.ByteArrayOutputStream
+
+import org.perl8.test.tap
 import org.perl8.test.Test
 import Utils._
 
 class TAPReporter extends Reporter {
-  def run (testName: String): Int =
-    newInstance[Test](testName).run
+  def run (testName: String): Int = {
+    val out = new ByteArrayOutputStream
+    Console.withOut(out) {
+      Console.withErr(out) {
+        newInstance[Test](testName).run
+      }
+    }
+
+    // XXX this is wrong: it sends everything to stdout
+    // need to write a tee-like outputstream to fix it
+    print(out)
+
+    val result = tap.Consumer.parse(out)
+    result.exitCode
+  }
 }