diff options
| author | Nicholas Clark <nick@ccl4.org> | 2002-04-13 03:58:07 +0100 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2002-04-13 15:25:55 +0000 |
| commit | e16e2ff836b177c52744755a35f12e818d01328b (patch) | |
| tree | 6e3f0cc3daa15151f159b039b24eac3b86055fa6 /hv.h | |
| parent | 0e58dc15c0a761823891aec751111291a7995805 (diff) | |
| download | perl-e16e2ff836b177c52744755a35f12e818d01328b.tar.gz | |
[dodgy PATCH] Re: [Storable] utf8 keys started working!
Message-ID: <20020413015806.GA371@Bagpuss.unfortu.net>
p4raw-id: //depot/perl@15893
Diffstat (limited to 'hv.h')
| -rw-r--r-- | hv.h | 5 |
1 files changed, 5 insertions, 0 deletions
@@ -231,6 +231,8 @@ C<SV*>. #define HVhek_UTF8 0x01 /* Key is utf8 encoded. */ #define HVhek_WASUTF8 0x02 /* Key is bytes here, but was supplied as utf8. */ #define HVhek_FREEKEY 0x100 /* Internal flag to say key is malloc()ed. */ +#define HVhek_PLACEHOLD 0x200 /* Internal flag to create placeholder. + * (may change, but Storable is a core module) */ #define HVhek_MASK 0xFF #define HEK_UTF8(hek) (HEK_FLAGS(hek) & HVhek_UTF8) @@ -251,6 +253,9 @@ C<SV*>. : (size) * sizeof(HE*) * 2 - MALLOC_OVERHEAD) #endif +/* Flags for hv_iternext_flags. */ +#define HV_ITERNEXT_WANTPLACEHOLDERS 0x01 /* Don't skip placeholders. */ + /* available as a function in hv.c */ #define Perl_sharepvn(sv, len, hash) HEK_KEY(share_hek(sv, len, hash)) #define sharepvn(sv, len, hash) Perl_sharepvn(sv, len, hash) |