Permalink
Browse files

tests for multibyte chars successful

.recv can handle it now, unfudging these tests.
  • Loading branch information...
1 parent 7bcb012 commit c07dfde057c3a5b6f597e10a627d9afea68380ac @FROGGS FROGGS committed Jan 11, 2013
Showing with 2 additions and 2 deletions.
  1. +2 −2 S32-io/IO-Socket-INET.t
View
4 S32-io/IO-Socket-INET.t
@@ -89,12 +89,12 @@ 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
- #?rakudo skip 'RT 115862'
+ # 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';
- #?rakudo skip 'RT 115862'
+ # RT #115862
is $expected[$i], chr(0xbabe), "combined the bytes form {chr 0xbabe}";
$i++;

0 comments on commit c07dfde

Please sign in to comment.