summaryrefslogtreecommitdiff
path: root/sv.h
diff options
context:
space:
mode:
authorGisle Aas <gisle@activestate.com>2006-01-04 14:04:16 +0000
committerGisle Aas <gisle@activestate.com>2006-01-04 14:04:16 +0000
commit18916d0db6e8b0ac0abf09300cb33647d974ddc0 (patch)
tree310d7227ad38d4f86342bd66d2891c92c7716c6e /sv.h
parent6a245ed1e7ef6f728779f8328fb52e42b1aa0b8c (diff)
downloadperl-18916d0db6e8b0ac0abf09300cb33647d974ddc0.tar.gz
Introduce newSVpvs_share() macro.
Gets rid of some hardcoded string lengths. p4raw-id: //depot/perl@26646
Diffstat (limited to 'sv.h')
-rw-r--r--sv.h1
1 files changed, 1 insertions, 0 deletions
diff --git a/sv.h b/sv.h
index f2bbe106e2..479b44279b 100644
--- a/sv.h
+++ b/sv.h
@@ -1426,6 +1426,7 @@ Like C<sv_catsv> but doesn't process magic.
#define sv_2uv(sv) sv_2uv_flags(sv, SV_GMAGIC)
#define newSVpvs(str) newSVpvn(STR_WITH_LEN(str))
+#define newSVpvs_share(str) newSVpvn_share(STR_WITH_LEN(str), 0)
#define sv_catpvs(sv, str) sv_catpvn_flags(sv, STR_WITH_LEN(str), SV_GMAGIC)
/* Should be named SvCatPVN_utf8_upgrade? */