diff options
| author | Marcus Holland-Moritz <mhx-perl@gmx.net> | 2008-10-29 23:04:34 +0000 |
|---|---|---|
| committer | Marcus Holland-Moritz <mhx-perl@gmx.net> | 2008-10-29 23:04:34 +0000 |
| commit | 76f68e9bb86f29e34e2aeb5c177571288f05b7ca (patch) | |
| tree | 5d94b541dac7cf118c0a7f00f82e41b8883db427 /regcomp.c | |
| parent | 502c6561fcd473b7da3277363169d75f16ac2f8b (diff) | |
| download | perl-76f68e9bb86f29e34e2aeb5c177571288f05b7ca.tar.gz | |
Use pvs macros instead of pvn where possible.
p4raw-id: //depot/perl@34653
Diffstat (limited to 'regcomp.c')
| -rw-r--r-- | regcomp.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -8973,7 +8973,7 @@ Perl_regprop(pTHX_ const regexp *prog, SV *sv, const regnode *o) PERL_ARGS_ASSERT_REGPROP; - sv_setpvn(sv, "", 0); + sv_setpvs(sv, ""); if (OP(o) > REGNODE_MAX) /* regnode.type is unsigned */ /* It would be nice to FAIL() here, but this may be called from @@ -9949,7 +9949,7 @@ S_dumpuntil(pTHX_ const regexp *r, const regnode *start, const regnode *node, #endif const regnode *nextbranch= NULL; I32 word_idx; - sv_setpvn(sv, "", 0); + sv_setpvs(sv, ""); for (word_idx= 0; word_idx < (I32)trie->wordcount; word_idx++) { SV ** const elem_ptr = av_fetch(trie_words,word_idx,0); |