From: Karen Etheridge Date: Fri, 24 Apr 2015 03:05:18 +0000 (-0700) Subject: mark this test as TODO by only emitting TAP in the parent process and checking its... X-Git-Tag: v0.14~1 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=p5sagit%2FSub-Name.git;a=commitdiff_plain;h=79187d26566e22a0d60641ce82a9c91b86bec3ac mark this test as TODO by only emitting TAP in the parent process and checking its exit code e.g. see http://www.cpantesters.org/cpan/report/a52bd872-d91a-11e4-a1a0-19a71cfc4ee8 http://www.cpantesters.org/cpan/report/0297dcc2-d91b-11e4-a813-88b91cfc4ee8 http://www.cpantesters.org/cpan/report/5f963e46-d91b-11e4-8ca3-8c461bfc4ee8 http://www.cpantesters.org/cpan/report/6761f396-d91f-11e4-87a0-68861bfc4ee8 http://www.cpantesters.org/cpan/report/c4c487ba-d91f-11e4-b12a-1a981bfc4ee8 http://www.cpantesters.org/cpan/report/a9e7c43a-d919-11e4-b72b-0d661cfc4ee8 http://www.cpantesters.org/cpan/report/d30153bc-d91f-11e4-9e1d-399d1bfc4ee8 http://www.cpantesters.org/cpan/report/380cebec-d928-11e4-b4d7-73321cfc4ee8 http://www.cpantesters.org/cpan/report/4acfd77a-d91a-11e4-8b9d-b4961cfc4ee8 --- diff --git a/Changes b/Changes index 91afce1..ed25830 100644 --- a/Changes +++ b/Changes @@ -2,6 +2,8 @@ Revision history for Sub-Name {{$NEXT}} - remove mandatory dependencies for optional test + - mark the test with B::C as TODO, as it seems to fail frequently and + should not block normal installations 0.13 2015-03-28 06:27:23Z - fix optional test of interaction with B::C that sometimes invalidly diff --git a/t/RT96893_perlcc.t b/t/RT96893_perlcc.t index 1c5b3db..6a35357 100644 --- a/t/RT96893_perlcc.t +++ b/t/RT96893_perlcc.t @@ -18,10 +18,13 @@ plan tests => 1; my $f = "t/rt96893x.pl"; open my $fh, ">", $f; END { unlink $f if $f } -print $fh 'use Sub::Name; subname("main::bar", sub{42}); print "ok 1\n";'; +print $fh 'use Sub::Name; subname("main::bar", sub{42}); print "# successfully ran subname() with perlcc\n";'; close $fh; system($^X, qw(-Mblib -S perlcc -O3 -UCarp -UConfig -r), $f); +local $TODO = 'experimental, for informational purposes only'; +is($? >> 8, 0, 'executable completed successfully'); + unlink "t/rt96893x", "t/rt96893x.exe"; # vim: ft=perl