[JVM] Unfudge some passing tests

Raku · Apr 5, 2019 · aaf7ad0 · aaf7ad0
1 parent eae57d4
commit aaf7ad0
Show file tree

Hide file tree

Showing 6 changed files with 3 additions and 9 deletions.
diff --git a/S02-magicals/sub.t b/S02-magicals/sub.t
@@ -70,7 +70,6 @@ is($result3, 6, 'the &?ROUTINE magical works correctly in overloaded operators'
 }
 
 # RT #130761
-
 {
     sub f() {
         sub g() {
@@ -79,7 +78,8 @@ is($result3, 6, 'the &?ROUTINE magical works correctly in overloaded operators'
             }
         }
     }
-    #?rakudo todo 'RT #130761'
+    #?rakudo.js todo 'RT #130761'
+    #?rakudo.moar todo 'RT #130761'
     is f()(), 'g', 'Inner blocks are transparent to &?ROUTINE (RT#130761)';
 }
 

diff --git a/S15-literals/numbers.t b/S15-literals/numbers.t
@@ -27,12 +27,10 @@ is 4᱂, 42, "Can mix scripts in one number";
 #?rakudo.jvm 2 skip 'Bogus term'
 is ↈ, 100000, "Numerals in category 'Nl' allowed as numeric literal";
 is 𒐀, 2, "Numerals in category 'Nl' allowed as numeric literal";
-#?rakudo.jvm todo 'X::Comp::Group, Argument to "say" seems to be malformed'
 throws-like "say 𒐀𒐀", X::Comp, "Numerals in category 'Nl' die when attempt is made to use as digit";
 #?rakudo.jvm 2 skip 'Bogus term'
 is ፼, 10000, "Numerals in category 'No' allowed as numeric literal";
 is ⓿, 0, "Numerals in category 'No' allowed as numeric literal";
-#?rakudo.jvm todo 'X::Comp::Group, Argument to "say" seems to be malformed'
 throws-like "say ⓿⓿", X::Comp, "Numerals in category 'No' die when attempt is made to use as digit";
 
 #?rakudo.jvm 3 skip 'Bogus term'

diff --git a/S32-io/IO-Socket-INET.t b/S32-io/IO-Socket-INET.t
@@ -282,7 +282,6 @@ do-test
     },
     # client
     {
-        #?rakudo.jvm todo 'incorrect handling of \r\n'
         is-deeply $^client.lines.head(100), $str.lines,
             'can read correct lines from client without any hangs';
         $^client.close();

diff --git a/S32-str/length.t b/S32-str/length.t
@@ -54,7 +54,6 @@ for @data -> $string, $bytes, $codes, $chars {
 # test something with a codepoint above 0xFFFF to catch errors that an
 # UTF-16 based implementation might make
 
-#?rakudo.jvm todo '.codes weirdness on JVM, possibly NYI? RT #124742'
 is "\x[E0100]".codes,  1, '.codes on a >0xFFFF char'; # \c[VARIATION SELECTOR-17]
 
 # test graphemes without a precomposed character in Unicode 5

diff --git a/S32-str/lines.t b/S32-str/lines.t
@@ -27,7 +27,6 @@ is "a\rb\r\rc\r".lines(*).join('|'),
 is "a\rb\r\rc\r".lines(2).join('|'),
   'a|b',    'CR .lines with limit';
 
-#?rakudo.jvm 5 todo '\r\n not yet handled as grapheme'
 is "a\r\nb\r\n\r\nc".lines.join('|'), 'a|b||c',
   'CRLF .lines without trailing';
 is "a\r\nb\r\n\r\nc\r\n".lines.join('|'), 'a|b||c',

diff --git a/S32-str/substr.t b/S32-str/substr.t
@@ -43,9 +43,8 @@ plan 58;
 
 { # codepoints greater than 0xFFFF
     my $str = join '', 0x10426.chr, 0x10427.chr;
-    #?rakudo.jvm todo 'codepoints greater than 0xFFFF RT #124692'
     is $str.codes, 2, "Sanity check string";
-    #?rakudo.jvm 2 skip 'java.nio.charset.MalformedInputException RT #124692'
+    #?rakudo.jvm 2 todo 'wrong result RT #124692'
     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";
 }