On Fri, 26 May 2017 12:14:13 -0700, david.warring wrote: > 3 more elements. Show/hide. > 19:01 <https://irclog.perlgeek.de/perl6/2017-05-26#i_14643208> > dwarring p6: > "tst.txt".IO.spurt([~] 'a' .. 'z'); my $ioh = "tst.txt".IO.open(:r); > say > $ioh.read(4); $ioh.seek(1, SeekFromCurrent); say $ioh.read(4); > 19:01 <https://irclog.perlgeek.de/perl6/2017-05-26#i_14643209> camelia > rakudo-moar > 95b4e5: OUTPUT: «Blob[uint8]:0x<61 62 63 64>Blob[uint8]:0x<>» > 19:02 <https://irclog.perlgeek.de/perl6/2017-05-26#i_14643214> > dwarring bisect: > "tst.txt".IO.spurt([~] 'a' .. 'z'); my $ioh = "tst.txt".IO.open(:r); > say > $ioh.read(4); $ioh.seek(1, SeekFromCurrent); say $ioh.read(4); > 19:02 <https://irclog.perlgeek.de/perl6/2017-05-26#i_14643215> > bisectable6 dwarring, > Bisecting by output (old=2015.12 new=95b4e5d) because on both starting > points the exit code is 0 > 19:06 <https://irclog.perlgeek.de/perl6/2017-05-26#i_14643238> > MasterDuke AlexDaniel: > ^^^ > 19:08 <https://irclog.perlgeek.de/perl6/2017-05-26#i_14643242> > dwarring anyway, > nothing returned from second read after seekFromCurrent > 19:08 <https://irclog.perlgeek.de/perl6/2017-05-26#i_14643243> Recent > regression. I'll put in an RT
Thank you for the report. This is now fixed. Fix: https://github.com/rakudo/rakudo/commit/094e77a2c2 Tests: https://github.com/perl6/roast/commit/2804acdc43
