fix deparsing of Test::More's use_ok()
authorDavid Mitchell <davem@iabyn.com>
Fri, 22 Jul 2016 13:24:33 +0000 (14:24 +0100)
committerDavid Mitchell <davem@iabyn.com>
Wed, 3 Aug 2016 19:54:41 +0000 (20:54 +0100)
commit8071973380dd6ab72594798e38d0a8eaa9d1e930
tree511d44f6ec969ad38b4206b9f96d89d6314d9c3d
parent9527dbddfb3f22c37a3874479472219885daa8c1
fix deparsing of Test::More's use_ok()

Code like

    BEGIN {use_ok 'Net::Ping'};

got deparsed as:

    BEGIN {use_ok 'Net::Ping'};
    use Net::Ping (@{$args[0];});

This is due to the tricks it plays faking up and evaling a use statement.

This commit filters out these spurious 'use's in the Deparse output.

With this commit, 109 'TEST -deparse' tests that were expected to pass
but had been failing for some time, now pass; and 22 tests that were
expected to fail, now pass.

I also removed the entry for lib/Switch/t/ in Porting/deparse-skips.txt,
since Switch is no longer bundled.
Porting/deparse-skips.txt
lib/B/Deparse.pm