This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Add a new function newSVpvn_flags(), which takes a third parameter of
authorNicholas Clark <nick@ccl4.org>
Wed, 2 Jan 2008 23:41:21 +0000 (23:41 +0000)
committerNicholas Clark <nick@ccl4.org>
Wed, 2 Jan 2008 23:41:21 +0000 (23:41 +0000)
commit740cce10afff4bec3346f61ab3d0f7bfa424948c
tree83c031300e2326e8d8ae399e088c4d3a42472a13
parente350b669f3dadb9da757b62a20659cbc7eca2190
Add a new function newSVpvn_flags(), which takes a third parameter of
flag bits. Right now the only flag bit is SVf_UTF8, which will call
SvUTF8_on() on the new SV for you. Provide a wrapper newSVpvn_utf8(),
which takes a boolean, and passes in SVf_UTF8 if that is true.
Refactor the core to use it where possible. It makes the source code
clearer and smaller, but seems to be swings and roundabouts on object
code size.

p4raw-id: //depot/perl@32807
14 files changed:
embed.fnc
embed.h
hv.c
perl.c
pod/perlapi.pod
pp.c
pp_hot.c
pp_pack.c
proto.h
regcomp.c
sv.c
sv.h
toke.c
util.c