B, B::C, perlcc, t/TEST

[p5sagit/p5-mst-13.2.git] / ext / B / defsubs_h.PL

diff --git a/ext/B/defsubs_h.PL b/ext/B/defsubs_h.PL
index df64ab3..37bfeb7 100644 (file)
--- a/ext/B/defsubs_h.PL
+++ b/ext/B/defsubs_h.PL
@@ -12,7 +12,7 @@ foreach my $const (qw(
                      SVf_READONLY SVTYPEMASK
                      GVf_IMPORTED_AV GVf_IMPORTED_HV
                      GVf_IMPORTED_SV GVf_IMPORTED_CV
-                     CVf_METHOD CVf_LOCKED CVf_LVALUE
+                     CVf_METHOD CVf_LOCKED CVf_LVALUE CVf_CONST
                       SVpad_OUR SVf_IOK SVf_IVisUV SVf_NOK SVf_POK 
                      SVf_ROK SVp_IOK SVp_POK SVp_NOK
                      ))