diff options
| author | Nicholas Clark <nick@ccl4.org> | 2003-11-19 22:28:25 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2003-11-19 22:28:25 +0000 |
| commit | 113738bb099c38d994cf82554560490df0f6d525 (patch) | |
| tree | 54c14f614a67d110bf1e73f384b020cb50b409ab /embed.h | |
| parent | 9133b6393363c0c6671c1b2c6b2ecadb3ff402ee (diff) | |
| download | perl-113738bb099c38d994cf82554560490df0f6d525.tar.gz | |
merge hv_fetch and hv_fetch_ent into hv_fetch_common
remove S_hv_fetch_flags
hv.c now 13% smaller than when I started. hv_store TODO
p4raw-id: //depot/perl@21753
Diffstat (limited to 'embed.h')
| -rw-r--r-- | embed.h | 12 |
1 files changed, 6 insertions, 6 deletions
@@ -1313,9 +1313,6 @@ #define share_hek_flags S_share_hek_flags #endif #ifdef PERL_CORE -#define hv_fetch_flags S_hv_fetch_flags -#endif -#ifdef PERL_CORE #define hv_notallowed S_hv_notallowed #endif #endif @@ -2153,6 +2150,9 @@ #ifdef PERL_CORE #define hv_exists_common S_hv_exists_common #endif +#ifdef PERL_CORE +#define hv_fetch_common S_hv_fetch_common +#endif #endif #define ck_anoncode Perl_ck_anoncode #define ck_bitop Perl_ck_bitop @@ -3804,9 +3804,6 @@ #define share_hek_flags(a,b,c,d) S_share_hek_flags(aTHX_ a,b,c,d) #endif #ifdef PERL_CORE -#define hv_fetch_flags(a,b,c,d,e) S_hv_fetch_flags(aTHX_ a,b,c,d,e) -#endif -#ifdef PERL_CORE #define hv_notallowed(a,b,c,d) S_hv_notallowed(aTHX_ a,b,c,d) #endif #endif @@ -4643,6 +4640,9 @@ #ifdef PERL_CORE #define hv_exists_common(a,b,c,d,e) S_hv_exists_common(aTHX_ a,b,c,d,e) #endif +#ifdef PERL_CORE +#define hv_fetch_common(a,b,c,d,e,f,g) S_hv_fetch_common(aTHX_ a,b,c,d,e,f,g) +#endif #endif #define ck_anoncode(a) Perl_ck_anoncode(aTHX_ a) #define ck_bitop(a) Perl_ck_bitop(aTHX_ a) |