diff options
| author | Nicholas Clark <nick@ccl4.org> | 2009-04-13 10:51:20 +0100 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2009-04-13 10:51:20 +0100 |
| commit | aa381260d040715959bedd55abd0e5e3686174bd (patch) | |
| tree | ffd5fa167f9e57609a8e34984698d412fede8c4b /ext/B/defsubs_h.PL | |
| parent | f9cd5d9f11faa2de88f900872c21e75c5d491a24 (diff) | |
| download | perl-aa381260d040715959bedd55abd0e5e3686174bd.tar.gz | |
A perl-version portable fix for B coping with CVf_LOCKED being removed in 5.11.
Diffstat (limited to 'ext/B/defsubs_h.PL')
| -rw-r--r-- | ext/B/defsubs_h.PL | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/ext/B/defsubs_h.PL b/ext/B/defsubs_h.PL index fa8aff0909..684ca26fb0 100644 --- a/ext/B/defsubs_h.PL +++ b/ext/B/defsubs_h.PL @@ -67,6 +67,11 @@ if ($] >= 5.009) { doconst(AVf_REAL); } +if ($] < 5.011) { + # Constant not present after 5.10.x + doconst(CVf_LOCKED); +} + foreach my $tuple (['op.h'],['cop.h'],['regexp.h','RXf_']) { my $file = $tuple->[0]; |