hexfp: if HEXFP_NV the shift2 is unused

HEXFP_NV happens with e.g. -Duselongdouble.  The unusedness is
warned about by e.g. gcc/g++ at least since 4.6, but seemingly
not by clang, even at 3.7.

1 files changed, 1 insertions, 0 deletions

diff --git a/toke.c b/toke.c
index 2c0a3c9d17..d665b3d088 100644
--- a/toke.c
+++ b/toke.c
@@ -10505,6 +10505,7 @@ Perl_scan_num(pTHX_ const char *start, YYSTYPE* lvalp)
                                 hexfp_uquad |= b;
                                 hexfp_frac_bits += shift2;
 #else /* HEXFP_NV */
+                                PERL_UNUSED_VAR(shift2);
                                 hexfp_nv += b * mult;
                                 mult /= 16.0;
 #endif