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: 3b68edc) | patch
Make SvPVbyte work on tied non-PV
authorFather Chrysostomos <sprout@cpan.org>
Sat, 10 Aug 2013 11:48:17 +0000 (04:48 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Sun, 11 Aug 2013 14:54:18 +0000 (07:54 -0700)
commit48120f8fb3801512144143e22a9f264d9ceab915
tree107ab511bdbe8cbc2bc45b838722ee6dfd6696a6tree | snapshot
parent3b68edc939ddd9cc726846b877988b10939715abcommit | diff
Make SvPVbyte work on tied non-PV

The magic check came too late.  sv_utf8_downgrade does nothing if the
argument is not a PV.

So in the test added to svpv.t the returned string was in utf8,
not bytes.
ext/XS-APItest/t/svpv.t diff | blob | blame | history
sv.c diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.