X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/dbab294c68e8160ef916906a4beca1da8c0c2ec5..a0714e2c8319bd04d1f7d262de652b6b5ec054f7:/warnings.pl diff --git a/warnings.pl b/warnings.pl index 94cc34f..e8971d8 100644 --- a/warnings.pl +++ b/warnings.pl @@ -1,6 +1,6 @@ #!/usr/bin/perl -$VERSION = '1.02_01'; +$VERSION = '1.02_02'; BEGIN { push @INC, './lib'; @@ -276,9 +276,9 @@ print WARN <<'EOM' ; #define G_WARN_ONCE 8 /* set if 'once' ever enabled */ #define G_WARN_ALL_MASK (G_WARN_ALL_ON|G_WARN_ALL_OFF) -#define pWARN_STD Nullsv -#define pWARN_ALL (Nullsv+1) /* use warnings 'all' */ -#define pWARN_NONE (Nullsv+2) /* no warnings 'all' */ +#define pWARN_STD NULL +#define pWARN_ALL (NULL+1) /* use warnings 'all' */ +#define pWARN_NONE (NULL+2) /* no warnings 'all' */ #define specialWARN(x) ((x) == pWARN_STD || (x) == pWARN_ALL || \ (x) == pWARN_NONE) @@ -432,7 +432,7 @@ __END__ package warnings; -our $VERSION = '1.04'; +our $VERSION = '1.05'; =head1 NAME