This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
[perl #108994] Stop SvPVutf8 from coercing SVs
authorFather Chrysostomos <sprout@cpan.org>
Tue, 31 Jan 2012 20:57:09 +0000 (12:57 -0800)
committerFather Chrysostomos <sprout@cpan.org>
Tue, 31 Jan 2012 20:57:09 +0000 (12:57 -0800)
commitfe46cbda823c09f80e4bc48dd93fafb26cc805f6
tree0a31624d53759263953496dec82595cc9edaf9d2
parent92c88ef1fd925fb1c768293bd43deb970990e7f3
[perl #108994] Stop SvPVutf8 from coercing SVs

In shouldn’t destroy globs or references passed to it, or try to
coerce them if they are read-only or incoercible.

I added tests for SvPVbyte at the same time, even though it was not
exhibiting the same problems, as sv_utf8_downgrade doesn’t try to
coerce anything.  (SvPVbyte has its own set of bugs, which I hope to
fix in fifthcoming commits.)
MANIFEST
embed.fnc
ext/XS-APItest/APItest.xs
ext/XS-APItest/t/svpv.t [new file with mode: 0644]
proto.h
sv.c