mark this test as TODO by only emitting TAP in the parent process and checking its...

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 (file)
--- 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 (file)
--- 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