This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Oops. When changing warnings.pl one should re-run it. Well spotted
authorNicholas Clark <nick@ccl4.org>
Fri, 3 Feb 2006 17:06:43 +0000 (17:06 +0000)
committerNicholas Clark <nick@ccl4.org>
Fri, 3 Feb 2006 17:06:43 +0000 (17:06 +0000)
Rafael.

p4raw-id: //depot/perl@27067

warnings.h

index 27e240e..1157cb2 100644 (file)
@@ -17,9 +17,9 @@
 #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)