diff options
| -rwxr-xr-x | genpacksizetables.pl | 2 | ||||
| -rw-r--r-- | pp_pack.c | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/genpacksizetables.pl b/genpacksizetables.pl index 5872e86a9c..9dffc2c6ca 100755 --- a/genpacksizetables.pl +++ b/genpacksizetables.pl @@ -38,7 +38,7 @@ sub make_tables { $unpredictable, $nocsum, $size, $condition); } - my $text = "const packprops_t packprops[512] = {\n"; + my $text = "STATIC const packprops_t packprops[512] = {\n"; foreach my $arrayname (qw(normal shrieking)) { my $array = $arrays{$arrayname} || die "No defined entries in $arrayname"; @@ -369,7 +369,7 @@ S_mul128(pTHX_ SV *sv, U8 m) typedef U8 packprops_t; #if 'J'-'I' == 1 /* ASCII */ -const packprops_t packprops[512] = { +STATIC const packprops_t packprops[512] = { /* normal */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, @@ -490,7 +490,7 @@ const packprops_t packprops[512] = { }; #else /* EBCDIC (or bust) */ -const packprops_t packprops[512] = { +STATIC const packprops_t packprops[512] = { /* normal */ 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, |