pugs fudge

Author: coke

S03-operators/inplace.t

@@ -49,6 +49,7 @@ my $i = "UPPERCASE"; $i .= tc;
 is($f, "LOWERCASE", "inplace uc");
 is($g, "uppercase", "inplace lc");
 is($h, "Lowercase", "inplace tc");
+#?pugs todo
 is($i, "uPPERCASE", "inplace lcfirst");
 
 # L<S12/"Mutating methods">

S32-str/substr.t

@@ -64,6 +64,7 @@ plan 90;
     is("שיעבוד כבר".substr(4, 4), "וד כ", ".substr on Hebrew text");
 }
 
+#?pugs skip 'chrs'
 { # codepoints greater than 0xFFFF
     my $str = (0x10426, 0x10427).chrs;
     is $str.codes, 2, "Sanity check string";