diff options
| author | Gisle Aas <gisle@aas.no> | 2005-11-04 21:08:03 -0800 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2005-11-07 12:20:59 +0000 |
| commit | f43a9a3142f71956ec256aa7b03ca89db65cbb0c (patch) | |
| tree | e9732d63f56305fe09f3bf4b78e6c55323eb479f | |
| parent | a524427e6ceca2ff254244fa1710549aac1dcfba (diff) | |
| download | perl-f43a9a3142f71956ec256aa7b03ca89db65cbb0c.tar.gz | |
Missing static declarations
Message-ID: <lracgj1bv0.fsf@caliper.activestate.com>
p4raw-id: //depot/perl@26032
| -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, |