diff options
| author | Michael G. Schwern <schwern@pobox.com> | 2002-08-06 06:05:10 -0700 |
|---|---|---|
| committer | hv <hv@crypt.org> | 2002-08-17 00:51:19 +0000 |
| commit | 6d822dc4045278fb03135b2683bac92dba061369 (patch) | |
| tree | 39e9aa0ce54a7caf711f12d43985793b79fb762d /proto.h | |
| parent | 485894a1e3cb3873ba7373c744a8b6231190fbf8 (diff) | |
| download | perl-6d822dc4045278fb03135b2683bac92dba061369.tar.gz | |
Remove pseudo-hashes (complete)
Message-id: <20020806200510.GC31473@ool-18b93024.dyn.optonline.net>
p4raw-id: //depot/perl@17725
Diffstat (limited to 'proto.h')
| -rw-r--r-- | proto.h | 13 |
1 files changed, 0 insertions, 13 deletions
@@ -53,13 +53,6 @@ PERL_CALLCONV OP* Perl_append_elem(pTHX_ I32 optype, OP* head, OP* tail); PERL_CALLCONV OP* Perl_append_list(pTHX_ I32 optype, LISTOP* first, LISTOP* last); PERL_CALLCONV I32 Perl_apply(pTHX_ I32 type, SV** mark, SV** sp); PERL_CALLCONV void Perl_apply_attrs_string(pTHX_ char *stashpv, CV *cv, char *attrstr, STRLEN len); -PERL_CALLCONV SV* Perl_avhv_delete_ent(pTHX_ AV *ar, SV* keysv, I32 flags, U32 hash); -PERL_CALLCONV bool Perl_avhv_exists_ent(pTHX_ AV *ar, SV* keysv, U32 hash); -PERL_CALLCONV SV** Perl_avhv_fetch_ent(pTHX_ AV *ar, SV* keysv, I32 lval, U32 hash); -PERL_CALLCONV SV** Perl_avhv_store_ent(pTHX_ AV *ar, SV* keysv, SV* val, U32 hash); -PERL_CALLCONV HE* Perl_avhv_iternext(pTHX_ AV *ar); -PERL_CALLCONV SV* Perl_avhv_iterval(pTHX_ AV *ar, HE* entry); -PERL_CALLCONV HV* Perl_avhv_keys(pTHX_ AV *ar); PERL_CALLCONV void Perl_av_clear(pTHX_ AV* ar); PERL_CALLCONV SV* Perl_av_delete(pTHX_ AV* ar, I32 key, I32 flags); PERL_CALLCONV bool Perl_av_exists(pTHX_ AV* ar, I32 key); @@ -1010,11 +1003,6 @@ PERL_CALLCONV int Perl_nothreadhook(pTHX); END_EXTERN_C -#if defined(PERL_IN_AV_C) || defined(PERL_DECL_PROT) -STATIC I32 S_avhv_index_sv(pTHX_ SV* sv); -STATIC I32 S_avhv_index(pTHX_ AV* av, SV* sv, U32 hash); -#endif - #if defined(PERL_IN_DOOP_C) || defined(PERL_DECL_PROT) STATIC I32 S_do_trans_simple(pTHX_ SV *sv); STATIC I32 S_do_trans_count(pTHX_ SV *sv); @@ -1151,7 +1139,6 @@ STATIC bool S_path_is_absolute(pTHX_ char *name); #endif #if defined(PERL_IN_PP_HOT_C) || defined(PERL_DECL_PROT) -STATIC int S_do_maybe_phash(pTHX_ AV *ary, SV **lelem, SV **firstlelem, SV **relem, SV **lastrelem); STATIC void S_do_oddball(pTHX_ HV *hash, SV **relem, SV **firstrelem); STATIC CV* S_get_db_sub(pTHX_ SV **svp, CV *cv); STATIC SV* S_method_common(pTHX_ SV* meth, U32* hashp); |