diff options
| author | David Mitchell <davem@iabyn.com> | 2017-02-24 16:11:34 +0000 |
|---|---|---|
| committer | David Mitchell <davem@iabyn.com> | 2017-06-05 12:52:18 +0100 |
| commit | 7a4a81c99a2e1dd2397d2007137a2290ddcdfb73 (patch) | |
| tree | b3ef26b2b6c3fc5b380fcf5548b584590f4e8f9a /Porting | |
| parent | 82ab48fa8c6c51b80c9b69419850061640110339 (diff) | |
| download | perl-7a4a81c99a2e1dd2397d2007137a2290ddcdfb73.tar.gz | |
Deparse: better handle BEGIN { use_ok() }
Commit v5.25.3-111-g8071973 added handling for the bad deparsing of
BEGIN { use_ok() }
Basically by stripping out the bad code text *after* it had been deparsed.
However, this didn't catch all bad cases - in particular, where #line
directives got added:
use Socket (@{
#line 10 "t/000_load.t"
$args[0];});
Under TEST -deparse, this fixes the following unexpectedly failing
scripts:
../cpan/Term-ANSIColor/t/taint/basic.t
../cpan/autodie/t/00-load.t
../dist/Locale-Maketext/t/01_about_verbose.t
../dist/Locale-Maketext/t/10_make.t
../dist/Locale-Maketext/t/20_get.t
../dist/Locale-Maketext/t/40_super.t
../dist/Locale-Maketext/t/50_super.t
../dist/Locale-Maketext/t/60_super.t
../dist/Locale-Maketext/t/70_fail_auto.t
../dist/Locale-Maketext/t/91_backslash.t
../ext/File-Glob/t/taint.t
../ext/Hash-Util/t/Util.t
../lib/DB.t
../lib/File/Basename.t
and fixes the following expected-to-fail script:
../dist/Net-Ping/t/000_load.t
Diffstat (limited to 'Porting')
| -rw-r--r-- | Porting/deparse-skips.txt | 14 |
1 files changed, 0 insertions, 14 deletions
diff --git a/Porting/deparse-skips.txt b/Porting/deparse-skips.txt index 2a1473fa8c..0d386db5ab 100644 --- a/Porting/deparse-skips.txt +++ b/Porting/deparse-skips.txt @@ -32,7 +32,6 @@ __DEPARSE_FAILURES__ ../cpan/Scalar-List-Utils/t/proto.t -../cpan/Term-ANSIColor/t/taint/basic.t ../cpan/autodie/t/internal.t ../cpan/AutoLoader/t/01AutoLoader.t ../cpan/CGI/t/utf8.t @@ -48,7 +47,6 @@ __DEPARSE_FAILURES__ ../cpan/Test-Simple/t/plan_bad.t ../cpan/Test-Simple/t/subtest/line_numbers.t ../cpan/Test-Simple/t/subtest/predicate.t -../cpan/autodie/t/00-load.t ../cpan/autodie/t/autodie.t ../cpan/autodie/t/blog_hints.t ../cpan/autodie/t/caller.t @@ -91,14 +89,6 @@ __DEPARSE_FAILURES__ ../dist/Exporter/t/Exporter.t ../dist/Filter-Simple/t/data.t ../dist/IO/t/io_sel.t -../dist/Locale-Maketext/t/01_about_verbose.t -../dist/Locale-Maketext/t/10_make.t -../dist/Locale-Maketext/t/20_get.t -../dist/Locale-Maketext/t/40_super.t -../dist/Locale-Maketext/t/50_super.t -../dist/Locale-Maketext/t/60_super.t -../dist/Locale-Maketext/t/70_fail_auto.t -../dist/Locale-Maketext/t/91_backslash.t ../dist/Math-BigInt/t/const_mbf.t ../dist/Math-BigInt/t/constant.t ../dist/PathTools/t/cwd.t @@ -126,8 +116,6 @@ __DEPARSE_FAILURES__ ../ext/B/t/optree_samples.t ../ext/B/t/xref.t ../ext/Devel-Peek/t/Peek.t -../ext/File-Glob/t/taint.t -../ext/Hash-Util/t/Util.t ../ext/IPC-Open3/t/IPC-Open2.t ../ext/IPC-Open3/t/IPC-Open3.t ../ext/XS-APItest/t/autoload.t @@ -136,9 +124,7 @@ __DEPARSE_FAILURES__ ../ext/XS-APItest/t/cleanup.t ../ext/XS-APItest/t/fetch_pad_names.t ../ext/XS-APItest/t/svpeek.t -../lib/DB.t ../lib/English.t -../lib/File/Basename.t ../lib/charnames.t ../lib/overload.t base/lex.t # checks regexp stringification |