S_* functions should be STATIC
authorJan Dubois <jand@activestate.com>
Thu, 4 Apr 2013 21:12:04 +0000 (14:12 -0700)
committerJan Dubois <jand@activestate.com>
Thu, 4 Apr 2013 21:12:04 +0000 (14:12 -0700)
pp_hot.c
utf8.c

index 7eb0c61..361b488 100644 (file)
--- a/pp_hot.c
+++ b/pp_hot.c
@@ -322,7 +322,7 @@ PP(pp_concat)
  * I suspect that the mg_get is no longer needed, but while padav
  * differs, it can't share this function */
 
-void
+STATIC void
 S_pushav(pTHX_ AV* const av)
 {
     dSP;
diff --git a/utf8.c b/utf8.c
index 511e845..2228778 100644 (file)
--- a/utf8.c
+++ b/utf8.c
@@ -1512,8 +1512,10 @@ Perl_is_uni_alnumc(pTHX_ UV c)
     return _is_utf8_FOO(_CC_ALPHANUMERIC, tmpbuf);
 }
 
-bool    /* Internal function so we can deprecate the external one, and call
-           this one from other deprecated functions in this file */
+/* Internal function so we can deprecate the external one, and call
+   this one from other deprecated functions in this file */
+
+PERL_STATIC_INLINE bool
 S_is_utf8_idfirst(pTHX_ const U8 *p)
 {
     dVAR;