diff options
| author | Nicholas Clark <nick@ccl4.org> | 2005-05-21 09:29:18 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2005-05-21 09:29:18 +0000 |
| commit | ca732855658630b07dee4aa9ea6ae952226bd828 (patch) | |
| tree | 19a2e3a9bd1dad4b743cbb8283404efd55a83e39 /proto.h | |
| parent | 4325052d2625a06294068527f0d65e6f637a59ee (diff) | |
| download | perl-ca732855658630b07dee4aa9ea6ae952226bd828.tar.gz | |
Move placeholders into a new rhash magic type.
p4raw-id: //depot/perl@24525
Diffstat (limited to 'proto.h')
| -rw-r--r-- | proto.h | 5 |
1 files changed, 5 insertions, 0 deletions
@@ -2311,6 +2311,11 @@ STATIC HE* S_hv_fetch_common(pTHX_ HV* tb, SV* key_sv, const char* key, STRLEN k PERL_CALLCONV void Perl_hv_clear_placeholders(pTHX_ HV* hb); PERL_CALLCONV SV* Perl_hv_scalar(pTHX_ HV* hv); + +PERL_CALLCONV I32* Perl_hv_placeholders_p(pTHX_ HV* hv); +PERL_CALLCONV I32 Perl_hv_placeholders_get(pTHX_ HV* hv); +PERL_CALLCONV void Perl_hv_placeholders_set(pTHX_ HV* hv, I32 ph); + PERL_CALLCONV SV* Perl_magic_scalarpack(pTHX_ HV* hv, MAGIC* mg); #ifdef PERL_IN_SV_C STATIC SV* S_find_uninit_var(pTHX_ OP* obase, SV* uninit_sv, bool top); |