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 /warnings.h | |
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 'warnings.h')
-rw-r--r-- | warnings.h | 65 |
1 files changed, 24 insertions, 41 deletions
diff --git a/warnings.h b/warnings.h index 0db66144b7..dd9866ba09 100644 --- a/warnings.h +++ b/warnings.h @@ -90,61 +90,51 @@ /* Warnings Categories added in Perl 5.017 */ #define WARN_EXPERIMENTAL 51 -#define WARN_EXPERIMENTAL__LEXICAL_SUBS 52 -#define WARN_EXPERIMENTAL__REGEX_SETS 53 -#define WARN_EXPERIMENTAL__SMARTMATCH 54 +#define WARN_EXPERIMENTAL__REGEX_SETS 52 +#define WARN_EXPERIMENTAL__SMARTMATCH 53 /* Warnings Categories added in Perl 5.019 */ -#define WARN_EXPERIMENTAL__POSTDEREF 55 -#define WARN_EXPERIMENTAL__SIGNATURES 56 -#define WARN_SYSCALLS 57 +#define WARN_SYSCALLS 54 /* Warnings Categories added in Perl 5.021 */ -#define WARN_EXPERIMENTAL__BITWISE 58 -#define WARN_EXPERIMENTAL__CONST_ATTR 59 -#define WARN_EXPERIMENTAL__RE_STRICT 60 -#define WARN_EXPERIMENTAL__REFALIASING 61 -#define WARN_LOCALE 62 -#define WARN_MISSING 63 -#define WARN_REDUNDANT 64 +#define WARN_EXPERIMENTAL__CONST_ATTR 55 +#define WARN_EXPERIMENTAL__RE_STRICT 56 +#define WARN_EXPERIMENTAL__REFALIASING 57 +#define WARN_LOCALE 58 +#define WARN_MISSING 59 +#define WARN_REDUNDANT 60 /* Warnings Categories added in Perl 5.025 */ -#define WARN_EXPERIMENTAL__DECLARED_REFS 65 +#define WARN_EXPERIMENTAL__DECLARED_REFS 61 /* Warnings Categories added in Perl 5.027 */ -#define WARN_EXPERIMENTAL__ALPHA_ASSERTIONS 66 -#define WARN_EXPERIMENTAL__SCRIPT_RUN 67 -#define WARN_SHADOW 68 +#define WARN_SHADOW 62 /* Warnings Categories added in Perl 5.029 */ -#define WARN_EXPERIMENTAL__PRIVATE_USE 69 -#define WARN_EXPERIMENTAL__UNIPROP_WILDCARDS 70 -#define WARN_EXPERIMENTAL__VLB 71 - -/* Warnings Categories added in Perl 5.031 */ - -#define WARN_EXPERIMENTAL__ISA 72 +#define WARN_EXPERIMENTAL__PRIVATE_USE 63 +#define WARN_EXPERIMENTAL__UNIPROP_WILDCARDS 64 +#define WARN_EXPERIMENTAL__VLB 65 /* Warnings Categories added in Perl 5.033 */ -#define WARN_EXPERIMENTAL__TRY 73 +#define WARN_EXPERIMENTAL__TRY 66 /* Warnings Categories added in Perl 5.035 */ -#define WARN_EXPERIMENTAL__ARGS_ARRAY_WITH_SIGNATURES 74 -#define WARN_EXPERIMENTAL__BUILTIN 75 -#define WARN_EXPERIMENTAL__DEFER 76 -#define WARN_EXPERIMENTAL__EXTRA_PAIRED_DELIMITERS 77 -#define WARN_EXPERIMENTAL__FOR_LIST 78 -#define WARN_SCALAR 79 -#define WARNsize 20 -#define WARN_ALLstring "\125\125\125\125\125\125\125\125\125\125\125\125\125\125\125\125\125\125\125\125" -#define WARN_NONEstring "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" +#define WARN_EXPERIMENTAL__ARGS_ARRAY_WITH_SIGNATURES 67 +#define WARN_EXPERIMENTAL__BUILTIN 68 +#define WARN_EXPERIMENTAL__DEFER 69 +#define WARN_EXPERIMENTAL__EXTRA_PAIRED_DELIMITERS 70 +#define WARN_EXPERIMENTAL__FOR_LIST 71 +#define WARN_SCALAR 72 +#define WARNsize 19 +#define WARN_ALLstring "\125\125\125\125\125\125\125\125\125\125\125\125\125\125\125\125\125\125\125" +#define WARN_NONEstring "\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0\0" #define isLEXWARN_on \ cBOOL(PL_curcop && PL_curcop->cop_warnings != pWARN_STD) @@ -303,13 +293,9 @@ category parameters passed. =for apidoc Amnh||WARN_NONCHAR =for apidoc Amnh||WARN_SURROGATE =for apidoc Amnh||WARN_EXPERIMENTAL -=for apidoc Amnh||WARN_EXPERIMENTAL__LEXICAL_SUBS =for apidoc Amnh||WARN_EXPERIMENTAL__REGEX_SETS =for apidoc Amnh||WARN_EXPERIMENTAL__SMARTMATCH -=for apidoc Amnh||WARN_EXPERIMENTAL__POSTDEREF -=for apidoc Amnh||WARN_EXPERIMENTAL__SIGNATURES =for apidoc Amnh||WARN_SYSCALLS -=for apidoc Amnh||WARN_EXPERIMENTAL__BITWISE =for apidoc Amnh||WARN_EXPERIMENTAL__CONST_ATTR =for apidoc Amnh||WARN_EXPERIMENTAL__RE_STRICT =for apidoc Amnh||WARN_EXPERIMENTAL__REFALIASING @@ -317,13 +303,10 @@ category parameters passed. =for apidoc Amnh||WARN_MISSING =for apidoc Amnh||WARN_REDUNDANT =for apidoc Amnh||WARN_EXPERIMENTAL__DECLARED_REFS -=for apidoc Amnh||WARN_EXPERIMENTAL__ALPHA_ASSERTIONS -=for apidoc Amnh||WARN_EXPERIMENTAL__SCRIPT_RUN =for apidoc Amnh||WARN_SHADOW =for apidoc Amnh||WARN_EXPERIMENTAL__PRIVATE_USE =for apidoc Amnh||WARN_EXPERIMENTAL__UNIPROP_WILDCARDS =for apidoc Amnh||WARN_EXPERIMENTAL__VLB -=for apidoc Amnh||WARN_EXPERIMENTAL__ISA =for apidoc Amnh||WARN_EXPERIMENTAL__TRY =for apidoc Amnh||WARN_EXPERIMENTAL__ARGS_ARRAY_WITH_SIGNATURES =for apidoc Amnh||WARN_EXPERIMENTAL__BUILTIN |