diff options
| author | Brandon Black <blblack@gmail.com> | 2007-05-29 14:08:13 -0500 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-05-30 15:21:10 +0000 |
| commit | 2c7f4b87d1721d033cf5fc3b5a553f25a8d8485f (patch) | |
| tree | 430444390cb3e068f0568931793ceb10a9e48aef /hv.h | |
| parent | 46c458a0aac497162070e892c9801b12c9c3ac48 (diff) | |
| download | perl-2c7f4b87d1721d033cf5fc3b5a553f25a8d8485f.tar.gz | |
Re: HvMROMETA
From: "Brandon Black" <blblack@gmail.com>
Message-ID: <84621a60705291708m3f106d74r473f3d91c780163d@mail.gmail.com>
p4raw-id: //depot/perl@31312
Diffstat (limited to 'hv.h')
| -rw-r--r-- | hv.h | 10 |
1 files changed, 7 insertions, 3 deletions
@@ -261,9 +261,13 @@ C<SV*>. #define HvRITER_get(hv) (SvOOK(hv) ? HvAUX(hv)->xhv_riter : -1) #define HvEITER_get(hv) (SvOOK(hv) ? HvAUX(hv)->xhv_eiter : 0) #define HvNAME(hv) HvNAME_get(hv) -#define HvMROMETA(hv) (SvOOK(hv) \ - ? (HvAUX(hv)->xhv_mro_meta ? HvAUX(hv)->xhv_mro_meta : mro_meta_init(hv)) \ - : NULL) + +/* Checking that hv is a valid package stash is the + caller's responsibility */ +#define HvMROMETA(hv) (HvAUX(hv)->xhv_mro_meta \ + ? HvAUX(hv)->xhv_mro_meta \ + : mro_meta_init(hv)) + /* FIXME - all of these should use a UTF8 aware API, which should also involve getting the length. */ /* This macro may go away without notice. */ |