diff options
author | Philippe Bruhat (BooK) <book@cpan.org> | 2022-09-24 01:51:07 +0200 |
---|---|---|
committer | Philippe Bruhat (BooK) <book@cpan.org> | 2022-09-24 14:24:08 +0200 |
commit | d7e8a0319838357a90f1fbef3584803c588df404 (patch) | |
tree | 1573ebdfdd14fda4b8cc795d2af5565c33f284c5 /lib/B | |
parent | 92ee38c43e6b2dfb9ccf6fd69cb7aba99241b629 (diff) | |
download | perl-d7e8a0319838357a90f1fbef3584803c588df404.tar.gz |
Reclaim unused bits in ${^WARNING_BITS}
`no warnings 'experimental::foo';` is effectively a no-op
if the `foo` feature is not experimental any more.
So, stop reserving bits in `${^WARNING_BITS}` for them,
and silently do nothing when they are enabled or disabled
via `use warnings` or `no warnings`.
Warnings turned into no-op in this commit:
* experimental::alpha_assertions
* experimental::bitwise
* experimental::isa
* experimental::lexical_subs
* experimental::postderef
* experimental::script_run
* experimental::signatures
Diffstat (limited to 'lib/B')
-rw-r--r-- | lib/B/Deparse.t | 2 |
1 files changed, 0 insertions, 2 deletions
diff --git a/lib/B/Deparse.t b/lib/B/Deparse.t index 535719e966..a30f1c2725 100644 --- a/lib/B/Deparse.t +++ b/lib/B/Deparse.t @@ -2101,7 +2101,6 @@ no warnings "experimental::lexical_subs"; my sub f {} print f(); >>>> -BEGIN {${^WARNING_BITS} = "\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x54\x55\x55\x55\x55\x55\x55\x55"} my sub f { } @@ -2114,7 +2113,6 @@ no warnings 'experimental::lexical_subs'; state sub f {} print f(); >>>> -BEGIN {${^WARNING_BITS} = "\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x55\x54\x55\x55\x55\x55\x55\x55\x55"} state sub f { } |