Silence yet more bcc32 compiler warnings

("Code has no effect")

p4raw-id: //depot/perl@24939

3 files changed, 4 insertions, 4 deletions

diff --git a/hv.c b/hv.c
index 0157886b9d..eb2a1a5aa7 100644
--- a/hv.c
+++ b/hv.c
@@ -134,7 +134,7 @@ Perl_hek_dup(pTHX_ HEK *source, CLONE_PARAMS* param)
 
     if (shared) {
 	/* We already shared this hash key.  */
-	share_hek_hek(shared);
+	(void)share_hek_hek(shared);
     }
     else {
 	shared
@@ -176,7 +176,7 @@ Perl_he_dup(pTHX_ HE *e, bool shared, CLONE_PARAMS* param)
 
 	if (shared) {
 	    /* We already shared this hash key.  */
-	    share_hek_hek(shared);
+	    (void)share_hek_hek(shared);
 	}
 	else {
 	    shared
diff --git a/pp_ctl.c b/pp_ctl.c
index 6fd1add267..94a3f31ab6 100644
--- a/pp_ctl.c
+++ b/pp_ctl.c
@@ -295,7 +295,7 @@ PP(pp_substcont)
 	mg->mg_len = i;
     }
     if (old != rx)
-	ReREFCNT_inc(rx);
+	(void)ReREFCNT_inc(rx);
     cx->sb_rxtainted |= RX_MATCH_TAINTED(rx);
     rxres_save(&cx->sb_rxres, rx);
     RETURNOP(pm->op_pmreplstart);
diff --git a/pp_hot.c b/pp_hot.c
index bd61e40217..8df8e09cd2 100644
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -2195,7 +2195,7 @@ PP(pp_subst)
 	if (!c) {
 	    register PERL_CONTEXT *cx;
 	    SPAGAIN;
-	    ReREFCNT_inc(rx);
+	    (void)ReREFCNT_inc(rx);
 	    PUSHSUBST(cx);
 	    RETURNOP(cPMOP->op_pmreplroot);
 	}