This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
[perl #119043] Exempt shared hash key consts from ro
authorFather Chrysostomos <sprout@cpan.org>
Sun, 28 Jul 2013 20:19:33 +0000 (13:19 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Sun, 28 Jul 2013 20:19:33 +0000 (13:19 -0700)
commitba36554e02872e48d146177a57a9cfb154727fae
tree4b9877f12763e5fe851a174299b625a6c834fc65
parentf99a5f08f203af84430e677e25df49557c55c24f
[perl #119043] Exempt shared hash key consts from ro

Commit 19130678b4 stopped copy-on-write scalars from being exempt from
readonliness in ck_svconst (called for every OP_CONST).  That was for
the sake of consistency.

It turns out this breaks CPAN modules, so change it back, but only for
shared hash key scalars, not other COW scalars.

This is an historical artefact left over from when copy-on-write used
the read-only flag without the scalar actually being read-only.
lib/overload.t
op.c