summaryrefslogtreecommitdiff
path: root/pp_ctl.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2018-08-05 06:41:05 -0600
committerKarl Williamson <khw@cpan.org>2018-08-06 10:02:12 -0600
commitf8db7d5b698ee09de200fdee909d6f4ea719ffac (patch)
treed38212cbf0b26ae7cf95d89a191cc02296d24966 /pp_ctl.c
parent00d976bbd170bbdc283618817b02b1b8f46bddd4 (diff)
downloadperl-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.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/pp_ctl.c b/pp_ctl.c
index c046eda267..17d4f0d14a 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -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 */