From d103327785c10b5c538e4eb8b81007d22c39f4ed Mon Sep 17 00:00:00 2001 From: Jesse Luehrs Date: Thu, 28 Feb 2013 09:45:53 -0600 Subject: test for explicit plans with TestMore --- src/test/scala/org/perl8/test/PlanTest.scala | 29 ++++++++++++++++++++++++++++ 1 file changed, 29 insertions(+) create mode 100644 src/test/scala/org/perl8/test/PlanTest.scala (limited to 'src') diff --git a/src/test/scala/org/perl8/test/PlanTest.scala b/src/test/scala/org/perl8/test/PlanTest.scala new file mode 100644 index 0000000..e467c2f --- /dev/null +++ b/src/test/scala/org/perl8/test/PlanTest.scala @@ -0,0 +1,29 @@ +package org.perl8.test + +import java.io.ByteArrayOutputStream + +import org.perl8.test.tap.Parser + +class PlanTest extends TestMore { + private class PlanTestTest extends TestMore(2) { + is(1, 1) + is(2, 2) + } + + val out = new ByteArrayOutputStream + val exitCode = Console.withOut(out) { + Console.withErr(out) { + (new PlanTestTest).run + } + } + + is((new Parser).parse(out).exitCode, 0) + is(exitCode, 0) + + val tap = + "1..2\n" + + "ok 1\n" + + "ok 2\n" + + is(out.toString, tap) +} -- cgit v1.2.3-54-g00ecf