[perl #123596] vars from subsigs are not available to where blocks

2017-12-01 Thread Aleks-Daniel Jakimenko-Aleksejev via RT
Interesting. Still reproducible (2017.11, HEAD(5929887)) On 2015-01-14 03:05:38, FROGGS.de wrote: > FROGGS: m: multi car($x, [$y, @ys] where $x == 1) {1}; say car 1, [1, > [2, 3]]; > camelia: rakudo-moar d69491: OUTPUT«1␤» > FROGGS: m: multi car($x, [$y, @ys] where $x == $y) {1}; say car 1, [1, >

[perl #123596] vars from subsigs are not available to where blocks

2015-01-14 Thread via RT
# New Ticket Created by Tobias Leich # Please include the string: [perl #123596] # in the subject line of all future correspondence about this issue. # https://rt.perl.org/Ticket/Display.html?id=123596 > FROGGS: m: multi car($x, [$y, @ys] where $x == 1) {1}; say car 1, [1, [2, 3]]; camelia: r