From: Vincent Pit <vince@profvince.com>
Date: Thu, 19 Mar 2015 14:23:09 +0000 (-0300)
Subject: Silence an "unused label" compiler warning
X-Git-Tag: v0.27~17
X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=3dd049db64b7cecb2f4f12fb0a6f4043155429ee;p=perl%2Fmodules%2FScope-Upper.git

Silence an "unused label" compiler warning
---

diff --git a/Upper.xs b/Upper.xs
index fcd4012..c311bf2 100644
--- a/Upper.xs
+++ b/Upper.xs
@@ -2707,7 +2707,9 @@ PPCODE:
     goto context_info_warnings_off;
 #endif
   } else if (old_warnings == pWARN_NONE) {
+#if !SU_HAS_PERL(5, 17, 4)
 context_info_warnings_off:
+#endif
    mask = su_newmortal_pvn(WARN_NONEstring, WARNsize);
   } else if (old_warnings == pWARN_ALL) {
    HV *bits;