# New Ticket Created by  Zoffix Znet 
# Please include the string:  [perl #130840]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/Ticket/Display.html?id=130840 >


Based on the code, seems it's a naive kludge for the unimplemented 
nqp::readcharsfh op. As a result, .readchars on JVM reads incorrect number
of chars, at times producing wrong data altogether:

<ZoffixW> j: "/tmp/Foo.pm6".IO.spurt: "I♥u so very much"; 
"/tmp/Foo.pm6".IO.open.readchars(3).say
<camelia> rakudo-jvm fb4f16: OUTPUT: «I♥u ␤»
<ZoffixW> j: "/tmp/Foo.pm6".IO.spurt: "I love you so very much"; 
"/tmp/Foo.pm6".IO.open.readchars(3).say
<camelia> rakudo-jvm fb4f16: OUTPUT: «I love␤»
<ZoffixW> j: "/tmp/Foo.pm6".IO.spurt: "♥"; 
"/tmp/Foo.pm6".IO.open.readchars(1).say
<camelia> rakudo-jvm fb4f16: OUTPUT: «�␤»

Reply via email to