X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=warnings.h;h=2798467a25ddb3637d734abffe8196dac66a3b18;hb=e77e2f143f073d08d6764e30771960b2bccde0db;hp=3da705e371db13dc4382f3cdbc42596b28502301;hpb=99ef548ba710eb2617804c989e4d5fdae1f04f37;p=p5sagit%2Fp5-mst-13.2.git diff --git a/warnings.h b/warnings.h index 3da705e..2798467 100644 --- a/warnings.h +++ b/warnings.h @@ -22,6 +22,9 @@ #define specialWARN(x) ((x) == pWARN_STD || (x) == pWARN_ALL || \ (x) == pWARN_NONE) + +/* Warnings Categories added in Perl 5.008 */ + #define WARN_ALL 0 #define WARN_CLOSURE 1 #define WARN_DEPRECATED 2 @@ -62,12 +65,17 @@ #define WARN_RESERVED 37 #define WARN_SEMICOLON 38 #define WARN_TAINT 39 -#define WARN_UNINITIALIZED 40 -#define WARN_UNPACK 41 -#define WARN_UNTIE 42 -#define WARN_UTF8 43 -#define WARN_VOID 44 -#define WARN_Y2K 45 +#define WARN_THREADS 40 +#define WARN_UNINITIALIZED 41 +#define WARN_UNPACK 42 +#define WARN_UNTIE 43 +#define WARN_UTF8 44 +#define WARN_VOID 45 +#define WARN_Y2K 46 + +/* Warnings Categories added in Perl 5.009 */ + +#define WARN_ASSERTIONS 47 #define WARNsize 12 #define WARN_ALLstring "\125\125\125\125\125\125\125\125\125\125\125\125"