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: 2242947) | patch
As SvUPGRADE() is a macro wrapping a call to sv_upgrade() inside
authorNicholas Clark <nick@ccl4.org>
Mon, 5 Mar 2007 23:52:09 +0000 (23:52 +0000)
committerNicholas Clark <nick@ccl4.org>
Mon, 5 Mar 2007 23:52:09 +0000 (23:52 +0000)
commit7a7f3e459f22e8eecb8e377ed2a7b207cba1585f
tree72a57757b2cb2c906082c9ec804fb63bb052380btree | snapshot
parent2242947801b5a89c42ffba93b4c406f75e4cd049commit | diff
As SvUPGRADE() is a macro wrapping a call to sv_upgrade() inside
a check on the existing SvTYPE(), there's no need to wrap it inside
another explcit check of SvTYPE(). This won't make any difference to
the output of an optimising compiler, but it makes the source clearer.

p4raw-id: //depot/perl@30481
pp_ctl.c diff | blob | blame | history
sv.c diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.