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 /objXSUB.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 'objXSUB.h')
| -rw-r--r-- | objXSUB.h | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -2893,8 +2893,6 @@ #define sv_catsv pPerl->Perl_sv_catsv #undef sv_catsv_mg #define sv_catsv_mg pPerl->Perl_sv_catsv_mg -#undef sv_check_thinkfirst -#define sv_check_thinkfirst pPerl->Perl_sv_check_thinkfirst #undef sv_chop #define sv_chop pPerl->Perl_sv_chop #undef sv_clean_all @@ -2919,6 +2917,8 @@ #define sv_dump pPerl->Perl_sv_dump #undef sv_eq #define sv_eq pPerl->Perl_sv_eq +#undef sv_force_normal +#define sv_force_normal pPerl->Perl_sv_force_normal #undef sv_free #define sv_free pPerl->Perl_sv_free #undef sv_free_arenas |