diff options
author | Nicholas Clark <nick@ccl4.org> | 2006-05-20 11:29:26 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2006-05-20 11:29:26 +0000 |
commit | 7b0bddfae402018e486a2f1fa0daf4581b85b65b (patch) | |
tree | 15b7cbc8a733cb29f8a8e9286cdb4a6950316953 /embed.fnc | |
parent | 8ff9a42beba9f4156f50b64fd80480645efd8c5a (diff) | |
download | perl-7b0bddfae402018e486a2f1fa0daf4581b85b65b.tar.gz |
Abolish cop_arybase. Signal a non zero $[ with a hint flag, and store
the value in the hints structure used for %^H.
p4raw-id: //depot/perl@28250
Diffstat (limited to 'embed.fnc')
-rw-r--r-- | embed.fnc | 4 |
1 files changed, 4 insertions, 0 deletions
@@ -308,6 +308,9 @@ ApdR |SV* |hv_iterval |NN HV* tb|NN HE* entry Ap |void |hv_ksplit |NN HV* hv|IV newmax Apdbm |void |hv_magic |NN HV* hv|NULLOK GV* gv|int how dpoM |HV * |refcounted_he_chain_2hv|NULLOK const struct refcounted_he *c +XEpoM |SV * |refcounted_he_fetch|NN const struct refcounted_he *chain \ + |NULLOK SV *keysv|NULLOK const char *key \ + |STRLEN klen, int flags, U32 hash dpoM |void |refcounted_he_free|NULLOK struct refcounted_he *he dpoM |struct refcounted_he *|refcounted_he_new \ |NULLOK struct refcounted_he *const parent \ @@ -1094,6 +1097,7 @@ sM |SV* |hv_delete_common|NULLOK HV* tb|NULLOK SV* keysv|NULLOK const char* key sM |HE* |hv_fetch_common|NULLOK HV* tb|NULLOK SV* keysv|NULLOK const char* key \ |STRLEN klen|int flags|int action|NULLOK SV* val|U32 hash sM |void |clear_placeholders |NN HV* hb|U32 items +sM |SV * |refcounted_he_value |NN const struct refcounted_he *he #endif #if defined(PERL_IN_MG_C) || defined(PERL_DECL_PROT) |