# New Ticket Created by Jerry Gay
# Please include the string: [perl #41224]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=41224 >
in perl 5, the following:
#!perl
use strict;
use warnings;
use Test::Builder;
my $t= Test::Builder->new;
$t->plan(tests=>1);
$t->skip('skipping', 1);
yields:
1..1
ok 1 # skip skipping
while the pir equivalent:
.sub main
load_bytecode 'Test/Builder.pir'
.local pmc test
test = new 'Test::Builder'
test.'plan'(1)
test.'skip'(1,'skipping')
.end
yields:
1..1
not ok 1 #skip skipping
perl reports 'ok', while parrot reports 'not ok.' i expect the
implementations to match behavior. but which behavior is correct? i'm
leaning towards perl's, since that module has been around for ages,
and has been used to test countless numbers of modules in production.
~jerry