/* (Doing namespace management portably in C is really gross.) */
/*
- The following combinations of MULTIPLICITY, USE_THREADS, PERL_OBJECT
+ The following combinations of MULTIPLICITY, USE_5005THREADS, PERL_OBJECT
and PERL_IMPLICIT_CONTEXT are supported:
1) none
2) MULTIPLICITY # supported for compatibility
3) MULTIPLICITY && PERL_IMPLICIT_CONTEXT
- 4) USE_THREADS && PERL_IMPLICIT_CONTEXT
- 5) MULTIPLICITY && USE_THREADS && PERL_IMPLICIT_CONTEXT
+ 4) USE_5005THREADS && PERL_IMPLICIT_CONTEXT
+ 5) MULTIPLICITY && USE_5005THREADS && PERL_IMPLICIT_CONTEXT
6) PERL_OBJECT && PERL_IMPLICIT_CONTEXT
All other combinations of these flags are errors.
#define PL_reg_start_tmpl (vTHX->Treg_start_tmpl)
#define PL_reg_starttry (vTHX->Treg_starttry)
#define PL_reg_sv (vTHX->Treg_sv)
+#define PL_reg_sv_utf8 (vTHX->Treg_sv_utf8)
#define PL_reg_whilem_seen (vTHX->Treg_whilem_seen)
#define PL_regbol (vTHX->Tregbol)
#define PL_regcc (vTHX->Tregcc)
# include "error: PERL_OBJECT + MULTIPLICITY don't go together"
# endif
-# if defined(USE_THREADS)
+# if defined(USE_5005THREADS)
/* case 5 above */
#define PL_Argv (PERL_GET_INTERP->IArgv)
#define PL_curcopdb (PERL_GET_INTERP->Icurcopdb)
#define PL_curstname (PERL_GET_INTERP->Icurstname)
#define PL_curthr (PERL_GET_INTERP->Icurthr)
+#define PL_custom_op_descs (PERL_GET_INTERP->Icustom_op_descs)
+#define PL_custom_op_names (PERL_GET_INTERP->Icustom_op_names)
#define PL_dbargs (PERL_GET_INTERP->Idbargs)
#define PL_debstash (PERL_GET_INTERP->Idebstash)
#define PL_debug (PERL_GET_INTERP->Idebug)
#define PL_rsfp (PERL_GET_INTERP->Irsfp)
#define PL_rsfp_filters (PERL_GET_INTERP->Irsfp_filters)
#define PL_runops (PERL_GET_INTERP->Irunops)
+#define PL_savebegin (PERL_GET_INTERP->Isavebegin)
#define PL_sawampersand (PERL_GET_INTERP->Isawampersand)
#define PL_sh_path (PERL_GET_INTERP->Ish_path)
#define PL_sig_pending (PERL_GET_INTERP->Isig_pending)
#define PL_yynerrs (PERL_GET_INTERP->Iyynerrs)
#define PL_yyval (PERL_GET_INTERP->Iyyval)
-# else /* !USE_THREADS */
+# else /* !USE_5005THREADS */
/* cases 2 and 3 above */
#define PL_Argv (vTHX->IArgv)
#define PL_curcopdb (vTHX->Icurcopdb)
#define PL_curstname (vTHX->Icurstname)
#define PL_curthr (vTHX->Icurthr)
+#define PL_custom_op_descs (vTHX->Icustom_op_descs)
+#define PL_custom_op_names (vTHX->Icustom_op_names)
#define PL_dbargs (vTHX->Idbargs)
#define PL_debstash (vTHX->Idebstash)
#define PL_debug (vTHX->Idebug)
#define PL_rsfp (vTHX->Irsfp)
#define PL_rsfp_filters (vTHX->Irsfp_filters)
#define PL_runops (vTHX->Irunops)
+#define PL_savebegin (vTHX->Isavebegin)
#define PL_sawampersand (vTHX->Isawampersand)
#define PL_sh_path (vTHX->Ish_path)
#define PL_sig_pending (vTHX->Isig_pending)
#define PL_yynerrs (vTHX->Iyynerrs)
#define PL_yyval (vTHX->Iyyval)
-# endif /* USE_THREADS */
+# endif /* USE_5005THREADS */
#else /* !MULTIPLICITY */
#define PL_reg_start_tmpl (aTHXo->interp.Treg_start_tmpl)
#define PL_reg_starttry (aTHXo->interp.Treg_starttry)
#define PL_reg_sv (aTHXo->interp.Treg_sv)
+#define PL_reg_sv_utf8 (aTHXo->interp.Treg_sv_utf8)
#define PL_reg_whilem_seen (aTHXo->interp.Treg_whilem_seen)
#define PL_regbol (aTHXo->interp.Tregbol)
#define PL_regcc (aTHXo->interp.Tregcc)
#define PL_curcopdb (aTHXo->interp.Icurcopdb)
#define PL_curstname (aTHXo->interp.Icurstname)
#define PL_curthr (aTHXo->interp.Icurthr)
+#define PL_custom_op_descs (aTHXo->interp.Icustom_op_descs)
+#define PL_custom_op_names (aTHXo->interp.Icustom_op_names)
#define PL_dbargs (aTHXo->interp.Idbargs)
#define PL_debstash (aTHXo->interp.Idebstash)
#define PL_debug (aTHXo->interp.Idebug)
#define PL_rsfp (aTHXo->interp.Irsfp)
#define PL_rsfp_filters (aTHXo->interp.Irsfp_filters)
#define PL_runops (aTHXo->interp.Irunops)
+#define PL_savebegin (aTHXo->interp.Isavebegin)
#define PL_sawampersand (aTHXo->interp.Isawampersand)
#define PL_sh_path (aTHXo->interp.Ish_path)
#define PL_sig_pending (aTHXo->interp.Isig_pending)
#define PL_Icurcopdb PL_curcopdb
#define PL_Icurstname PL_curstname
#define PL_Icurthr PL_curthr
+#define PL_Icustom_op_descs PL_custom_op_descs
+#define PL_Icustom_op_names PL_custom_op_names
#define PL_Idbargs PL_dbargs
#define PL_Idebstash PL_debstash
#define PL_Idebug PL_debug
#define PL_Irsfp PL_rsfp
#define PL_Irsfp_filters PL_rsfp_filters
#define PL_Irunops PL_runops
+#define PL_Isavebegin PL_savebegin
#define PL_Isawampersand PL_sawampersand
#define PL_Ish_path PL_sh_path
#define PL_Isig_pending PL_sig_pending
#define PL_Iyynerrs PL_yynerrs
#define PL_Iyyval PL_yyval
-# if defined(USE_THREADS)
+# if defined(USE_5005THREADS)
/* case 4 above */
#define PL_Sv (aTHX->TSv)
#define PL_reg_start_tmpl (aTHX->Treg_start_tmpl)
#define PL_reg_starttry (aTHX->Treg_starttry)
#define PL_reg_sv (aTHX->Treg_sv)
+#define PL_reg_sv_utf8 (aTHX->Treg_sv_utf8)
#define PL_reg_whilem_seen (aTHX->Treg_whilem_seen)
#define PL_regbol (aTHX->Tregbol)
#define PL_regcc (aTHX->Tregcc)
#define PL_watchaddr (aTHX->Twatchaddr)
#define PL_watchok (aTHX->Twatchok)
-# else /* !USE_THREADS */
+# else /* !USE_5005THREADS */
/* case 1 above */
#define PL_TSv PL_Sv
#define PL_Treg_start_tmpl PL_reg_start_tmpl
#define PL_Treg_starttry PL_reg_starttry
#define PL_Treg_sv PL_reg_sv
+#define PL_Treg_sv_utf8 PL_reg_sv_utf8
#define PL_Treg_whilem_seen PL_reg_whilem_seen
#define PL_Tregbol PL_regbol
#define PL_Tregcc PL_regcc
#define PL_Twatchaddr PL_watchaddr
#define PL_Twatchok PL_watchok
-# endif /* USE_THREADS */
+# endif /* USE_5005THREADS */
# endif /* PERL_OBJECT */
#endif /* MULTIPLICITY */