This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
concise-xs.t is overly chummy with B::Deparse
authorFather Chrysostomos <sprout@cpan.org>
Sat, 13 Sep 2014 07:09:30 +0000 (00:09 -0700)
committerFather Chrysostomos <sprout@cpan.org>
Sat, 13 Sep 2014 07:09:39 +0000 (00:09 -0700)
ext/B/t/concise-xs.t

index 2cad249..2f1737a 100644 (file)
@@ -171,7 +171,7 @@ my $testpkgs = {
                     PMf_MULTILINE PMf_ONCE PMf_SINGLELINE
                     POSTFIX SVf_FAKE SVf_IOK SVf_NOK SVf_POK SVf_ROK
                     SVpad_OUR SVs_RMG SVs_SMG SWAP_CHILDREN OPpPAD_STATE
-                    OPpCONST_ARYBASE RXf_SKIPWHITE/,
+                    OPpCONST_ARYBASE RXf_SKIPWHITE SVpad_TYPED/,
                     $] >= 5.015 ? qw(
                     OP_GLOB PMf_SKIPWHITE RXf_PMf_CHARSET RXf_PMf_KEEPCOPY
                     OPpEVAL_BYTES OPpSUBSTR_REPL_FIRST) : (),