diff options
author | Karl Williamson <khw@cpan.org> | 2018-08-05 06:41:05 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2018-08-06 10:02:12 -0600 |
commit | f8db7d5b698ee09de200fdee909d6f4ea719ffac (patch) | |
tree | d38212cbf0b26ae7cf95d89a191cc02296d24966 /pp_ctl.c | |
parent | 00d976bbd170bbdc283618817b02b1b8f46bddd4 (diff) | |
download | perl-f8db7d5b698ee09de200fdee909d6f4ea719ffac.tar.gz |
Use sv_catpvs where appropriate vs sv_catpv
This moves calculations definitely to compile time; some optimizing
compilers may already do this, but some may not.
Diffstat (limited to 'pp_ctl.c')
-rw-r--r-- | pp_ctl.c | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -4218,7 +4218,7 @@ S_require_file(pTHX_ SV *sv) } if (c == e && isIDFIRST_lazy_if_safe(name, e, utf8)) { - sv_catpv(msg, " (you may need to install the "); + sv_catpvs(msg, " (you may need to install the "); for (c = name; c < e; c++) { if (*c == '/') { sv_catpvs(msg, "::"); @@ -4227,14 +4227,14 @@ S_require_file(pTHX_ SV *sv) sv_catpvn(msg, c, 1); } } - sv_catpv(msg, " module)"); + sv_catpvs(msg, " module)"); } } else if (memENDs(name, len, ".h")) { - sv_catpv(msg, " (change .h to .ph maybe?) (did you run h2ph?)"); + sv_catpvs(msg, " (change .h to .ph maybe?) (did you run h2ph?)"); } else if (memENDs(name, len, ".ph")) { - sv_catpv(msg, " (did you run h2ph?)"); + sv_catpvs(msg, " (did you run h2ph?)"); } /* diag_listed_as: Can't locate %s */ |