summaryrefslogtreecommitdiff
path: root/Master/tlpkg/tlperl/lib/CORE/warnings.h
diff options
context:
space:
mode:
Diffstat (limited to 'Master/tlpkg/tlperl/lib/CORE/warnings.h')
-rw-r--r--Master/tlpkg/tlperl/lib/CORE/warnings.h17
1 files changed, 12 insertions, 5 deletions
diff --git a/Master/tlpkg/tlperl/lib/CORE/warnings.h b/Master/tlpkg/tlperl/lib/CORE/warnings.h
index 3ed9ecf56d5..39ebe6a78c1 100644
--- a/Master/tlpkg/tlperl/lib/CORE/warnings.h
+++ b/Master/tlpkg/tlperl/lib/CORE/warnings.h
@@ -1,8 +1,8 @@
/* -*- buffer-read-only: t -*-
!!!!!!! DO NOT EDIT THIS FILE !!!!!!!
- This file is built by warnings.pl
+ This file is built by regen/warnings.pl.
Any changes made here will be lost!
-*/
+ */
#define Off(x) ((x) / 8)
@@ -81,9 +81,15 @@
#define WARN_IMPRECISION 46
#define WARN_ILLEGALPROTO 47
-#define WARNsize 12
-#define WARN_ALLstring "\125\125\125\125\125\125\125\125\125\125\125\125"
-#define WARN_NONEstring "\0\0\0\0\0\0\0\0\0\0\0\0"
+/* Warnings Categories added in Perl 5.013 */
+
+#define WARN_NON_UNICODE 48
+#define WARN_NONCHAR 49
+#define WARN_SURROGATE 50
+
+#define WARNsize 13
+#define WARN_ALLstring "\125\125\125\125\125\125\125\125\125\125\125\125\125"
+#define WARN_NONEstring "\0\0\0\0\0\0\0\0\0\0\0\0\0"
#define isLEXWARN_on (PL_curcop->cop_warnings != pWARN_STD)
#define isLEXWARN_off (PL_curcop->cop_warnings == pWARN_STD)
@@ -127,4 +133,5 @@
isWARNf_on(PL_curcop->cop_warnings, unpackWARN4(x))))
/* end of file warnings.h */
+
/* ex: set ro: */