This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Integrate #16481 from macperl;
[perl5.git] / embedvar.h
index c6eb5fa..3c12a6a 100644 (file)
@@ -1,7 +1,16 @@
-/* !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!!
-   This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h,
-   perlvars.h and thrdvar.h.  Any changes made here will be lost!
-*/
+/*
+ *    embedvar.h
+ *
+ *    Copyright (c) 1997-2002, Larry Wall
+ *
+ *    You may distribute under the terms of either the GNU General Public
+ *    License or the Artistic License, as specified in the README file.
+ *
+ *
+ * !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!!
+ *  This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h,
+ *  perlvars.h and thrdvar.h.  Any changes made here will be lost!
+ */
 
 /* (Doing namespace management portably in C is really gross.) */
 
 #define PL_utf8_cntrl          (PERL_GET_INTERP->Iutf8_cntrl)
 #define PL_utf8_digit          (PERL_GET_INTERP->Iutf8_digit)
 #define PL_utf8_graph          (PERL_GET_INTERP->Iutf8_graph)
+#define PL_utf8_idcont         (PERL_GET_INTERP->Iutf8_idcont)
+#define PL_utf8_idstart                (PERL_GET_INTERP->Iutf8_idstart)
 #define PL_utf8_lower          (PERL_GET_INTERP->Iutf8_lower)
 #define PL_utf8_mark           (PERL_GET_INTERP->Iutf8_mark)
 #define PL_utf8_print          (PERL_GET_INTERP->Iutf8_print)
 #define PL_utf8_upper          (PERL_GET_INTERP->Iutf8_upper)
 #define PL_utf8_xdigit         (PERL_GET_INTERP->Iutf8_xdigit)
 #define PL_uudmap              (PERL_GET_INTERP->Iuudmap)
+#define PL_wantutf8            (PERL_GET_INTERP->Iwantutf8)
 #define PL_warnhook            (PERL_GET_INTERP->Iwarnhook)
 #define PL_widesyscalls                (PERL_GET_INTERP->Iwidesyscalls)
 #define PL_xiv_arenaroot       (PERL_GET_INTERP->Ixiv_arenaroot)
 #define PL_utf8_cntrl          (vTHX->Iutf8_cntrl)
 #define PL_utf8_digit          (vTHX->Iutf8_digit)
 #define PL_utf8_graph          (vTHX->Iutf8_graph)
+#define PL_utf8_idcont         (vTHX->Iutf8_idcont)
+#define PL_utf8_idstart                (vTHX->Iutf8_idstart)
 #define PL_utf8_lower          (vTHX->Iutf8_lower)
 #define PL_utf8_mark           (vTHX->Iutf8_mark)
 #define PL_utf8_print          (vTHX->Iutf8_print)
 #define PL_utf8_upper          (vTHX->Iutf8_upper)
 #define PL_utf8_xdigit         (vTHX->Iutf8_xdigit)
 #define PL_uudmap              (vTHX->Iuudmap)
+#define PL_wantutf8            (vTHX->Iwantutf8)
 #define PL_warnhook            (vTHX->Iwarnhook)
 #define PL_widesyscalls                (vTHX->Iwidesyscalls)
 #define PL_xiv_arenaroot       (vTHX->Ixiv_arenaroot)
 #define PL_Iutf8_cntrl         PL_utf8_cntrl
 #define PL_Iutf8_digit         PL_utf8_digit
 #define PL_Iutf8_graph         PL_utf8_graph
+#define PL_Iutf8_idcont                PL_utf8_idcont
+#define PL_Iutf8_idstart       PL_utf8_idstart
 #define PL_Iutf8_lower         PL_utf8_lower
 #define PL_Iutf8_mark          PL_utf8_mark
 #define PL_Iutf8_print         PL_utf8_print
 #define PL_Iutf8_upper         PL_utf8_upper
 #define PL_Iutf8_xdigit                PL_utf8_xdigit
 #define PL_Iuudmap             PL_uudmap
+#define PL_Iwantutf8           PL_wantutf8
 #define PL_Iwarnhook           PL_warnhook
 #define PL_Iwidesyscalls       PL_widesyscalls
 #define PL_Ixiv_arenaroot      PL_xiv_arenaroot
 #define PL_curinterp           (PL_Vars.Gcurinterp)
 #define PL_do_undump           (PL_Vars.Gdo_undump)
 #define PL_hexdigit            (PL_Vars.Ghexdigit)
+#define PL_lockhook            (PL_Vars.Glockhook)
 #define PL_malloc_mutex                (PL_Vars.Gmalloc_mutex)
 #define PL_op_mutex            (PL_Vars.Gop_mutex)
 #define PL_patleave            (PL_Vars.Gpatleave)
 #define PL_runops_dbg          (PL_Vars.Grunops_dbg)
 #define PL_runops_std          (PL_Vars.Grunops_std)
-#define PL_sharedsv_space      (PL_Vars.Gsharedsv_space)
-#define PL_sharedsv_space_mutex        (PL_Vars.Gsharedsv_space_mutex)
+#define PL_sharehook           (PL_Vars.Gsharehook)
 #define PL_thr_key             (PL_Vars.Gthr_key)
+#define PL_threadhook          (PL_Vars.Gthreadhook)
+#define PL_unlockhook          (PL_Vars.Gunlockhook)
 
 #else /* !PERL_GLOBAL_STRUCT */
 
 #define PL_Gcurinterp          PL_curinterp
 #define PL_Gdo_undump          PL_do_undump
 #define PL_Ghexdigit           PL_hexdigit
+#define PL_Glockhook           PL_lockhook
 #define PL_Gmalloc_mutex       PL_malloc_mutex
 #define PL_Gop_mutex           PL_op_mutex
 #define PL_Gpatleave           PL_patleave
 #define PL_Grunops_dbg         PL_runops_dbg
 #define PL_Grunops_std         PL_runops_std
-#define PL_Gsharedsv_space     PL_sharedsv_space
-#define PL_Gsharedsv_space_mutex       PL_sharedsv_space_mutex
+#define PL_Gsharehook          PL_sharehook
 #define PL_Gthr_key            PL_thr_key
+#define PL_Gthreadhook         PL_threadhook
+#define PL_Gunlockhook         PL_unlockhook
 
 #endif /* PERL_GLOBAL_STRUCT */