regexec.c: Add PERL_UNIUSED_VAR()
authorKarl Williamson <public@khwilliamson.com>
Mon, 19 Nov 2012 17:59:38 +0000 (10:59 -0700)
committerKarl Williamson <public@khwilliamson.com>
Tue, 20 Nov 2012 00:13:01 +0000 (17:13 -0700)
This is an attempt to silence warnings on some compilers.

regexec.c

index 72e2d7b..69bda15 100644 (file)
--- a/regexec.c
+++ b/regexec.c
@@ -159,6 +159,7 @@ static const char* const non_utf8_target_but_utf8_required
        bool throw_away PERL_UNUSED_DECL; \
        ENTER; save_re_context(); \
        throw_away = CAT2(is_utf8_,class)((const U8*)" "); \
+        PERL_UNUSED_VAR(throw_away); \
        LEAVE; } } STMT_END
 
 #define LOAD_UTF8_CHARCLASS_ALNUM() LOAD_UTF8_CHARCLASS(alnum,"a")