diff options
Diffstat (limited to 'universal.c')
| -rw-r--r-- | universal.c | 11 |
1 files changed, 9 insertions, 2 deletions
diff --git a/universal.c b/universal.c index 855942ec8b..2af2c2b9e2 100644 --- a/universal.c +++ b/universal.c @@ -252,8 +252,7 @@ Perl_sv_does(pTHX_ SV *sv, const char *const name) /* =for apidoc sv_does_pv -Like L</sv_does_pvn>, but takes a nul-terminated string -instead of a string/length pair. +Like L</sv_does_sv>, but takes a nul-terminated string instead of an SV. =cut */ @@ -266,6 +265,14 @@ Perl_sv_does_pv(pTHX_ SV *sv, const char *const name, U32 flags) return sv_does_sv(sv, newSVpvn_flags(name, strlen(name), SVs_TEMP | flags), flags); } +/* +=for apidoc sv_does_pvn + +Like L</sv_does_sv>, but takes a string/length pair instead of an SV. + +=cut +*/ + bool Perl_sv_does_pvn(pTHX_ SV *sv, const char *const name, const STRLEN len, U32 flags) { |