This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
scoping
[perl5.git] / ext / B / defsubs_h.PL
index da6566b..df64ab3 100644 (file)
@@ -13,7 +13,7 @@ foreach my $const (qw(
                      GVf_IMPORTED_AV GVf_IMPORTED_HV
                      GVf_IMPORTED_SV GVf_IMPORTED_CV
                      CVf_METHOD CVf_LOCKED CVf_LVALUE
-                      SVf_IOK SVf_IVisUV SVf_NOK SVf_POK 
+                      SVpad_OUR SVf_IOK SVf_IVisUV SVf_NOK SVf_POK 
                      SVf_ROK SVp_IOK SVp_POK SVp_NOK
                      ))
  {