X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl.h;h=4a26b1590647af1359b125084abdd79f4711a752;hb=b3ac6de7f0c7a63b73f1cf3ea9e371470f7d1cb0;hp=3d20cf610f6afd9e3e80162932fc38c276452903;hpb=dde527fc6256d3b4a78a8a6187a9b8048cc76da5;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/perl.h b/perl.h
index 3d20cf6..4a26b15 100644
--- a/perl.h
+++ b/perl.h
@@ -1816,6 +1816,13 @@ typedef enum {
 #define HINT_STRICT_VARS	0x00000400
 #define HINT_LOCALE		0x00000800
 
+#define HINT_NEW_INTEGER	0x00001000
+#define HINT_NEW_FLOAT		0x00002000
+#define HINT_NEW_BINARY		0x00004000
+#define HINT_NEW_STRING		0x00008000
+#define HINT_NEW_RE		0x00010000
+#define HINT_LOCALIZE_HH	0x00020000 /* %^H needs to be copied */
+
 /* Various states of an input record separator SV (rs, nrs) */
 #define RsSNARF(sv)   (! SvOK(sv))
 #define RsSIMPLE(sv)  (SvOK(sv) && SvCUR(sv))