Permalink
Browse files

niecza unfudges

  • Loading branch information...
1 parent 58c1a6a commit b6cb10e85d6319b83ab3c02140350dd7b10e5cad @moritz moritz committed Feb 23, 2011
@@ -63,7 +63,6 @@ is(+Bool::False, '0', 'False numifies to 0');
# Arithmetic operations
my $bool = Bool::False;
-#?niecza 4 skip "Bool.succ and Bool.pred"
is(++$bool, Bool::True, 'Increment of Bool::False produces Bool::True');
is(++$bool, Bool::True, 'Increment of Bool::True still produces Bool::True');
is(--$bool, Bool::False, 'Decrement of Bool::True produces Bool::False');
@@ -39,7 +39,6 @@ my $o = CT.new;
is CT.foo_priv, 'one', 'back (private class method)';
}
-#?niecza skip 'notdef'
ok foo().notdef, 'contextual $*VAR is undefined';
{
@@ -76,7 +76,6 @@ plan 9;
}
# RT #73400
-#?niecza skip '\\'
{
my $capture = \[1,2,3];
my $count = 0;
View
@@ -108,7 +108,6 @@ if (Mu) { flunk('if (Mu) {} failed'); } else { pass('if (Mu) {} works'); }
is($flag, 2, "'my' variable within 'if' conditional");
}
-#?niecza skip "eval_dies_ok unimplemented"
{
eval_dies_ok('if 1; 2', '"if" requires a block');
}
@@ -163,7 +162,6 @@ if (Mu) { flunk('if (Mu) {} failed'); } else { pass('if (Mu) {} works'); }
}
-#?niecza skip "eval_dies unimplemented"
# L<S04/Statement parsing/keywords require whitespace>
eval_dies_ok('if($x > 1) {}','keyword needs at least one whitespace after it');
View
@@ -146,7 +146,6 @@ Check that C<next> works on the correct loop/block
is($i, 2, '$i++ executed only twice, because next ')
}
-#?niecza skip '%'
{
my $i = 0;
my $j;
@@ -15,7 +15,6 @@ plan 12;
is $y, 5, '$y assigned in if\'s body';
}
-#?niecza skip 'unless'
{
my $y;
unless (my $x = 2) != 2 {
@@ -54,7 +53,6 @@ plan 12;
is $y, 5, '$y assigned in for\'s body';
}
-#?niecza skip 'loop'
{
my $y;
loop (my $x = 2; $x < 10; $x++) {
View
@@ -6,15 +6,13 @@ nok ?'', "?'' is false";
isa_ok ?'', Bool, "?'' is Bool";
ok ?'hello', "?'hello' is true";
isa_ok ?'hello', Bool, "?'hello' is Bool";
-#?niecza skip '"0" should be False (issue 38)'
nok ?'0', "?'0' is false";
isa_ok ?'0', Bool, "?'0' is Bool";
nok ''.Bool, "''.Bool is false";
isa_ok ''.Bool, Bool, "''.Bool is Bool";
ok 'hello'.Bool, "'hello'.Bool is true";
isa_ok 'hello'.Bool, Bool, "'hello'.Bool is Bool";
-#?niecza skip '"0" should be False (issue 38)'
nok '0'.Bool, "'0'.Bool is false";
isa_ok '0'.Bool, Bool, "'0'.Bool is Bool";

0 comments on commit b6cb10e

Please sign in to comment.