diff options
| author | Paul "LeoNerd" Evans <leonerd@leonerd.org.uk> | 2022-10-25 15:37:00 +0100 |
|---|---|---|
| committer | Paul Evans <leonerd@leonerd.org.uk> | 2022-10-25 17:03:27 +0100 |
| commit | 8f0b3fcc4329e278204a58fd52feabdf9e4c5681 (patch) | |
| tree | 84f8d9e59ddc6698271f30b5d322ef3cbccd37b2 /proto.h | |
| parent | dd8f4e6b1cdd0b2bce8bb0601054d575b69b4265 (diff) | |
| download | perl-8f0b3fcc4329e278204a58fd52feabdf9e4c5681.tar.gz | |
Add sv_derived_from_hv() helper function
Diffstat (limited to 'proto.h')
| -rw-r--r-- | proto.h | 5 |
1 files changed, 5 insertions, 0 deletions
@@ -3897,6 +3897,11 @@ PERL_CALLCONV bool Perl_sv_derived_from(pTHX_ SV* sv, const char *const name) #define PERL_ARGS_ASSERT_SV_DERIVED_FROM \ assert(sv); assert(name) +PERL_CALLCONV bool Perl_sv_derived_from_hv(pTHX_ SV* sv, HV *hv) + __attribute__warn_unused_result__; +#define PERL_ARGS_ASSERT_SV_DERIVED_FROM_HV \ + assert(sv); assert(hv) + PERL_CALLCONV bool Perl_sv_derived_from_pv(pTHX_ SV* sv, const char *const name, U32 flags) __attribute__warn_unused_result__; #define PERL_ARGS_ASSERT_SV_DERIVED_FROM_PV \ |