Symbian port of Perl

[p5sagit/p5-mst-13.2.git] / embedvar.h

diff --git a/embedvar.h b/embedvar.h
index 4496582..b7ce358 100644 (file)
--- a/embedvar.h
+++ b/embedvar.h
@@ -885,39 +885,102 @@
 
 #if defined(PERL_GLOBAL_STRUCT)
 
-#define PL_No                  (PL_Vars.GNo)
-#define PL_Yes                 (PL_Vars.GYes)
-#define PL_csighandlerp                (PL_Vars.Gcsighandlerp)
-#define PL_curinterp           (PL_Vars.Gcurinterp)
-#define PL_do_undump           (PL_Vars.Gdo_undump)
-#define PL_dollarzero_mutex    (PL_Vars.Gdollarzero_mutex)
-#define PL_hexdigit            (PL_Vars.Ghexdigit)
-#define PL_malloc_mutex                (PL_Vars.Gmalloc_mutex)
-#define PL_op_mutex            (PL_Vars.Gop_mutex)
-#define PL_patleave            (PL_Vars.Gpatleave)
-#define PL_sh_path             (PL_Vars.Gsh_path)
-#define PL_sigfpe_saved                (PL_Vars.Gsigfpe_saved)
-#define PL_sv_placeholder      (PL_Vars.Gsv_placeholder)
-#define PL_thr_key             (PL_Vars.Gthr_key)
-#define PL_use_safe_putenv     (PL_Vars.Guse_safe_putenv)
+#define PL_No                  (my_vars->GNo)
+#define PL_GNo                 (my_vars->GNo)
+#define PL_Yes                 (my_vars->GYes)
+#define PL_GYes                        (my_vars->GYes)
+#define PL_appctx              (my_vars->Gappctx)
+#define PL_Gappctx             (my_vars->Gappctx)
+#define PL_check               (my_vars->Gcheck)
+#define PL_Gcheck              (my_vars->Gcheck)
+#define PL_csighandlerp                (my_vars->Gcsighandlerp)
+#define PL_Gcsighandlerp       (my_vars->Gcsighandlerp)
+#define PL_curinterp           (my_vars->Gcurinterp)
+#define PL_Gcurinterp          (my_vars->Gcurinterp)
+#define PL_do_undump           (my_vars->Gdo_undump)
+#define PL_Gdo_undump          (my_vars->Gdo_undump)
+#define PL_dollarzero_mutex    (my_vars->Gdollarzero_mutex)
+#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_hexdigit            (my_vars->Ghexdigit)
+#define PL_Ghexdigit           (my_vars->Ghexdigit)
+#define PL_malloc_mutex                (my_vars->Gmalloc_mutex)
+#define PL_Gmalloc_mutex       (my_vars->Gmalloc_mutex)
+#define PL_mmap_page_size      (my_vars->Gmmap_page_size)
+#define PL_Gmmap_page_size     (my_vars->Gmmap_page_size)
+#define PL_op_mutex            (my_vars->Gop_mutex)
+#define PL_Gop_mutex           (my_vars->Gop_mutex)
+#define PL_op_seq              (my_vars->Gop_seq)
+#define PL_Gop_seq             (my_vars->Gop_seq)
+#define PL_op_sequence         (my_vars->Gop_sequence)
+#define PL_Gop_sequence                (my_vars->Gop_sequence)
+#define PL_patleave            (my_vars->Gpatleave)
+#define PL_Gpatleave           (my_vars->Gpatleave)
+#define PL_perlio_debug_fd     (my_vars->Gperlio_debug_fd)
+#define PL_Gperlio_debug_fd    (my_vars->Gperlio_debug_fd)
+#define PL_perlio_fd_refcnt    (my_vars->Gperlio_fd_refcnt)
+#define PL_Gperlio_fd_refcnt   (my_vars->Gperlio_fd_refcnt)
+#define PL_ppaddr              (my_vars->Gppaddr)
+#define PL_Gppaddr             (my_vars->Gppaddr)
+#define PL_sh_path             (my_vars->Gsh_path)
+#define PL_Gsh_path            (my_vars->Gsh_path)
+#define PL_sig_defaulting      (my_vars->Gsig_defaulting)
+#define PL_Gsig_defaulting     (my_vars->Gsig_defaulting)
+#define PL_sig_handlers_initted        (my_vars->Gsig_handlers_initted)
+#define PL_Gsig_handlers_initted       (my_vars->Gsig_handlers_initted)
+#define PL_sig_ignoring                (my_vars->Gsig_ignoring)
+#define PL_Gsig_ignoring       (my_vars->Gsig_ignoring)
+#define PL_sig_sv              (my_vars->Gsig_sv)
+#define PL_Gsig_sv             (my_vars->Gsig_sv)
+#define PL_sig_trapped         (my_vars->Gsig_trapped)
+#define PL_Gsig_trapped                (my_vars->Gsig_trapped)
+#define PL_sigfpe_saved                (my_vars->Gsigfpe_saved)
+#define PL_Gsigfpe_saved       (my_vars->Gsigfpe_saved)
+#define PL_sv_placeholder      (my_vars->Gsv_placeholder)
+#define PL_Gsv_placeholder     (my_vars->Gsv_placeholder)
+#define PL_thr_key             (my_vars->Gthr_key)
+#define PL_Gthr_key            (my_vars->Gthr_key)
+#define PL_timesbase           (my_vars->Gtimesbase)
+#define PL_Gtimesbase          (my_vars->Gtimesbase)
+#define PL_use_safe_putenv     (my_vars->Guse_safe_putenv)
+#define PL_Guse_safe_putenv    (my_vars->Guse_safe_putenv)
+#define PL_watch_pvx           (my_vars->Gwatch_pvx)
+#define PL_Gwatch_pvx          (my_vars->Gwatch_pvx)
 
 #else /* !PERL_GLOBAL_STRUCT */
 
 #define PL_GNo                 PL_No
 #define PL_GYes                        PL_Yes
