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: dca6062) | patch
Split out S_refcounted_he_new_common() from
authorNicholas Clark <nick@ccl4.org>
Mon, 7 Apr 2008 14:45:33 +0000 (14:45 +0000)
committerNicholas Clark <nick@ccl4.org>
Mon, 7 Apr 2008 14:45:33 +0000 (14:45 +0000)
commit012da8e581e60270322b8deba22fdfab9df5db1b
tree6bd43c09e3a595b66dc0f4d11d83c3d42cdd55a0tree | snapshot
parentdca6062a863d0e957d067cc75f9e13b2e28b1090commit | diff
Split out S_refcounted_he_new_common() from
Perl_refcounted_he_new_common(), so that Perl_store_cop_label() can
call it without needing to create two temporary SVs. Use it in
newSTATEOP() and eliminate the two temporary SVs. Make
Perl_fetch_cop_label() more defensive by not assuming that the value
for ":" is always a PV. Remove its "compatibility" macro.

p4raw-id: //depot/perl@33657
embed.fnc diff | blob | blame | history
embed.h diff | blob | blame | history
hv.c diff | blob | blame | history
op.c diff | blob | blame | history
pod/perltodo.pod diff | blob | blame | history
proto.h diff | blob | blame | history
Unnamed repository; edit this file 'description' to name the repository.