X-Git-Url: https://perl5.git.perl.org/perl5.git/blobdiff_plain/3a69dad21b36726c1abaee5f4bc07deb88e8bbb3..3deca554c91ecb8309424e4f088fdde80e21248b:/embedvar.h

diff --git a/embedvar.h b/embedvar.h
index ec0b7b1..1e3f9a2 100644
--- a/embedvar.h
+++ b/embedvar.h
@@ -42,6 +42,7 @@
 
 #define PL_AboveLatin1		(vTHX->IAboveLatin1)
 #define PL_Argv			(vTHX->IArgv)
+#define PL_Assigned_invlist	(vTHX->IAssigned_invlist)
 #define PL_Cmd			(vTHX->ICmd)
 #define PL_DBcontrol		(vTHX->IDBcontrol)
 #define PL_DBcv			(vTHX->IDBcv)
@@ -109,6 +110,7 @@
 #define PL_curcopdb		(vTHX->Icurcopdb)
 #define PL_curpad		(vTHX->Icurpad)
 #define PL_curpm		(vTHX->Icurpm)
+#define PL_curpm_under		(vTHX->Icurpm_under)
 #define PL_curstack		(vTHX->Icurstack)
 #define PL_curstackinfo		(vTHX->Icurstackinfo)
 #define PL_curstash		(vTHX->Icurstash)
@@ -195,7 +197,6 @@
 #define PL_markstack_max	(vTHX->Imarkstack_max)
 #define PL_markstack_ptr	(vTHX->Imarkstack_ptr)
 #define PL_max_intro_pending	(vTHX->Imax_intro_pending)
-#define PL_maxo			(vTHX->Imaxo)
 #define PL_maxsysfd		(vTHX->Imaxsysfd)
 #define PL_memory_debug_header	(vTHX->Imemory_debug_header)
 #define PL_mess_sv		(vTHX->Imess_sv)
@@ -279,6 +280,7 @@
 #define PL_scopestack_max	(vTHX->Iscopestack_max)
 #define PL_scopestack_name	(vTHX->Iscopestack_name)
 #define PL_secondgv		(vTHX->Isecondgv)
+#define PL_seen_deprecated_macro	(vTHX->Iseen_deprecated_macro)
 #define PL_sharehook		(vTHX->Isharehook)
 #define PL_sig_pending		(vTHX->Isig_pending)
 #define PL_sighandlerp		(vTHX->Isighandlerp)
@@ -297,7 +299,6 @@
 #define PL_stashpad		(vTHX->Istashpad)
 #define PL_stashpadix		(vTHX->Istashpadix)
 #define PL_stashpadmax		(vTHX->Istashpadmax)
-#define PL_statbuf		(vTHX->Istatbuf)
 #define PL_statcache		(vTHX->Istatcache)
 #define PL_statgv		(vTHX->Istatgv)
 #define PL_statname		(vTHX->Istatname)
@@ -307,9 +308,9 @@
 #define PL_stderrgv		(vTHX->Istderrgv)
 #define PL_stdingv		(vTHX->Istdingv)
 #define PL_strtab		(vTHX->Istrtab)
+#define PL_strxfrm_NUL_replacement	(vTHX->Istrxfrm_NUL_replacement)
 #define PL_strxfrm_is_behaved	(vTHX->Istrxfrm_is_behaved)
 #define PL_strxfrm_max_cp	(vTHX->Istrxfrm_max_cp)
-#define PL_strxfrm_min_char	(vTHX->Istrxfrm_min_char)
 #define PL_sub_generation	(vTHX->Isub_generation)
 #define PL_subline		(vTHX->Isubline)
 #define PL_subname		(vTHX->Isubname)
@@ -365,6 +366,8 @@
 
 #if defined(PERL_GLOBAL_STRUCT)
 
+#define PL_C_locale_obj		(my_vars->GC_locale_obj)
+#define PL_GC_locale_obj	(my_vars->GC_locale_obj)
 #define PL_appctx		(my_vars->Gappctx)
 #define PL_Gappctx		(my_vars->Gappctx)
 #define PL_check		(my_vars->Gcheck)
@@ -381,10 +384,14 @@
 #define PL_Gdollarzero_mutex	(my_vars->Gdollarzero_mutex)
 #define PL_fold_locale		(my_vars->Gfold_locale)
 #define PL_Gfold_locale		(my_vars->Gfold_locale)
+#define PL_hash_chars		(my_vars->Ghash_chars)
+#define PL_Ghash_chars		(my_vars->Ghash_chars)
 #define PL_hash_seed		(my_vars->Ghash_seed)
 #define PL_Ghash_seed		(my_vars->Ghash_seed)
 #define PL_hash_seed_set	(my_vars->Ghash_seed_set)
 #define PL_Ghash_seed_set	(my_vars->Ghash_seed_set)
+#define PL_hash_state		(my_vars->Ghash_state)
+#define PL_Ghash_state		(my_vars->Ghash_state)
 #define PL_hints_mutex		(my_vars->Ghints_mutex)
 #define PL_Ghints_mutex		(my_vars->Ghints_mutex)
 #define PL_keyword_plugin	(my_vars->Gkeyword_plugin)
@@ -413,6 +420,10 @@
 #define PL_Gperlio_fd_refcnt_size	(my_vars->Gperlio_fd_refcnt_size)
 #define PL_perlio_mutex		(my_vars->Gperlio_mutex)
 #define PL_Gperlio_mutex	(my_vars->Gperlio_mutex)
+#ifdef __VMS
+#define PL_perllib_sep		(my_vars->Gperllib_sep)
+#define PL_Gperllib_sep		(my_vars->Gperllib_sep)
+#endif
 #define PL_ppaddr		(my_vars->Gppaddr)
 #define PL_Gppaddr		(my_vars->Gppaddr)
 #ifdef OS2