This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
In B::REGEX::precomp, use newSVpvn_flags() instead of newSVpvn().
authorNicholas Clark <nick@ccl4.org>
Sun, 7 Nov 2010 10:36:57 +0000 (10:36 +0000)
committerNicholas Clark <nick@ccl4.org>
Mon, 8 Nov 2010 07:55:09 +0000 (07:55 +0000)
commit154b88420588b0827f180ef3f77658ea35d8b3e7
tree8159c4c23c3c6e803dc1176f9ae7cb3fe3490b4e
parent89c6bc139ff134699ff97779d3d2e4f044cfdb97
In B::REGEX::precomp, use newSVpvn_flags() instead of newSVpvn().

Using newSVpvn_flags() and SVt_TEMP and an explicit push is one API call.
newSVpvn() and RETVAL results in a second API call, sv_2mortal(), in the return
typemap.
ext/B/B.xs