RT #115862, skipping multibyte tests for release

After release with parrot 4.4.0 and upgrade to newer parrot these tests should work fine. https://rt.perl.org/rt3/Ticket/Display.html?id=115862
Raku · Nov 22, 2012 · 3c2dc0e · 3c2dc0e
1 parent 95bb282
commit 3c2dc0e
Showing 1 changed file with 6 additions and 2 deletions.
diff --git a/S32-io/IO-Socket-INET.t b/S32-io/IO-Socket-INET.t
@@ -89,10 +89,14 @@ if $*OS eq any <linux darwin solaris MSWin32> { # please add more valid OS names
     is $expected[$i++], '789', 'received next 3 characters';
     is $expected[$i++], 'abcdefghijklmnopqrstuvwxyz', 'remaining 26 were buffered';
     # Multibyte characters
-    is $expected[$i++], chr(0xbeef), "received {chr 0xbeef}";
+    #?rakudo skip 'RT 115862'
+    is $expected[$i], chr(0xbeef), "received {chr 0xbeef}";
+    $i++;
     is $expected[$i++], 1, '... which is 1 character';
     is $expected[$i++], 1, 'received another character';
-    is $expected[$i++], chr(0xbabe), "combined the bytes form {chr 0xbabe}";
+    #?rakudo skip 'RT 115862'
+    is $expected[$i], chr(0xbabe), "combined the bytes form {chr 0xbabe}";
+    $i++;
 
     # test 5 tests get()
     if $is-win {