From: Nicholas Clark Date: Tue, 21 Feb 2006 16:28:02 +0000 (+0000) Subject: Teach B about CVf_ISXSUB X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e678f8d36a88cb1c3542ecd26158b5482e6f3af3;p=p5sagit%2Fp5-mst-13.2.git Teach B about CVf_ISXSUB p4raw-id: //depot/perl@27261 --- diff --git a/ext/B/defsubs_h.PL b/ext/B/defsubs_h.PL index 1a87772..f8c4225 100644 --- a/ext/B/defsubs_h.PL +++ b/ext/B/defsubs_h.PL @@ -22,6 +22,7 @@ foreach my $const (qw( CVf_LVALUE CVf_METHOD CVf_NODEBUG + CVf_ISXSUB CVf_UNIQUE CVf_WEAKOUTSIDE GVf_IMPORTED_AV diff --git a/ext/B/t/concise-xs.t b/ext/B/t/concise-xs.t index 447c13d..dcd868f 100644 --- a/ext/B/t/concise-xs.t +++ b/ext/B/t/concise-xs.t @@ -117,7 +117,7 @@ use Getopt::Std; use Carp; use Test::More tests => ( # per-pkg tests (function ct + require_ok) 40 + 16 # Data::Dumper, Digest::MD5 - + 511 + 233 # B::Deparse, B + + 511 + 234 # B::Deparse, B + 588 + 189 # POSIX, IO::Socket + 3 * ($] > 5.009) + 14 * ($] >= 5.009003)