diff options
author | Karl Williamson <khw@cpan.org> | 2015-01-04 09:55:35 -0700 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2015-01-13 12:01:02 -0700 |
commit | a4fbcc27c3bd768277fb2cfbb312f8ada31e3440 (patch) | |
tree | 4832506c212db33de6933bfddc98f54e351d4a3b /warnings.h | |
parent | 879eb60498cb197a521d2354c56143b2cff61deb (diff) | |
download | perl-a4fbcc27c3bd768277fb2cfbb312f8ada31e3440.tar.gz |
Add new warnings category for "use re 'strict'"
This is a step in the process of adding that subpragma.
Diffstat (limited to 'warnings.h')
-rw-r--r-- | warnings.h | 23 |
1 files changed, 12 insertions, 11 deletions
diff --git a/warnings.h b/warnings.h index 323e5c810b..a079c387e3 100644 --- a/warnings.h +++ b/warnings.h @@ -105,17 +105,18 @@ /* Warnings Categories added in Perl 5.021 */ #define WARN_EVERYTHING 60 -#define WARN_EXPERIMENTAL__REFALIASING 61 -#define WARN_EXPERIMENTAL__WIN32_PERLIO 62 -#define WARN_LOCALE 63 -#define WARN_MISSING 64 -#define WARN_REDUNDANT 65 -#define WARN_EXTRA 66 -#define WARN_VOID_UNUSUAL 67 - -#define WARNsize 17 -#define WARN_ALLstring "\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" +#define WARN_EXPERIMENTAL__RE_STRICT 61 +#define WARN_EXPERIMENTAL__REFALIASING 62 +#define WARN_EXPERIMENTAL__WIN32_PERLIO 63 +#define WARN_LOCALE 64 +#define WARN_MISSING 65 +#define WARN_REDUNDANT 66 +#define WARN_EXTRA 67 +#define WARN_VOID_UNUSUAL 68 + +#define WARNsize 18 +#define WARN_ALLstring "\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" #define isLEXWARN_on (PL_curcop->cop_warnings != pWARN_STD) #define isLEXWARN_off (PL_curcop->cop_warnings == pWARN_STD) |