This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
[perl #102586] version->new("version") SEGVs
authorFather Chrysostomos <sprout@cpan.org>
Wed, 23 Nov 2011 05:28:15 +0000 (21:28 -0800)
committerFather Chrysostomos <sprout@cpan.org>
Wed, 23 Nov 2011 05:29:35 +0000 (21:29 -0800)
commitbc4eb4d6f895e86a4afbc016eae943c7546c35f2
treeef18a6108892dffc3ebf5c7bdc667133a2b37b4f
parenta3f353cf7aaf90ddfb021a9733ff75f4437d4e70
[perl #102586] version->new("version") SEGVs

This adds an ROK check after calling sv_derived_from, as the latter
also works for class names.  It is done after sv_derived_from, rather
than before, as sv_derived_from calls get-magic.
ext/arybase/arybase.pm
lib/version.t
util.c