warnings.h

   1 /* !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!!
   2    This file is built by warnings.pl
   3    Any changes made here will be lost!
   4 */
   5
   6
   7 #define Off(x)                  ((x) / 8)
   8 #define Bit(x)                  (1 << ((x) % 8))
   9 #define IsSet(a, x)             ((a)[Off(x)] & Bit(x))
  10
  11
  12 #define G_WARN_OFF              0       /* $^W == 0 */
  13 #define G_WARN_ON               1       /* -w flag and $^W != 0 */
  14 #define G_WARN_ALL_ON           2       /* -W flag */
  15 #define G_WARN_ALL_OFF          4       /* -X flag */
  16 #define G_WARN_ONCE             8       /* set if 'once' ever enabled */
  17 #define G_WARN_ALL_MASK         (G_WARN_ALL_ON|G_WARN_ALL_OFF)
  18
  19 #define WARN_STD                Nullsv
  20 #define WARN_ALL                (&PL_sv_yes)    /* use warnings 'all' */
  21 #define WARN_NONE               (&PL_sv_no)     /* no  warnings 'all' */
  22
  23 #define specialWARN(x)          ((x) == WARN_STD || (x) == WARN_ALL ||  \
  24                                  (x) == WARN_NONE)
  25
  26 #define ckDEAD(x)                                                       \
  27            ( ! specialWARN(PL_curcop->cop_warnings) &&                  \
  28             IsSet(SvPVX(PL_curcop->cop_warnings), 2*x+1))
  29
  30 #define ckWARN(x)                                                       \
  31         ( (PL_curcop->cop_warnings != WARN_STD &&                       \
  32            PL_curcop->cop_warnings != WARN_NONE &&                      \
  33               (PL_curcop->cop_warnings == WARN_ALL ||                   \
  34                IsSet(SvPVX(PL_curcop->cop_warnings), 2*x) ) )           \
  35           || (PL_curcop->cop_warnings == WARN_STD && PL_dowarn & G_WARN_ON) )
  36
  37 #define ckWARN2(x,y)                                                    \
  38           ( (PL_curcop->cop_warnings != WARN_STD  &&                    \
  39              PL_curcop->cop_warnings != WARN_NONE &&                    \
  40               (PL_curcop->cop_warnings == WARN_ALL ||                   \
  41                 IsSet(SvPVX(PL_curcop->cop_warnings), 2*x)  ||          \
  42                 IsSet(SvPVX(PL_curcop->cop_warnings), 2*y) ) )          \
  43             ||  (PL_curcop->cop_warnings == WARN_STD && PL_dowarn & G_WARN_ON) )
  44
  45 #define ckWARN_d(x)                                                     \
  46           (PL_curcop->cop_warnings == WARN_STD ||                       \
  47            PL_curcop->cop_warnings == WARN_ALL ||                       \
  48              (PL_curcop->cop_warnings != WARN_NONE &&                   \
  49               IsSet(SvPVX(PL_curcop->cop_warnings), 2*x) ) )
  50
  51 #define ckWARN2_d(x,y)                                                  \
  52           (PL_curcop->cop_warnings == WARN_STD ||                       \
  53            PL_curcop->cop_warnings == WARN_ALL ||                       \
  54              (PL_curcop->cop_warnings != WARN_NONE &&                   \
  55                 (IsSet(SvPVX(PL_curcop->cop_warnings), 2*x)  ||         \
  56                  IsSet(SvPVX(PL_curcop->cop_warnings), 2*y) ) ) )
  57
  58
  59 #define isLEXWARN_on    (PL_curcop->cop_warnings != WARN_STD)
  60 #define isLEXWARN_off   (PL_curcop->cop_warnings == WARN_STD)
  61 #define isWARN_ONCE     (PL_dowarn & (G_WARN_ON|G_WARN_ONCE))
  62 #define isWARN_on(c,x)  (IsSet(SvPVX(c), 2*(x)))
  63
  64 #define WARN_IO                 0
  65 #define WARN_CLOSED             1
  66 #define WARN_EXEC               2
  67 #define WARN_NEWLINE            3
  68 #define WARN_PIPE               4
  69 #define WARN_UNOPENED           5
  70 #define WARN_MISC               6
  71 #define WARN_NUMERIC            7
  72 #define WARN_ONCE               8
  73 #define WARN_RECURSION          9
  74 #define WARN_REDEFINE           10
  75 #define WARN_SEVERE             11
  76 #define WARN_DEBUGGING          12
  77 #define WARN_INPLACE            13
  78 #define WARN_INTERNAL           14
  79 #define WARN_SYNTAX             15
  80 #define WARN_AMBIGUOUS          16
  81 #define WARN_DEPRECATED         17
  82 #define WARN_DIGIT              18
  83 #define WARN_OCTAL              19
  84 #define WARN_PARENTHESIS        20
  85 #define WARN_PRECEDENCE         21
  86 #define WARN_PRINTF             22
  87 #define WARN_RESERVED           23
  88 #define WARN_SEMICOLON          24
  89 #define WARN_UNINITIALIZED      25
  90 #define WARN_UNSAFE             26
  91 #define WARN_CLOSURE            27
  92 #define WARN_OVERFLOW           28
  93 #define WARN_PORTABLE           29
  94 #define WARN_SIGNAL             30
  95 #define WARN_SUBSTR             31
  96 #define WARN_TAINT              32
  97 #define WARN_UNTIE              33
  98 #define WARN_UTF8               34
  99 #define WARN_VOID               35
 100
 101 #define WARNsize                9
 102 #define WARN_ALLstring          "\125\125\125\125\125\125\125\125\125"
 103 #define WARN_NONEstring         "\0\0\0\0\0\0\0\0\0"
 104
 105 /* end of file warnings.h */
 106