This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
https://perl5.git.perl.org / perl5.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: fb8f4cf) | patch
Copy keys for aassign in lvalue sub
authorFather Chrysostomos <sprout@cpan.org>
Thu, 25 Oct 2012 01:04:20 +0000 (18:04 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Tue, 11 Dec 2012 16:59:42 +0000 (08:59 -0800)
commit631dbaa279974476f7c2a388b50c77dace949921
tree56112c0068e937e701eeb378b17084aae9e62768tree | snapshot
parentfb8f4cf83c7112774ede7101826d438234894195commit | diff
Copy keys for aassign in lvalue sub

Checking LVRET (which pp_aassign does, as of a few commits ago)
has no effect if OPpMAYBE_LVSUB is not set on the op.  This com-
mit changes op.c:op_lvalue_flags to set this flag on aassign ops.

This makes sub:lvalue{%h=($x,$x)} behave correctly if the return
values of the sub are assigned to ($x is unmodfied).
dump.c diff | blob | blame | history
op.c diff | blob | blame | history
t/op/hashassign.t diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.