+#define PL_Gappctx             PL_appctx
+#define PL_Gcheck              PL_check
 #define PL_Gcsighandlerp       PL_csighandlerp
 #define PL_Gcurinterp          PL_curinterp
 #define PL_Gdo_undump          PL_do_undump
 #define PL_Gdollarzero_mutex   PL_dollarzero_mutex
+#define PL_Gfold_locale                PL_fold_locale
 #define PL_Ghexdigit           PL_hexdigit
 #define PL_Gmalloc_mutex       PL_malloc_mutex
+#define PL_Gmmap_page_size     PL_mmap_page_size
 #define PL_Gop_mutex           PL_op_mutex
+#define PL_Gop_seq             PL_op_seq
+#define PL_Gop_sequence                PL_op_sequence
 #define PL_Gpatleave           PL_patleave
+#define PL_Gperlio_debug_fd    PL_perlio_debug_fd
+#define PL_Gperlio_fd_refcnt   PL_perlio_fd_refcnt
+#define PL_Gppaddr             PL_ppaddr
 #define PL_Gsh_path            PL_sh_path
+#define PL_Gsig_defaulting     PL_sig_defaulting
+#define PL_Gsig_handlers_initted       PL_sig_handlers_initted
+#define PL_Gsig_ignoring       PL_sig_ignoring
+#define PL_Gsig_sv             PL_sig_sv
+#define PL_Gsig_trapped                PL_sig_trapped
 #define PL_Gsigfpe_saved       PL_sigfpe_saved
 #define PL_Gsv_placeholder     PL_sv_placeholder
 #define PL_Gthr_key            PL_thr_key
+#define PL_Gtimesbase          PL_timesbase
 #define PL_Guse_safe_putenv    PL_use_safe_putenv
+#define PL_Gwatch_pvx          PL_watch_pvx
 
 #endif /* PERL_GLOBAL_STRUCT */