From: Rafael Garcia-Suarez <rgarciasuarez@gmail.com>
Date: Sun, 21 Mar 2004 13:26:33 +0000 (+0000)
Subject: Silence a gcc warning.
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=cc2578a46ad3ddc084ebf3cc2ad1490a957bdef0;p=p5sagit%2Fp5-mst-13.2.git

Silence a gcc warning.

p4raw-id: //depot/perl@22546
---

diff --git a/sv.c b/sv.c
index 02e2b55..00c5cde 100644
--- a/sv.c
+++ b/sv.c
@@ -3494,7 +3494,7 @@ Perl_sv_utf8_upgrade_flags(pTHX_ register SV *sv, I32 flags)
 	 }
 	 if (hibit) {
 	      STRLEN len;
-	      SvOOK_off(sv);
+	      (void)SvOOK_off(sv);
 	      s = (U8*)SvPVX(sv);
 	      len = SvCUR(sv) + 1; /* Plus the \0 */
 	      SvPVX(sv) = (char*)bytes_to_utf8((U8*)s, &len);