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: f5d98ea) | patch
Call get-magic before rejecting non-refs in sv_bless
authorFather Chrysostomos <sprout@cpan.org>
Sat, 10 Aug 2013 20:09:34 +0000 (13:09 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Sun, 11 Aug 2013 17:53:35 +0000 (10:53 -0700)
commit5f213d9f8849ddd98225ad24bf2afef8c9035d61
tree69417470d281e731f455af8c04f201cd68d51b63tree | snapshot
parentf5d98eaa982e26fadd6e4173f4515f6c2126566fcommit | diff
Call get-magic before rejecting non-refs in sv_bless

Otherwise bless $tied_ref will die if FETCH hasn’t been called else-
where yet.
sv.c diff | blob | blame | history
t/op/bless.t diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.