summaryrefslogtreecommitdiff
path: root/mg.c
diff options
context:
space:
mode:
authorTony Cook <tony@develop-help.com>2022-07-12 10:37:30 +1000
committerTony Cook <tony@develop-help.com>2022-08-08 15:15:02 +1000
commit90eef0af06f8dd17dd39a5ed9827264ff5b6b981 (patch)
treef153058eb8fd9425b23e5e0420ffcf8a3ef2e95d /mg.c
parenta577a1f18e7562749b5949934cacb911a1551dbd (diff)
downloadperl-90eef0af06f8dd17dd39a5ed9827264ff5b6b981.tar.gz
explicitly ignore the result of sv_utf8_downgrade()
Coverity complains about this because most other calls are checked. CIDs 353483, 353003, 353000, 352998, 352995
Diffstat (limited to 'mg.c')
-rw-r--r--mg.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/mg.c b/mg.c
index 55cb5bab72..cab3b8227e 100644
--- a/mg.c
+++ b/mg.c
@@ -1264,7 +1264,7 @@ Perl_magic_setenv(pTHX_ SV *sv, MAGIC *mg)
/* defined environment variables are byte strings; unfortunately
there is no SvPVbyte_force_nomg(), so we must do this piecewise */
(void)SvPV_force_nomg_nolen(sv);
- sv_utf8_downgrade(sv, /* fail_ok */ TRUE);
+ (void)sv_utf8_downgrade(sv, /* fail_ok */ TRUE);
if (SvUTF8(sv)) {
Perl_ck_warner_d(aTHX_ packWARN(WARN_UTF8), "Wide character in %s", "setenv");
SvUTF8_off(sv);