/* !!!!!!! DO NOT EDIT THIS FILE !!!!!!! This file is built by warning.pl Any changes made here will be lost! */ #define Off(x) ((x) / 8) #define Bit(x) (1 << ((x) % 8)) #define IsSet(a, x) ((a)[Off(x)] & Bit(x)) #define G_WARN_OFF 0 /* $^W == 0 */ #define G_WARN_ON 1 /* $^W != 0 */ #define G_WARN_ALL_ON 2 /* -W flag */ #define G_WARN_ALL_OFF 4 /* -X flag */ #define G_WARN_ALL_MASK (G_WARN_ALL_ON|G_WARN_ALL_OFF) #if 1 /* Part of the logic below assumes that WARN_NONE is NULL */ #define ckDEAD(x) \ (PL_curcop->cop_warnings != WARN_ALL && \ PL_curcop->cop_warnings != WARN_NONE && \ IsSet(SvPVX(PL_curcop->cop_warnings), 2*x+1)) #define ckWARN(x) \ ( (PL_curcop->cop_warnings && \ (PL_curcop->cop_warnings == WARN_ALL || \ IsSet(SvPVX(PL_curcop->cop_warnings), 2*x) ) ) \ || (PL_dowarn & G_WARN_ON) ) #define ckWARN2(x,y) \ ( (PL_curcop->cop_warnings && \ (PL_curcop->cop_warnings == WARN_ALL || \ IsSet(SvPVX(PL_curcop->cop_warnings), 2*x) || \ IsSet(SvPVX(PL_curcop->cop_warnings), 2*y) ) ) \ || (PL_dowarn & G_WARN_ON) ) #else #define ckDEAD(x) \ (PL_curcop->cop_warnings != WARN_ALL && \ PL_curcop->cop_warnings != WARN_NONE && \ SvPVX(PL_curcop->cop_warnings)[Off(2*x+1)] & Bit(2*x+1) ) #define ckWARN(x) \ ( (PL_dowarn & G_WARN_ON) || ( (PL_dowarn & G_WARN_DISABLE) && \ PL_curcop->cop_warnings && \ ( PL_curcop->cop_warnings == WARN_ALL || \ SvPVX(PL_curcop->cop_warnings)[Off(2*x)] & Bit(2*x) ) ) ) #define ckWARN2(x,y) \ ( (PL_dowarn & G_WARN_ON) || ( (PL_dowarn & G_WARN_DISABLE) && \ PL_curcop->cop_warnings && \ ( PL_curcop->cop_warnings == WARN_ALL || \ SvPVX(PL_curcop->cop_warnings)[Off(2*x)] & Bit(2*x) || \ SvPVX(PL_curcop->cop_warnings)[Off(2*y)] & Bit(2*y) ) ) ) #endif #define WARN_NONE NULL #define WARN_ALL (&PL_sv_yes) #define WARN_REDEFINE 0 #define WARN_VOID 1 #define WARN_UNSAFE 2 #define WARN_TAINT 3 #define WARN_SUBSTR 4 #define WARN_CLOSURE 5 #define WARN_UNTIE 6 #define WARN_SIGNAL 7 #define WARN_UTF8 8 #define WARN_NUMERIC 9 #define WARN_DEFAULT 10 #define WARN_ONCE 11 #define WARN_SYNTAX 12 #define WARN_RESERVED 13 #define WARN_DEPRECATED 14 #define WARN_SEMICOLON 15 #define WARN_PRINTF 16 #define WARN_OCTAL 17 #define WARN_AMBIGUOUS 18 #define WARN_PARENTHESIS 19 #define WARN_PRECEDENCE 20 #define WARN_IO 21 #define WARN_NEWLINE 22 #define WARN_CLOSED 23 #define WARN_EXEC 24 #define WARN_UNOPENED 25 #define WARN_PIPE 26 #define WARN_UNINITIALIZED 27 #define WARN_RECURSION 28 #define WARN_MISC 29 #define WARNsize 8 #define WARN_ALLstring "\125\125\125\125\125\125\125\125" #define WARN_NONEstring "\0\0\0\0\0\0\0\0" /* end of file warning.h */