diff options
author | Nicholas Clark <nick@ccl4.org> | 2007-10-06 12:23:15 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2007-10-06 12:23:15 +0000 |
commit | f3a2811a943652950bfdb6408b09c32b4bf531d0 (patch) | |
tree | 4c1a0f267bae872b1fa8b30e7bf0e230bfbfef3b /regcomp.c | |
parent | 550e2ce03d201c2e16d6755c5e8b7feb3b2afe06 (diff) | |
download | perl-f3a2811a943652950bfdb6408b09c32b4bf531d0.tar.gz |
Avoid using *pvf functions when the format string is a fixed string.
p4raw-id: //depot/perl@32043
Diffstat (limited to 'regcomp.c')
-rw-r--r-- | regcomp.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -8846,7 +8846,7 @@ Perl_regprop(pTHX_ const regexp *prog, SV *sv, const regnode *o) int i; int rangestart = -1; U8* bitmap = IS_ANYOF_TRIE(op) ? (U8*)ANYOF_BITMAP(o) : (U8*)TRIE_BITMAP(trie); - Perl_sv_catpvf(aTHX_ sv, "["); + sv_catpvs(sv, "["); for (i = 0; i <= 256; i++) { if (i < 256 && BITMAP_TEST(bitmap,i)) { if (rangestart == -1) @@ -8863,7 +8863,7 @@ Perl_regprop(pTHX_ const regexp *prog, SV *sv, const regnode *o) rangestart = -1; } } - Perl_sv_catpvf(aTHX_ sv, "]"); + sv_catpvs(sv, "]"); } } else if (k == CURLY) { |