/* !!!!!!! DO NOT EDIT THIS FILE !!!!!!!
- This file is built by embed.pl from global.sym, intrpvar.h,
+ This file is built by embed.pl from global.sym, pp.sym, intrpvar.h,
and thrdvar.h. Any changes made here will be lost!
*/
/* (Doing namespace management portably in C is really gross.) */
-/* EMBED has no run-time penalty, but helps keep the Perl namespace
- from colliding with that used by other libraries pulled in
- by extensions or by embedding perl. Allow a cc -DNO_EMBED
- override, however, to keep binary compatability with previous
- versions of perl.
-*/
-
-
/* Put interpreter-specific symbols into a struct? */
#ifdef MULTIPLICITY
#define PL_tmps_stack (PL_curinterp->Ttmps_stack)
#define PL_top_env (PL_curinterp->Ttop_env)
#define PL_toptarget (PL_curinterp->Ttoptarget)
+#define PL_watchaddr (PL_curinterp->Twatchaddr)
+#define PL_watchok (PL_curinterp->Twatchok)
#endif /* !USE_THREADS */
#define PL_Ttmps_stack PL_tmps_stack
#define PL_Ttop_env PL_top_env
#define PL_Ttoptarget PL_toptarget
+#define PL_Twatchaddr PL_watchaddr
+#define PL_Twatchok PL_watchok
#endif /* USE_THREADS */
/* Hide what would have been interpreter-specific symbols? */
-#ifdef EMBED
-
#ifndef USE_THREADS
#endif /* USE_THREADS */
-#endif /* EMBED */
#endif /* MULTIPLICITY */
/* Now same trickey for per-thread variables */
#define PL_tmps_stack (thr->Ttmps_stack)
#define PL_top_env (thr->Ttop_env)
#define PL_toptarget (thr->Ttoptarget)
+#define PL_watchaddr (thr->Twatchaddr)
+#define PL_watchok (thr->Twatchok)
#endif /* USE_THREADS */
#define PL_collxfrm_base (PL_Vars.Gcollxfrm_base)
#define PL_collxfrm_mult (PL_Vars.Gcollxfrm_mult)
#define PL_cop_seqmax (PL_Vars.Gcop_seqmax)
+#define PL_cred_mutex (PL_Vars.Gcred_mutex)
#define PL_cryptseen (PL_Vars.Gcryptseen)
#define PL_cshlen (PL_Vars.Gcshlen)
#define PL_cshname (PL_Vars.Gcshname)
#define PL_yyerrflag (PL_Vars.Gyyerrflag)
#define PL_yylval (PL_Vars.Gyylval)
#define PL_yynerrs (PL_Vars.Gyynerrs)
-#define PL_yyssp (PL_Vars.Gyyssp)
#define PL_yyval (PL_Vars.Gyyval)
-#define PL_yyvsp (PL_Vars.Gyyvsp)
#else /* !PERL_GLOBAL_STRUCT */
#define PL_Gcollxfrm_base PL_collxfrm_base
#define PL_Gcollxfrm_mult PL_collxfrm_mult
#define PL_Gcop_seqmax PL_cop_seqmax
+#define PL_Gcred_mutex PL_cred_mutex
#define PL_Gcryptseen PL_cryptseen
#define PL_Gcshlen PL_cshlen
#define PL_Gcshname PL_cshname
#define PL_Gyyerrflag PL_yyerrflag
#define PL_Gyylval PL_yylval
#define PL_Gyynerrs PL_yynerrs
-#define PL_Gyyssp PL_yyssp
#define PL_Gyyval PL_yyval
-#define PL_Gyyvsp PL_yyvsp
-
-#ifdef EMBED
-#endif /* EMBED */
#endif /* PERL_GLOBAL_STRUCT */
-#ifndef MIN_PERL_DEFINE
+#ifdef PERL_POLLUTE /* unsupported in 5.006 */
#define DBsingle PL_DBsingle
#define DBsub PL_DBsub