Browse files

test and fix nested TAP

The nested TAP is not yet parsed perfectly
by TAP::Parser. Therefore our pragma +strict
triggers a FAIL of the test suite when nested
TAP is used via subtests.

To demonstrate the usage we now use pragma -strict
which is kind of a no-op.
  • Loading branch information...
1 parent 5656108 commit 54fa183319c90faeb0c3e2fd44343cb5827ac8f8 @renormalist committed Jun 1, 2012
Showing with 3 additions and 2 deletions.
  1. +3 −2 t/tap13.t
View
5 t/tap13.t
@@ -13,12 +13,13 @@ my $data = { affe => { tiger => 111,
ok(1, "hot stuff");
tap13_yaml($data);
-tap13_pragma "+strict";
+tap13_pragma "-strict"; # +strict does not work in TAP::Harness with the nested TAP yet
ok(1, "more hot stuff");
subtest 'An example subtest' => sub {
plan tests => 2;
-
pass("This is a subtest");
+ tap13_yaml($data);
+ tap13_pragma "-strict";
pass("So is this");
};

0 comments on commit 54fa183

Please sign in to comment.