Re: Junctions wrapped in singleton lists

2020-11-18 Thread William Michels via perl6-users
Thanks Liz! On Wed, Nov 18, 2020 at 9:50 AM Elizabeth Mattijsen wrote: > This change of behaviour turned out to be a regression. This was fixed > reported in https://github.com/rakudo/rakudo/issues/4039 and fixed with > https://github.com/rakudo/rakudo/commit/3e10cc6f8a > > > On 18 Nov 2020,

Re: Junctions wrapped in singleton lists

2020-11-18 Thread Elizabeth Mattijsen
This change of behaviour turned out to be a regression. This was fixed reported in https://github.com/rakudo/rakudo/issues/4039 and fixed with https://github.com/rakudo/rakudo/commit/3e10cc6f8a > On 18 Nov 2020, at 18:46, William Michels via perl6-users > wrote: > > user@mbook:~$ raku >

Re: Junctions wrapped in singleton lists

2020-11-18 Thread William Michels via perl6-users
user@mbook:~$ raku Welcome to 퐑퐚퐤퐮퐝퐨™ v2020.10. Implementing the 퐑퐚퐤퐮™ programming language v6.d. Built on MoarVM version 2020.10. You may want to `zef install Readline` or `zef install Linenoise` or use rlwrap for a line editor To exit type 'exit' or '^D' > say $*PERL.version; v6.d > say

Re: Junctions wrapped in singleton lists

2020-11-17 Thread Ralph Mellor
https://github.com/rakudo/rakudo/issues/4039 On Tue, Nov 17, 2020 at 3:12 AM yary wrote: > > Open a bug report at https://github.com/rakudo/rakudo/issues/ showing the > change in behavior > > -y > > > On Mon, Nov 16, 2020 at 4:39 PM Ralph Mellor wrote: >> >> say $*PERL.version; # v6.d >> say

Re: Junctions wrapped in singleton lists

2020-11-16 Thread yary
Open a bug report at https://github.com/rakudo/rakudo/issues/ showing the change in behavior -y On Mon, Nov 16, 2020 at 4:39 PM Ralph Mellor wrote: > say $*PERL.version; # v6.d > say $*PERL.compiler.version; # v2018.12 > say ({ 1 | -1 } ... *)[^3]; # (any(1, -1) any(1, -1) any(1, -1)) > > say

Re: Junctions wrapped in singleton lists

2020-11-16 Thread Ralph Mellor
say $*PERL.version; # v6.d say $*PERL.compiler.version; # v2018.12 say ({ 1 | -1 } ... *)[^3]; # (any(1, -1) any(1, -1) any(1, -1)) say $*PERL.version; # v6.d say $*PERL.compiler.version; # v2020.07 say ({ 1 | -1 } ... *)[^3]; # ((any(1, -1)) (any(1, -1)) (any(1, -1)))

Re: Junctions wrapped in singleton lists

2020-11-15 Thread yary
A few more experiments, for what it's worth. I have no answers. > { any(1,2) }.^name Block > any(1,2).^name Junction > (1|-1).^name Junction > ((1|-1) ... *)[^3] ((any(1, -1)) (any(2, 0)) (any(3, 1))) > (1|-1 ... *)[^3] ((any(1, -1)) (any(2, 0)) (any(3, 1))) > 1|-1 ... 3 ((any(1, -1)) (any(2, 0))

Re: Junctions wrapped in singleton lists

2020-11-14 Thread Gianni Ceccarelli
On 2020-11-13 Sean McAfee wrote: > I just tried making a sequence of junctions and found that each one > ended up wrapped in a singleton list somehow: > > > ({ 1 | -1 } ... *)[^3] > ((any(1, -1)) (any(1, -1)) (any(1, -1))) oh, that's weird:: > ({ 'a' } ... *)[0].^name Str >

Junctions wrapped in singleton lists

2020-11-13 Thread Sean McAfee
I just tried making a sequence of junctions and found that each one ended up wrapped in a singleton list somehow: > ({ 1 | -1 } ... *)[^3] ((any(1, -1)) (any(1, -1)) (any(1, -1))) Strangely, I can set an ending condition that works like I would expect, but the sequence still produces