summaryrefslogtreecommitdiff
path: root/overload.c
diff options
context:
space:
mode:
Diffstat (limited to 'overload.c')
-rw-r--r--overload.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/overload.c b/overload.c
index 0a1ea3dd2e..2f1f870f65 100644
--- a/overload.c
+++ b/overload.c
@@ -15,7 +15,7 @@
#define AMG_id2name(id) (PL_AMG_names[id]+1)
#define AMG_id2namelen(id) (PL_AMG_namelens[id]-1)
-const U8 PL_AMG_namelens[NofAMmeth] = {
+static const U8 PL_AMG_namelens[NofAMmeth] = {
2,
4,
4,
@@ -85,7 +85,7 @@ const U8 PL_AMG_namelens[NofAMmeth] = {
7
};
-const char * const PL_AMG_names[NofAMmeth] = {
+static const char * const PL_AMG_names[NofAMmeth] = {
/* Names kept in the symbol table. fallback => "()", the rest has
"(" prepended. The only other place in perl which knows about
this convention is AMG_id2name (used for debugging output and