From: Nicholas Clark <nick@ccl4.org>
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)