perldiag: s/about where/whereabouts/

[perl5.git] / dquote_static.c

diff --git a/dquote_static.c b/dquote_static.c
index 4ab05cf..868cd06 100644 (file)
--- a/dquote_static.c
+++ b/dquote_static.c
@@ -8,7 +8,6 @@
 */
 
 #define PERL_IN_DQUOTE_STATIC_C
-#include "proto.h"
 #include "embed.h"
 
 /*
@@ -16,7 +15,7 @@
     Pulled from regcomp.c.
  */
 PERL_STATIC_INLINE I32
-S_regcurly(pTHX_ register const char *s)
+S_regcurly(pTHX_ const char *s)
 {
     PERL_ARGS_ASSERT_REGCURLY;
 
@@ -196,6 +195,7 @@ S_grok_bslash_x(pTHX_ const char *s,
 
     PERL_ARGS_ASSERT_GROK_BSLASH_X;
 
+    PERL_UNUSED_ARG(output_warning);
 
     assert(*s == 'x');
     s++;