Dan Kogai wrote: > I found this when I was playing w/ pugs. > > pugs> { $^x }.(42) > 42 > pugs> { my $z; $^x }.(42) > *** Undeclared variable: "$^x" > at <interactive> line 1, column 10-14 > > So far as I see s06, there's nothing wrong w/ the statement above. I > just want to make sure this is not a perl6 feature.
This is a Pugs bug, so perl6-compiler is perhaps more adequate. :-) Please commit a test for it somewhere (in t/subroutines/implicit_parameters.t maybe?), as I've just fixed the bug. (r9913) { my %n; { %n{ $^n } ||= ($^n <= 2 ?? 1 !! &?BLOCK($^n-1) + &?BLOCK($^n-2)) }.($^n) }.(42) now evaluates to 267914296 here too. :) Audrey
signature.asc
Description: OpenPGP digital signature