This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
No need to call strlen() on the result of CopSTASHPV() when unthreaded,
authorNicholas Clark <nick@ccl4.org>
Thu, 18 Oct 2007 12:32:42 +0000 (12:32 +0000)
committerNicholas Clark <nick@ccl4.org>
Thu, 18 Oct 2007 12:32:42 +0000 (12:32 +0000)
commit8e3a4a3079a43c5cf5fb5f844ffb0b9d1d8b571d
tree7775ffd2f2d03da97de8ed26f88c0afbe070f700
parent19bad6733a83fa572b0d6a19b4693ea22c241ab0
No need to call strlen() on the result of CopSTASHPV() when unthreaded,
as the length is already known. Hence conditionally compile out the
logic related to the call to strlen() from S_method_common(), and use
newSVhek in S_gv_get_super_pkg().

p4raw-id: //depot/perl@32130
gv.c
pp_hot.c