diff options
author | Robin Barker <RMBarker@cpan.org> | 2007-12-20 18:29:25 +0000 |
---|---|---|
committer | Steve Peters <steve@fisharerojo.org> | 2007-12-20 21:52:06 +0000 |
commit | 360ea906b19e0bdcdbc4a4ce534a035d46a949d5 (patch) | |
tree | e65b89c54ec06303383cf873c456c52acefd5b8e /overload.pl | |
parent | 878d132a73f5d089e821fedd49aa4835a2786d1d (diff) | |
download | perl-360ea906b19e0bdcdbc4a4ce534a035d46a949d5.tar.gz |
make miniperl -Wwrite-strings clean
From: "Robin Barker" <Robin.Barker@npl.co.uk>
Message-ID: <46A0F33545E63740BC7563DE59CA9C6D09399A@exchsvr2.npl.ad.local>
p4raw-id: //depot/perl@32681
Diffstat (limited to 'overload.pl')
-rw-r--r-- | overload.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/overload.pl b/overload.pl index a86222edf5..0c25cdf494 100644 --- a/overload.pl +++ b/overload.pl @@ -84,7 +84,7 @@ print C <<"EOT"; $lastlen }; -char * const PL_AMG_names[NofAMmeth] = { +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 |