New issue
Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.
By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.
Already on GitHub? Sign in to your account
.readchars($size) sometimes returns $size+1 chars #6281
Comments
From @zoffixznetSeems something with decoding actually, since using char of different size or adding another char after the heart avoids the issue: <Zoffix___> m: my $f1 = "/tmp/foo121212".IO; $f1.spurt: "fo♥"; $f1.open.readchars(2).say Bisection results: <Zoffix___> bisect: my $f1 = "/tmp/foo121212".IO; $f1.spurt: "fo♥"; $f1.open.readchars(2).say <Zoffix___> m: my $f1 = "/tmp/foo121212".IO; $f1.spurt: "fo♥"; with $f1.open { .readchars(1).say xx 3 } |
From @samcvI bisected MoarVM and the offending commit is here: From what I see, this commit did not actually cause the root bug, it just exposed it. The Unicode Database was rebuilt so that NFG_QC=False for Emoji characters, which the ♥ is. Also interestingly: <samcv> m:my $f1 = "/tmp/foo121212".IO; $f1.spurt: "fo♥22"; $f1.open.readchars(2).say |
The RT System itself - Status changed from 'new' to 'open' |
From @jnthnOn Sat, 27 May 2017 07:06:59 -0700, cpan@zoffix.com wrote:
Fixed and tested in S16-io/readchars.t. |
@jnthn - Status changed from 'open' to 'resolved' |
Migrated from rt.perl.org#131383 (status was 'resolved')
Searchable as RT131383$
The text was updated successfully, but these errors were encountered: