niecza (auto)unfudge

S02-literals/string-interpolation.t

@@ -29,7 +29,6 @@ plan 12;
     is "{}", '', 'Interpolating an empty block is cool';
 }
 
-#?niecza skip 'Parcel.max'
 {
     my $rt65538_in = qq[line { (1,2,3).min }
 line 2

S02-types/pair.t

@@ -280,7 +280,6 @@ Note, "non-chaining binary" was later renamed to "structural infix".
 ##  something in S06.  --pmichaud
 # L<S06/Named arguments/In other words :$when is shorthand for :when($when)>
 #
-#?niecza skip "eqv NYI for Pair"
 {
     my $item = 'bar';
     my $pair = (:$item);

S02-types/range.t

@@ -153,7 +153,6 @@ is(+(6..8), 3, 'numification');
     is((1..8)[1,3], [2,4], 'postcircumfix:<[ ]> on range works');
 }
 
-#?niecza skip 'Undeclared routine "pick"'
 {
     my @b = pick(*, 1..100);
     is @b.elems, 100, "pick(*, 1..100) returns the correct number of elements";
@@ -181,7 +180,6 @@ is(+(6..8), 3, 'numification');
     is pick("25", 1..100).elems, 25, "pick works Str arguments";
 }
 
-#?niecza skip 'Undeclared routine "pick"'
 {
     my @b = pick(*, 'b' .. 'y');
     is @b.elems, 24, "pick(*, 'b' .. 'y') returns the correct number of elements";
@@ -209,7 +207,6 @@ is(+(6..8), 3, 'numification');
     is pick("10", 'b' .. 'y').elems, 10, "pick works Str arguments";
 }
 
-#?niecza skip 'Undeclared routine "roll"'
 {
     my @b = roll(100, 1..100);
     is @b.elems, 100, "roll(100, 1..100) returns the correct number of elements";
@@ -236,7 +233,6 @@ is(+(6..8), 3, 'numification');
     is roll("25", 1..100).elems, 25, "roll works Str arguments";
 }
 
-#?niecza skip 'Undeclared routine "roll"'
 {
     my @b = roll(100, 'b' .. 'y');
     is @b.elems, 100, "roll(100, 'b' .. 'y') returns the correct number of elements";

S02-types/type.t

@@ -44,7 +44,7 @@ my Str $bar;
 
 # L<S02/Variables Containing Undefined Values/Variables with native types do not support undefinedness>
 #?rakudo skip 'native types (causes false positives if marked with todo)'
-#?niecza skip 'native types'
+#?niecza skip 'native types (noauto)'
 {
     eval_lives_ok('my int $alpha = 1',    'Has native type int');
     eval_dies_ok('my int $alpha = Nil', 'native int type cannot be undefined');
@@ -160,7 +160,6 @@ dies_ok { my Num $n; $n = 42; }, 'Num does not accept Int';
     ok List !~~ Array, 'A Seq is not an Array';
     #?niecza skip 'Expecting a term'
     ok Seq ~~ Positional, 'A Seq does Positional';
-    #?niecza skip 'Expecting a term'
     ok Array ~~ Positional, 'Array does Positional too';
 }
 

S02-types/whatever.t

@@ -77,11 +77,9 @@ isa_ok (1..*-1)(10), Range, '(1..*-1)(10) is a Range';
 
     # following is what we expect +* to do
     my @list = <1 10 2 3>;
-    #?niecza skip 'Use of uninitialized value in string context'
     is sort(-> $key {+$key}, @list), [1,2,3,10], '-> $key {+$key} generates closure to numify';
 
     # and here are two actual applications of +*
-    #?niecza skip 'Use of uninitialized value in string context'
     is sort($x, @list), [1,2,3,10], '+* generates closure to numify';
     is @list.sort($x), [1,2,3,10], '+* generates closure to numify';
 

S03-operators/autoincrement-range.t

@@ -132,7 +132,7 @@ my $x;
     is( --$x, "A\x[5ea]", "'B\x[5d0]'-- is 'A\x[5ea]'" );
     $x = "\x[5d0]ZZ";
     #?rakudo todo 'Hebrew'
-    #?niecza skip "Magical string decrement underflowed"
+    #?niecza todo "Magical string decrement underflowed"
     is( ++$x, "\x[5d1]AA", "'\x[5d0]ZZ'++ is '\x[5d1]AA'" );
     $x = "\x[5d1]AA";
     #?rakudo todo 'Hebrew'

S03-operators/range.t

@@ -243,7 +243,7 @@ is (1..6 Z 'a' .. 'c').join, '1a2b3c',   'Ranges and infix:<Z>';
 }
 
 # RT #82620
-#?niecza skip 'trans NYI'
+#?niecza todo 'trans NYI'
 {
     lives_ok {("a".."b").map({.trans(""=>"")}).perl},
         "range doesn't leak Parrot types";

S04-statements/for.t

@@ -381,7 +381,7 @@ eval_dies_ok('for(0..5) { }','keyword needs at least one whitespace after it');
 }
 
 #?rakudo skip 'optional variable in for loop (RT #63994)'
-#?niecza 2 skip 'NYI'
+#?niecza 2 todo 'NYI'
 {
   my $str = '';
   for 1..5 -> $x, $y? {

S05-mass/rx.t

@@ -2236,7 +2236,6 @@ ok "abc\ndef\n-==\nghi" ~~ /a<!wb>/, '\w\w nonword boundary';
 #### \-<!wb>			abc\ndef\n-==\nghi	y	\W\W nonword boundary
 ok "abc\ndef\n-==\nghi" ~~ /\-<!wb>/, '\W\W nonword boundary';
 
-#?niecza 3 skip "Unable to resolve method upper in class Cursor"
 
 #### <upper>		\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij	/mob<upper>: <A @ 45>/		<upper>
 ok ('\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij' ~~ /<upper>/) && matchcheck($/, q/mob<upper>: <A @ 45>/), '<upper>';
@@ -2247,7 +2246,6 @@ ok ('\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij' ~~ /
 #### <+upper>+	\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij	/mob: <ABCDEFGHIJ @ 45>/	<+upper>+
 ok ('\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij' ~~ /<+upper>+/) && matchcheck($/, q/mob: <ABCDEFGHIJ @ 45>/), '<+upper>+';
 
-#?niecza 3 skip "Unable to resolve method lower in class Cursor"
 
 #### <lower>		\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij	/mob<lower>: <a @ 55>/		<lower>
 ok ('\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij' ~~ /<lower>/) && matchcheck($/, q/mob<lower>: <a @ 55>/), '<lower>';
@@ -2267,7 +2265,6 @@ ok ('\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij' ~~ /
 #### <+alpha>+	\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij	/mob: <ABCDEFGHIJabcdefghij @ 45>/	<+alpha>+
 ok ('\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij' ~~ /<+alpha>+/) && matchcheck($/, q/mob: <ABCDEFGHIJabcdefghij @ 45>/), '<+alpha>+';
 
-#?niecza 3 skip "Unable to resolve method digit in class Cursor"
 
 #### <digit>		\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij	/mob<digit>: <0 @ 35>/		<digit>
 ok ('\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij' ~~ /<digit>/) && matchcheck($/, q/mob<digit>: <0 @ 35>/), '<digit>';
@@ -2278,7 +2275,6 @@ ok ('\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij' ~~ /
 #### <+digit>+	\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij	/mob: <0123456789 @ 35>/	<+digit>+
 ok ('\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij' ~~ /<+digit>+/) && matchcheck($/, q/mob: <0123456789 @ 35>/), '<+digit>+';
 
-#?niecza 3 skip "Unable to resolve method xdigit in class Cursor"
 
 #### <xdigit>	\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij	/mob<xdigit>: <0 @ 35>/		<xdigit>
 ok ('\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij' ~~ /<xdigit>/) && matchcheck($/, q/mob<xdigit>: <0 @ 35>/), '<xdigit>';
@@ -2289,7 +2285,6 @@ ok ('\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij' ~~ /
 #### <+xdigit>+	\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij	/mob: <0123456789ABCDEF @ 35>/	<+xdigit>+
 ok ('\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij' ~~ /<+xdigit>+/) && matchcheck($/, q/mob: <0123456789ABCDEF @ 35>/), '<+xdigit>+';
 
-#?niecza 3 skip "Unable to resolve method space in class Cursor"
 
 #### <space>		\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij	/mob<space>: <\t @ 0>/		<space>
 ok ('\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij' ~~ /<space>/) && matchcheck($/, q/mob<space>: <\t @ 0>/), '<space>';
@@ -2300,7 +2295,6 @@ ok ('\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij' ~~ /
 #### <+space>+	\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij	/mob: <\t\n\r  @ 0>/		<+space>+
 ok ('\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij' ~~ /<+space>+/) && matchcheck($/, q/mob: <\t\n\r  @ 0>/), '<+space>+';
 
-#?niecza 3 skip "Unable to resolve method blank in class Cursor"
 
 #### <blank>		\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij	/mob<blank>: <\t @ 0>/		<blank>
 ok ('\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij' ~~ /<blank>/) && matchcheck($/, q/mob<blank>: <\t @ 0>/), '<blank>';
@@ -2311,7 +2305,7 @@ ok ('\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij' ~~ /
 #### <+blank>+	\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij	/mob: <\t @ 0>/			<+blank>+
 ok ('\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij' ~~ /<+blank>+/) && matchcheck($/, q/mob: <\t @ 0>/), '<+blank>+';
 
-#?niecza 3 skip "Unable to resolve method cntrl in class Cursor"
+#?niecza 3 todo "Unable to resolve method cntrl in class Cursor"
 
 #### <cntrl>		\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij	/mob<cntrl>: <\t @ 0>/		<cntrl>
 #?rakudo todo '<cntrl>'
@@ -2325,7 +2319,6 @@ ok ('\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij' ~~ /
 #?rakudo todo '<cntrl>'
 ok ('\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij' ~~ /<+cntrl>+/) && matchcheck($/, q/mob: <\t\n\r @ 0>/), '<+cntrl>+';
 
-#?niecza 3 skip "Unable to resolve method punct in class Cursor"
 
 #### <punct>		\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij	/mob<punct>: <! @ 4>/		<punct>
 ok ('\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij' ~~ /<punct>/) && matchcheck($/, q/mob<punct>: <! @ 4>/), '<punct>';
@@ -2336,7 +2329,6 @@ ok ('\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij' ~~ /
 #### <+punct>+	\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij	/mob: <!"#$%&/		<+punct>+
 ok ('\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij' ~~ /<+punct>+/) && matchcheck($/, q/mob: <!"#$%&/), '<+punct>+';
 
-#?niecza 4 skip "Unable to resolve method alnum in class Cursor"
 
 #### <alnum>		\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij	/mob<alnum>: <0 @ 35>/		<alnum>
 ok ('\t\n\r !"#$%&\'()*+,-./:;<=>?@[\]^`_{|}0123456789ABCDEFGHIJabcdefghij' ~~ /<alnum>/) && matchcheck($/, q/mob<alnum>: <0 @ 35>/), '<alnum>';
@@ -2377,23 +2369,19 @@ ok 'caad' !~~ /^<-[ab]+[cd]>+$/, 'enumerated character classes variant';
 ok 'ccdd' ~~ /<-  [ a  b ]+[cd]>+/, 'whitespace is ignored within square brackets and after the initial -';
 
 #### ^<-upper>dent	ident_1				y	inverted character class
-#?niecza skip "Unable to resolve method upper in class Cursor"
 ok 'ident_1' ~~ /^<-upper>dent/, 'inverted character class';
 
 #### ^<-upper>dent	Ident_1				n	inverted character class
-#?niecza skip "Unable to resolve method upper in class Cursor"
 ok 'Ident_1' !~~ /^<-upper>dent/, 'inverted character class';
 
 #### <+alpha-[Jj]>+	abc				y	character class with no j
-#?niecza skip "Unable to resolve method alpha in class Cursor"
 ok 'abc' ~~ /<+alpha-[Jj]>+/, 'character class with no j';
 
 #### <+ alpha - [ Jj ]>	abc			y	character class with no j with ws
 #?niecza skip "Unable to resolve method alpha in class Cursor"
 ok 'abc' ~~ /<+ alpha - [ Jj ]>/, 'character class with no j with ws';
 
 #### ^<+alpha-[Jj]>+$	aJc			n	character class with no j fail
-#?niecza skip "Unable to resolve method alpha in class Cursor"
 ok 'aJc' !~~ /^<+alpha-[Jj]>+$/, 'character class with no j fail';
 
 

S06-operator-overloading/sub.t

@@ -310,7 +310,6 @@ Testing operator overloading subroutines
     is $frew, 5, 'infix redefinition of += works';
 }
 
-#?niecza skip 'No matching candidates to dispatch for &infix:<+>'
 {
     class MMDTestType {
         has $.a is rw;
@@ -385,7 +384,6 @@ Testing operator overloading subroutines
 # RT #65638
 {
     is eval('sub infix:<,>($a, $b) { 42 }; 5, 5'), 42, 'infix:<,>($a, $b)';
-    #?niecza skip 'Action method post_constraint not yet implemented'
     is eval('sub infix:<,>(Int $x where 1, Int $y where 1) { 42 }; 1, 1'), 42,
        'very specific infix:<,>';
     #?rakudo todo 'RT 65638'

S06-signature/named-parameters.t

@@ -264,7 +264,6 @@ eval_dies_ok 'sub svn28865( :$a, :@a ) {}',
 
 # L<S06/Named parameters/Bindings happen in declaration order>
 #?rakudo skip 'where constraints'
-#?niecza skip "Action method post_constraint not yet implemented"
 {
     my $t = '';
     sub order_test($a where { $t ~= 'a' },   #OK not used

S06-signature/slurpy-params.t

@@ -21,11 +21,11 @@ is mixed(1, 2, 3),     '|1|2!3', 'Positional and slurp params';
 dies_ok {eval(' mixed()')},      'at least one arg required';
 
 #?rakudo skip 'types on slurpy params'
-#?niecza skip 'Nominal type check failed in binding Int *@args in x_typed_join; got List, needed Int'
 {
     sub x_typed_join(Int *@args){ @args.join('|') }
     is x_typed_join(1),           '1',      'Basic slurpy params with types 1';
     is x_typed_join(1, 2, 5),     '1|2|5',  'Basic slurpy params with types 2';
+    #?niecza todo 'Types on slurpy params are checked'
     dies_ok { x_typed_join(3, 'x') }, 'Types on slurpy params are checked';
 }
 
@@ -250,7 +250,6 @@ eval_dies_ok 'sub rt65324(*@x, $oops) { say $oops }',
 
 # used to be RT #69424
 #?rakudo skip 'types on slurpy params'
-#?niecza skip 'Nominal type check failed in binding Int *@a in typed-slurpy; got List, needed Int'
 {
     sub typed-slurpy(Int *@a) { 5 }   #OK not used
     my Int @b;

S12-attributes/instance.t

@@ -312,7 +312,6 @@ is Foo7e.new.attr, 42, "default attribute value (1)";
 
 
 # Tests for clone.
-#?niecza skip "Unable to resolve method clone in class CloneTest"
 {
     class CloneTest { has $.x is rw; has $.y is rw; }
     my $a = CloneTest.new(x => 1, y => 2);
@@ -322,10 +321,12 @@ is Foo7e.new.attr, 42, "default attribute value (1)";
     $b.x = 3;
     is $b.x, 3, 'changed attribute on clone...';
     #?rakudo 2 todo 'clone'
+    #?niecza todo "original not affected"
     is $a.x, 1, '...and original not affected';
     my $c = $a.clone(x => 42);
     is $c.x, 42, 'clone with parameters...';
     #?rakudo todo 'clone'
+    #?niecza todo "original not affected"
     is $a.x, 1, '...leaves original intact...';
     is $c.y, 2, '...and copies what we did not change.';
 }

S32-num/fatrat.t

@@ -10,7 +10,6 @@ plan 252;
 isa_ok(FatRat.new(1,4), FatRat, "FatRat.new makes a FatRat");
 isa_ok( (1/4).FatRat, FatRat, "cast of Rat makes a FatRat");
 isa_ok( 1.Int.FatRat, FatRat, "cast of Int makes a FatRat");
-#?niecza todo
 isa_ok( 1.Num.FatRat, FatRat, "cast of Num makes a FatRat");
 
 isa_ok(1 / 4, Rat, "/ makes a Rat");