Re: [perl #34493] h2ph `extern inline' problems

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

diff --git a/embedvar.h b/embedvar.h
index 2f404b5..f02b1ff 100644 (file)
--- a/embedvar.h
+++ b/embedvar.h
@@ -81,7 +81,6 @@
 #define PL_op                  (vTHX->Top)
 #define PL_opsave              (vTHX->Topsave)
 #define PL_peepp               (vTHX->Tpeepp)
-#define PL_protect             (vTHX->Tprotect)
 #define PL_reg_call_cc         (vTHX->Treg_call_cc)
 #define PL_reg_curpm           (vTHX->Treg_curpm)
 #define PL_reg_eval_set                (vTHX->Treg_eval_set)
@@ -126,9 +125,6 @@
 #define PL_regstartp           (vTHX->Tregstartp)
 #define PL_regtill             (vTHX->Tregtill)
 #define PL_restartop           (vTHX->Trestartop)
-#define PL_retstack            (vTHX->Tretstack)
-#define PL_retstack_ix         (vTHX->Tretstack_ix)
-#define PL_retstack_max                (vTHX->Tretstack_max)
 #define PL_rs                  (vTHX->Trs)
 #define PL_savestack           (vTHX->Tsavestack)
 #define PL_savestack_ix                (vTHX->Tsavestack_ix)
@@ -808,7 +804,6 @@
 #define PL_Top                 PL_op
 #define PL_Topsave             PL_opsave
 #define PL_Tpeepp              PL_peepp
-#define PL_Tprotect            PL_protect
 #define PL_Treg_call_cc                PL_reg_call_cc
 #define PL_Treg_curpm          PL_reg_curpm
 #define PL_Treg_eval_set       PL_reg_eval_set
@@ -853,9 +848,6 @@
 #define PL_Tregstartp          PL_regstartp
 #define PL_Tregtill            PL_regtill
 #define PL_Trestartop          PL_restartop
-#define PL_Tretstack           PL_retstack
-#define PL_Tretstack_ix                PL_retstack_ix
-#define PL_Tretstack_max       PL_retstack_max
 #define PL_Trs                 PL_rs
 #define PL_Tsavestack          PL_savestack
 #define PL_Tsavestack_ix       PL_savestack_ix
@@ -906,6 +898,7 @@
 #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)
 
 #else /* !PERL_GLOBAL_STRUCT */
 
@@ -923,6 +916,7 @@
 #define PL_Gsigfpe_saved       PL_sigfpe_saved
 #define PL_Gsv_placeholder     PL_sv_placeholder
 #define PL_Gthr_key            PL_thr_key
+#define PL_Guse_safe_putenv    PL_use_safe_putenv
 
 #endif /* PERL_GLOBAL_STRUCT */