summaryrefslogtreecommitdiff
path: root/hv.h
diff options
context:
space:
mode:
authorZefram <zefram@fysh.org>2010-09-11 19:36:10 +0100
committerFlorian Ragwitz <rafl@debian.org>2010-09-28 21:35:02 +0200
commit9dcc53ea14d7a502bb5ac0877765bde14f8cc721 (patch)
treee04fbefccc4e81298835b1e4fb69e8db347ff810 /hv.h
parentdccfc75d21f1ac6a97926d5bac2e89d3cd22eafa (diff)
downloadperl-9dcc53ea14d7a502bb5ac0877765bde14f8cc721.tar.gz
systematically provide pv/pvn/pvs/sv quartets
Anywhere an API function takes a string in pvn form, ensure that there are corresponding pv, pvs, and sv APIs.
Diffstat (limited to 'hv.h')
-rw-r--r--hv.h3
1 files changed, 3 insertions, 0 deletions
diff --git a/hv.h b/hv.h
index 61d0ad945e..62646b3965 100644
--- a/hv.h
+++ b/hv.h
@@ -454,6 +454,9 @@ C<SV*>.
Perl_cop_hints_fetchpvn(aTHX_ (cop), SvPV_nolen(keysv), SvCUR(keysv), \
(SvUTF8(keysv) ? HVhek_UTF8 : 0), (hash))
+#define cop_hints_fetchpv(cop, key, flags, hash) \
+ Perl_cop_hints_fetchpvn(aTHX_ (cop), key, strlen(key), (flags), (hash))
+
#define cop_hints_fetchpvs(cop, key) \
Perl_cop_hints_fetchpvn(aTHX_ (cop), STR_WITH_LEN(key), 0, 0)