diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1999-04-03 17:43:23 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-04-03 17:43:23 +0000 |
| commit | 6fc9266916f08dacf1850556174b6312eefb14e6 (patch) | |
| tree | d71efb2e3d8f34d5a58289c3b086d9c3695a79d4 /embed.h | |
| parent | 9ec26bd9beab1b3c385bfa1981766ac62a926a52 (diff) | |
| download | perl-6fc9266916f08dacf1850556174b6312eefb14e6.tar.gz | |
remove duplicate code and an extra branch in sv_setsv() and
other hot code by making SvTHINKFIRST() think about FAKE SVs
p4raw-id: //depot/perl@3213
Diffstat (limited to 'embed.h')
| -rw-r--r-- | embed.h | 3 |
1 files changed, 2 insertions, 1 deletions
@@ -868,6 +868,7 @@ #define sv_derived_from Perl_sv_derived_from #define sv_dump Perl_sv_dump #define sv_eq Perl_sv_eq +#define sv_force_normal Perl_sv_force_normal #define sv_free Perl_sv_free #define sv_free_arenas Perl_sv_free_arenas #define sv_gets Perl_sv_gets @@ -2013,7 +2014,6 @@ #define sv_catpvn_mg CPerlObj::Perl_sv_catpvn_mg #define sv_catsv CPerlObj::Perl_sv_catsv #define sv_catsv_mg CPerlObj::Perl_sv_catsv_mg -#define sv_check_thinkfirst CPerlObj::Perl_sv_check_thinkfirst #define sv_chop CPerlObj::Perl_sv_chop #define sv_clean_all CPerlObj::Perl_sv_clean_all #define sv_clean_objs CPerlObj::Perl_sv_clean_objs @@ -2026,6 +2026,7 @@ #define sv_derived_from CPerlObj::Perl_sv_derived_from #define sv_dump CPerlObj::Perl_sv_dump #define sv_eq CPerlObj::Perl_sv_eq +#define sv_force_normal CPerlObj::Perl_sv_force_normal #define sv_free CPerlObj::Perl_sv_free #define sv_free_arenas CPerlObj::Perl_sv_free_arenas #define sv_gets CPerlObj::Perl_sv_gets |