various rakudo unfudges

Author: moritz

S06-macros/macros-d1.t

@@ -113,7 +113,6 @@ plan 12;
     is id('x'), 'x', 'macro can return its param';
 }
 
-#?rakudo skip 'Null PMC access'
 #?pugs skip 'Nil'
 {
     macro funny_nil { quasi { {;}() } }

S06-operator-overloading/sub.t

@@ -389,7 +389,6 @@ Testing operator overloading subroutines
     #?rakudo todo 'RT 65638'
     #?niecza todo
     is eval('sub infix:<#>($a, $b) { 42 }; 5 # 5'), 42, 'infix:<comment char>($a, $b)';
-    #?rakudo skip 'mixed overloaded operators of different arities'
     is eval('multi sub infix:<+>() { 42 }; 5 + 5'), 10, 'infix:<+>()';
     is eval('sub infix:<+>($a, $b) { 42 }; 5 + 5'), 42, 'infix:<+>($a, $b)';
 }

S32-num/abs.t

@@ -32,7 +32,6 @@ is( abs(-Inf), Inf, 'absolute value of -Inf is Inf');
 
 is( abs("-10"), 10, 'absolute value of "-10" is 10');
 
-#?rakudo skip "abs(70596).WHAT parsing as abs(70596.WHAT)"
 is( abs(70596).WHAT.gist, 70596.abs.WHAT.gist, 'abs(x).WHAT parses as x.abs.WHAT' );
 
 done;

S32-str/substr.t

@@ -67,7 +67,6 @@ plan 90;
 #?pugs skip 'chrs'
 { # codepoints greater than 0xFFFF
     my $str = (0x10426, 0x10427).list.chrs;
-    #?rakudo skip 'Str.codes'
     is $str.codes, 2, "Sanity check string";
     is substr($str, 0, 1), 0x10426.chr, "Taking first char of Deseret string";
     is substr($str, 1, 1), 0x10427.chr, "Taking second char of Deseret string";