Add unicode_eval feature

[perl5.git] / perl.h

diff --git a/perl.h b/perl.h
index accb96b..30b8eb2 100644 (file)
--- a/perl.h
+++ b/perl.h
@@ -3212,6 +3212,12 @@ typedef pthread_key_t    perl_key;
 #  define HEKf "2p"
 #endif
 
+/* Not ideal, but we cannot easily include a number in an already-numeric
+ * format sequence. */
+#ifndef HEKf256
+#  define HEKf256 "3p"
+#endif
+
 #define HEKfARG(p) ((void*)(p))
 
 #ifdef PERL_CORE
@@ -4912,6 +4918,8 @@ typedef void(*Perl_ophook_t)(pTHX_ OP*);
 typedef int (*Perl_keyword_plugin_t)(pTHX_ char*, STRLEN, OP**);
 typedef void(*Perl_cpeep_t)(pTHX_ OP *, OP *);
 
+typedef void(*globhook_t)(pTHX);
+
 #define KEYWORD_PLUGIN_DECLINE 0
 #define KEYWORD_PLUGIN_STMT    1
 #define KEYWORD_PLUGIN_EXPR    2