summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--doio.c2
-rw-r--r--op.c14
-rw-r--r--pad.c2
-rw-r--r--util.c2
4 files changed, 10 insertions, 10 deletions
diff --git a/doio.c b/doio.c
index 46ef41e413..09170188ec 100644
--- a/doio.c
+++ b/doio.c
@@ -1943,7 +1943,7 @@ Perl_cando(pTHX_ Mode_t mode, bool effective, register const Stat_t *statbufp)
}
#endif /* ! VMS */
-bool
+static bool
S_ingroup(pTHX_ Gid_t testgid, bool effective)
{
#ifdef MACOS_TRADITIONAL
diff --git a/op.c b/op.c
index f2ad7014ef..89a31ed6c5 100644
--- a/op.c
+++ b/op.c
@@ -785,7 +785,7 @@ Perl_op_refcnt_unlock(pTHX)
#define LINKLIST(o) ((o)->op_next ? (o)->op_next : linklist((OP*)o))
-OP *
+static OP *
S_linklist(pTHX_ OP *o)
{
OP *first;
@@ -817,7 +817,7 @@ S_linklist(pTHX_ OP *o)
return o->op_next;
}
-OP *
+static OP *
S_scalarkids(pTHX_ OP *o)
{
if (o && o->op_flags & OPf_KIDS) {
@@ -1207,7 +1207,7 @@ Perl_scalarvoid(pTHX_ OP *o)
return o;
}
-OP *
+static OP *
S_listkids(pTHX_ OP *o)
{
if (o && o->op_flags & OPf_KIDS) {
@@ -1296,7 +1296,7 @@ Perl_list(pTHX_ OP *o)
return o;
}
-OP *
+static OP *
S_scalarseq(pTHX_ OP *o)
{
dVAR;
@@ -2430,7 +2430,7 @@ Perl_jmaybe(pTHX_ OP *o)
return o;
}
-OP *
+static OP *
S_fold_constants(pTHX_ register OP *o)
{
dVAR;
@@ -2571,7 +2571,7 @@ S_fold_constants(pTHX_ register OP *o)
return o;
}
-OP *
+static OP *
S_gen_constant_list(pTHX_ register OP *o)
{
dVAR;
@@ -2985,7 +2985,7 @@ Perl_newNULLLIST(pTHX)
return newOP(OP_STUB, 0);
}
-OP *
+static OP *
S_force_list(pTHX_ OP *o)
{
if (!o || o->op_type != OP_LIST)
diff --git a/pad.c b/pad.c
index 715d361acd..568c8df67b 100644
--- a/pad.c
+++ b/pad.c
@@ -1150,7 +1150,7 @@ Mark all the current temporaries for reuse
* to a shared TARG. Such an alias will change randomly and unpredictably.
* We avoid doing this until we can think of a Better Way.
* GSAR 97-10-29 */
-void
+static void
S_pad_reset(pTHX)
{
dVAR;
diff --git a/util.c b/util.c
index 0287d3422a..06d7bb1716 100644
--- a/util.c
+++ b/util.c
@@ -1362,7 +1362,7 @@ S_vdie_croak_common(pTHX_ const char* pat, va_list* args, STRLEN* msglen,
return message;
}
-OP *
+static OP *
S_vdie(pTHX_ const char* pat, va_list *args)
{
dVAR;