[perl #128832] [BUG] Regex subrule problem related

2016-08-03 Thread via RT
# New Ticket Created by # Please include the string: [perl #128832] # in the subject line of all future correspondence about this issue. # https://rt.perl.org/Ticket/Display.html?id=128832 > grammar Test {     token TOP { (['"'|"'"]) <+print - [s]> ** 1..64 $0 } }; say

[perl #128833] [BUG] async and grammar related data issue

2016-08-03 Thread via RT
# New Ticket Created by Justin DeVuyst # Please include the string: [perl #128833] # in the subject line of all future correspondence about this issue. # https://rt.perl.org/Ticket/Display.html?id=128833 > [jdv@wieldy ~]$ cat test_grammar_1_thread.p6 use v6; use XML; PROCESS::<$SCHEDULER>

Re: [perl #128818] [BUG] sprintf %f bogus rounding

2016-08-03 Thread Zefram
A related case, now that I've actually looked at the implementation: > (2251799813685577e0 * 2e0**-51) - 1 1.46105350040671e-13 > sprintf("%.13f", 2251799813685577e0 * 2e0**-51) 1.2 The Num value in this case is exactly 2251799813685577/2251799813685248, or

Re: [perl #128831] t/spec/S16-io/eof.t is unportably assuming that /proc/1/comm exists

2016-08-03 Thread Nicholas Clark via RT
On Wed, Aug 03, 2016 at 03:15:49PM -0400, Brandon Allbery wrote: > On Wed, Aug 3, 2016 at 3:12 PM, Nicholas Clark > wrote: > > > I don't know what file would be safer. Maybe mem? > > > None of them. There's no guarantee that /proc exists (non-SVR4 commercial >

Re: [perl #128831] t/spec/S16-io/eof.t is unportably assuming that /proc/1/comm exists

2016-08-03 Thread Nicholas Clark
On Wed, Aug 03, 2016 at 03:15:49PM -0400, Brandon Allbery wrote: > On Wed, Aug 3, 2016 at 3:12 PM, Nicholas Clark > wrote: > > > I don't know what file would be safer. Maybe mem? > > > None of them. There's no guarantee that /proc exists (non-SVR4 commercial >

[perl #128830] [LTA] Error on while (0){}

2016-08-03 Thread Will Coleda via RT
Re-opening, marking testneeded. -- Will "Coke" Coleda

[perl #122709] [CONC][BUG] `await`ing a Promise in a different thread sometimes hangs

2016-08-03 Thread jn...@jnthn.net via RT
On Fri May 06 06:54:52 2016, sml...@gmail.com wrote: > No, this one-liner... > > perl6 -e 'my $waiter = Proc::Async.new(:path, :args World>).start; await start { await $waiter }' > > ...still occasionally hangs for me on the latest Rakudo nom: > > This is Rakudo version 2016.04-117-g7db7b46

Re: [perl #128831] t/spec/S16-io/eof.t is unportably assuming that /proc/1/comm exists

2016-08-03 Thread Brandon Allbery via RT
On Wed, Aug 3, 2016 at 3:12 PM, Nicholas Clark wrote: > I don't know what file would be safer. Maybe mem? None of them. There's no guarantee that /proc exists (non-SVR4 commercial Unixes), or that it is in any way compatible with Linux's notion of /proc (FreeBSD,

Re: [perl #128831] t/spec/S16-io/eof.t is unportably assuming that /proc/1/comm exists

2016-08-03 Thread Brandon Allbery
On Wed, Aug 3, 2016 at 3:12 PM, Nicholas Clark wrote: > I don't know what file would be safer. Maybe mem? None of them. There's no guarantee that /proc exists (non-SVR4 commercial Unixes), or that it is in any way compatible with Linux's notion of /proc (FreeBSD,

[perl #128831] t/spec/S16-io/eof.t is unportably assuming that /proc/1/comm exists

2016-08-03 Thread via RT
# New Ticket Created by Nicholas Clark # Please include the string: [perl #128831] # in the subject line of all future correspondence about this issue. # https://rt.perl.org/Ticket/Display.html?id=128831 > $ ./perl6-m -Ilib t/spec/S16-io/eof.t 1..2 ok 1 - Regular file EOF was reached Use

[perl #128830] [LTA] Error on while (0){}

2016-08-03 Thread Larry Wall via RT
We now examine the preceding character, and if it's a closing brace, suggest use of whitespace before curlies taken as a hash subscript. Fixed in 7ec824e52ab5b285cda47179e6f41e452d870762

[perl #128830] [LTA] Error on while (0){}

2016-08-03 Thread via RT
# New Ticket Created by Zoffix Znet # Please include the string: [perl #128830] # in the subject line of all future correspondence about this issue. # https://rt.perl.org/Ticket/Display.html?id=128830 > The issue is the lack of space between () and {}: m: while (0){} rakudo-moar 051339:

Re: [perl #128766] Useless use of $a in sink context is spurious

2016-08-03 Thread Lloyd Fournier
test: https://github.com/perl6/roast/commit/4fdee95e24998498641bc548cb4319cefd6d0a0f On Sat, Jul 30, 2016 at 5:36 AM Will Coleda via RT < bugs-comm...@bugs6.perl.org> wrote: > Re-opening, marking testneeded. > > -- > Will "Coke" Coleda >

Re: [perl #128770] 5334cb725 causes erroneous sink on ($_ with "foo")

2016-08-03 Thread Lloyd Fournier
Test: https://github.com/perl6/roast/commit/4fdee95e24998498641bc548cb4319cefd6d0a0f On Sat, Jul 30, 2016 at 4:55 AM Larry Wall via RT < bugs-comm...@bugs6.perl.org> wrote: > The logical ops andthen, notandthen, and orelse were not propagating > wantedness to their thunky args. > > Fixed in

[perl #128628] problem using semaphore with many threads

2016-08-03 Thread jn...@jnthn.net via RT
On Thu Jul 28 09:58:56 2016, mt1...@gmail.com wrote: > Thanks very much for your work, I'll wait and see. I pull rakudo > versions directly from the github and some day it will be working :-). > The version bumps have been done. I've also added tests along the lines of your examples to the

Re: [perl #121722] for 42 {NEXT (state $val) = $_} # fails on MOAR

2016-08-03 Thread Elizabeth Mattijsen
This test now passes, can be closed. > On 17 Oct 2014, at 23:57, Christian Bartolomaeus via RT > wrote: > > Hmm, it looks like that was not all -- or there is a new problem. > > $ perl6-m -e 'for 42 {NEXT (state $val) = $_}; say "alive"' > alive > > This does

Re: [perl #126001] Blockless LAST phaser puts Mu in the iteration variable

2016-08-03 Thread Elizabeth Mattijsen
This test now passes, can be closed. > On 17 Jul 2016, at 21:54, Christian Bartolomaeus via RT > wrote: > > Behaviour for Moar is unchanged. The code works as expected on JVM: > > $ perl6-j -e 'for 1, 2 { LAST say $_ }' > 2 > > I added a test to

[perl #128828] [BUG] Num.FatRat coercion is inexact

2016-08-03 Thread via RT
# New Ticket Created by Zefram # Please include the string: [perl #128828] # in the subject line of all future correspondence about this issue. # https://rt.perl.org/Ticket/Display.html?id=128828 > > my $a = 2476979795053773e0 * (2e0**-51) 1.1 > ($a * (2e0**51)).Int 2476979795053773 > ($a *

[perl #127750] Intermittent failure on t/04-nativecall/13-union.t

2016-08-03 Thread jn...@jnthn.net via RT
On Wed Jul 27 17:43:50 2016, steve.myn...@gmail.com wrote: > I've run roast a handful of times in the last few days and didn't see > that fail once. > Not heard anyone mention it in a while either, nor seen it myself. Since we have a good candidate for a commit that likely fixed the issue, I'll

[perl #128824] [BUG] promise bug

2016-08-03 Thread jn...@jnthn.net via RT
On Tue Aug 02 19:37:27 2016, liu...@360.cn wrote: > liukan@candor:~/Code$ cat p1.pl6 > use v6; > > my $p = Promise.start: { sleep 1; 42 }; > $p.then: { say .result }; $p.result; > my $s = $p.status; > > #say $s; > exit 0; > > liukan@candor:~/Code$ perl6 p1.pl6 > 42 > ## this is OK > It's not