diff options
author | Niko Tyni <ntyni@debian.org> | 2009-04-14 22:55:34 +0300 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2009-04-16 23:18:46 +0200 |
commit | c0cc52e96e988526754ef533bd76595720660db2 (patch) | |
tree | c4a4da2482d5c5991ac3a2a59bd374c95b92279e /utils/h2ph.PL | |
parent | c1a2df7619e7315b8fccef3b9fa56bb8d7df3845 (diff) | |
download | perl-c0cc52e96e988526754ef533bd76595720660db2.tar.gz |
Squelch 'Constant subroutine ... undefined' warnings from .ph files
As reported by Christopher Zimmermann in <http://bugs.debian.org/379757>,
code generated from simple #undef directives by h2ph can cause
'Constant subroutine ... undefined' warnings if the undefined
function was eligible for inlining.
Diffstat (limited to 'utils/h2ph.PL')
-rw-r--r-- | utils/h2ph.PL | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/utils/h2ph.PL b/utils/h2ph.PL index 6f40126fff..4e99a7a92f 100644 --- a/utils/h2ph.PL +++ b/utils/h2ph.PL @@ -123,7 +123,7 @@ while (defined (my $file = next_file())) { print OUT "require '_h2ph_pre.ph';\n\n", - "no warnings 'redefine';\n\n"; + "no warnings qw(redefine misc);\n\n"; while (defined (local $_ = next_line($file))) { if (s/^\s*\#\s*//) { |