home *** CD-ROM | disk | FTP | other *** search
/ PC World 2005 December (Special) / PCWorld_2005-12_Special_cd.bin / Bezpecnost / lsti / lsti.exe / framework-2.5.exe / embedvar.h < prev    next >
Text File  |  2005-01-27  |  61KB  |  1,501 lines

  1. /*
  2.  *    embedvar.h
  3.  *
  4.  *    Copyright (C) 1999, 2000, 2001, 2002, 2003, 2004, by Larry Wall and others
  5.  *
  6.  *    You may distribute under the terms of either the GNU General Public
  7.  *    License or the Artistic License, as specified in the README file.
  8.  *
  9.  * !!!!!!!   DO NOT EDIT THIS FILE   !!!!!!!
  10.  * This file is built by embed.pl from data in embed.fnc, embed.pl,
  11.  * pp.sym, intrpvar.h, perlvars.h and thrdvar.h.
  12.  * Any changes made here will be lost!
  13.  *
  14.  * Edit those files and run 'make regen_headers' to effect changes.
  15.  */
  16.  
  17. /* (Doing namespace management portably in C is really gross.) */
  18.  
  19. /*
  20.    The following combinations of MULTIPLICITY, USE_5005THREADS
  21.    and PERL_IMPLICIT_CONTEXT are supported:
  22.      1) none
  23.      2) MULTIPLICITY    # supported for compatibility
  24.      3) MULTIPLICITY && PERL_IMPLICIT_CONTEXT
  25.      4) USE_5005THREADS && PERL_IMPLICIT_CONTEXT
  26.      5) MULTIPLICITY && USE_5005THREADS && PERL_IMPLICIT_CONTEXT
  27.  
  28.    All other combinations of these flags are errors.
  29.  
  30.    #3, #4, #5, and #6 are supported directly, while #2 is a special
  31.    case of #3 (supported by redefining vTHX appropriately).
  32. */
  33.  
  34. #if defined(MULTIPLICITY)
  35. /* cases 2, 3 and 5 above */
  36.  
  37. #  if defined(PERL_IMPLICIT_CONTEXT)
  38. #    define vTHX    aTHX
  39. #  else
  40. #    define vTHX    PERL_GET_INTERP
  41. #  endif
  42.  
  43. #define PL_Sv            (vTHX->TSv)
  44. #define PL_Xpv            (vTHX->TXpv)
  45. #define PL_av_fetch_sv        (vTHX->Tav_fetch_sv)
  46. #define PL_bodytarget        (vTHX->Tbodytarget)
  47. #define PL_bostr        (vTHX->Tbostr)
  48. #define PL_chopset        (vTHX->Tchopset)
  49. #define PL_colors        (vTHX->Tcolors)
  50. #define PL_colorset        (vTHX->Tcolorset)
  51. #define PL_comppad        (vTHX->Tcomppad)
  52. #define PL_curcop        (vTHX->Tcurcop)
  53. #define PL_curpad        (vTHX->Tcurpad)
  54. #define PL_curpm        (vTHX->Tcurpm)
  55. #define PL_curstack        (vTHX->Tcurstack)
  56. #define PL_curstackinfo        (vTHX->Tcurstackinfo)
  57. #define PL_curstash        (vTHX->Tcurstash)
  58. #define PL_defoutgv        (vTHX->Tdefoutgv)
  59. #define PL_defstash        (vTHX->Tdefstash)
  60. #define PL_delaymagic        (vTHX->Tdelaymagic)
  61. #define PL_dirty        (vTHX->Tdirty)
  62. #define PL_dumpindent        (vTHX->Tdumpindent)
  63. #define PL_efloatbuf        (vTHX->Tefloatbuf)
  64. #define PL_efloatsize        (vTHX->Tefloatsize)
  65. #define PL_errors        (vTHX->Terrors)
  66. #define PL_extralen        (vTHX->Textralen)
  67. #define PL_firstgv        (vTHX->Tfirstgv)
  68. #define PL_formtarget        (vTHX->Tformtarget)
  69. #define PL_hv_fetch_ent_mh    (vTHX->Thv_fetch_ent_mh)
  70. #define PL_hv_fetch_sv        (vTHX->Thv_fetch_sv)
  71. #define PL_in_eval        (vTHX->Tin_eval)
  72. #define PL_last_in_gv        (vTHX->Tlast_in_gv)
  73. #define PL_lastgotoprobe    (vTHX->Tlastgotoprobe)
  74. #define PL_lastscream        (vTHX->Tlastscream)
  75. #define PL_localizing        (vTHX->Tlocalizing)
  76. #define PL_mainstack        (vTHX->Tmainstack)
  77. #define PL_markstack        (vTHX->Tmarkstack)
  78. #define PL_markstack_max    (vTHX->Tmarkstack_max)
  79. #define PL_markstack_ptr    (vTHX->Tmarkstack_ptr)
  80. #define PL_maxscream        (vTHX->Tmaxscream)
  81. #define PL_modcount        (vTHX->Tmodcount)
  82. #define PL_na            (vTHX->Tna)
  83. #define PL_nrs            (vTHX->Tnrs)
  84. #define PL_ofs_sv        (vTHX->Tofs_sv)
  85. #define PL_op            (vTHX->Top)
  86. #define PL_opsave        (vTHX->Topsave)
  87. #define PL_peepp        (vTHX->Tpeepp)
  88. #define PL_protect        (vTHX->Tprotect)
  89. #define PL_reg_call_cc        (vTHX->Treg_call_cc)
  90. #define PL_reg_curpm        (vTHX->Treg_curpm)
  91. #define PL_reg_eval_set        (vTHX->Treg_eval_set)
  92. #define PL_reg_flags        (vTHX->Treg_flags)
  93. #define PL_reg_ganch        (vTHX->Treg_ganch)
  94. #define PL_reg_leftiter        (vTHX->Treg_leftiter)
  95. #define PL_reg_magic        (vTHX->Treg_magic)
  96. #define PL_reg_match_utf8    (vTHX->Treg_match_utf8)
  97. #define PL_reg_maxiter        (vTHX->Treg_maxiter)
  98. #define PL_reg_oldcurpm        (vTHX->Treg_oldcurpm)
  99. #define PL_reg_oldpos        (vTHX->Treg_oldpos)
  100. #define PL_reg_oldsaved        (vTHX->Treg_oldsaved)
  101. #define PL_reg_oldsavedlen    (vTHX->Treg_oldsavedlen)
  102. #define PL_reg_poscache        (vTHX->Treg_poscache)
  103. #define PL_reg_poscache_size    (vTHX->Treg_poscache_size)
  104. #define PL_reg_re        (vTHX->Treg_re)
  105. #define PL_reg_start_tmp    (vTHX->Treg_start_tmp)
  106. #define PL_reg_start_tmpl    (vTHX->Treg_start_tmpl)
  107. #define PL_reg_starttry        (vTHX->Treg_starttry)
  108. #define PL_reg_sv        (vTHX->Treg_sv)
  109. #define PL_reg_whilem_seen    (vTHX->Treg_whilem_seen)
  110. #define PL_regbol        (vTHX->Tregbol)
  111. #define PL_regcc        (vTHX->Tregcc)
  112. #define PL_regcode        (vTHX->Tregcode)
  113. #define PL_regcomp_parse    (vTHX->Tregcomp_parse)
  114. #define PL_regcomp_rx        (vTHX->Tregcomp_rx)
  115. #define PL_regcompat1        (vTHX->Tregcompat1)
  116. #define PL_regcompp        (vTHX->Tregcompp)
  117. #define PL_regdata        (vTHX->Tregdata)
  118. #define PL_regdummy        (vTHX->Tregdummy)
  119. #define PL_regendp        (vTHX->Tregendp)
  120. #define PL_regeol        (vTHX->Tregeol)
  121. #define PL_regexecp        (vTHX->Tregexecp)
  122. #define PL_regflags        (vTHX->Tregflags)
  123. #define PL_regfree        (vTHX->Tregfree)
  124. #define PL_regindent        (vTHX->Tregindent)
  125. #define PL_reginput        (vTHX->Treginput)
  126. #define PL_regint_start        (vTHX->Tregint_start)
  127. #define PL_regint_string    (vTHX->Tregint_string)
  128. #define PL_reginterp_cnt    (vTHX->Treginterp_cnt)
  129. #define PL_reglastcloseparen    (vTHX->Treglastcloseparen)
  130. #define PL_reglastparen        (vTHX->Treglastparen)
  131. #define PL_regnarrate        (vTHX->Tregnarrate)
  132. #define PL_regnaughty        (vTHX->Tregnaughty)
  133. #define PL_regnpar        (vTHX->Tregnpar)
  134. #define PL_regprecomp        (vTHX->Tregprecomp)
  135. #define PL_regprogram        (vTHX->Tregprogram)
  136. #define PL_regsawback        (vTHX->Tregsawback)
  137. #define PL_regseen        (vTHX->Tregseen)
  138. #define PL_regsize        (vTHX->Tregsize)
  139. #define PL_regstartp        (vTHX->Tregstartp)
  140. #define PL_regtill        (vTHX->Tregtill)
  141. #define PL_regxend        (vTHX->Tregxend)
  142. #define PL_restartop        (vTHX->Trestartop)
  143. #define PL_retstack        (vTHX->Tretstack)
  144. #define PL_retstack_ix        (vTHX->Tretstack_ix)
  145. #define PL_retstack_max        (vTHX->Tretstack_max)
  146. #define PL_rs            (vTHX->Trs)
  147. #define PL_savestack        (vTHX->Tsavestack)
  148. #define PL_savestack_ix        (vTHX->Tsavestack_ix)
  149. #define PL_savestack_max    (vTHX->Tsavestack_max)
  150. #define PL_scopestack        (vTHX->Tscopestack)
  151. #define PL_scopestack_ix    (vTHX->Tscopestack_ix)
  152. #define PL_scopestack_max    (vTHX->Tscopestack_max)
  153. #define PL_screamfirst        (vTHX->Tscreamfirst)
  154. #define PL_screamnext        (vTHX->Tscreamnext)
  155. #define PL_secondgv        (vTHX->Tsecondgv)
  156. #define PL_seen_evals        (vTHX->Tseen_evals)
  157. #define PL_seen_zerolen        (vTHX->Tseen_zerolen)
  158. #define PL_sortcop        (vTHX->Tsortcop)
  159. #define PL_sortcxix        (vTHX->Tsortcxix)
  160. #define PL_sortstash        (vTHX->Tsortstash)
  161. #define PL_stack_base        (vTHX->Tstack_base)
  162. #define PL_stack_max        (vTHX->Tstack_max)
  163. #define PL_stack_sp        (vTHX->Tstack_sp)
  164. #define PL_start_env        (vTHX->Tstart_env)
  165. #define PL_statbuf        (vTHX->Tstatbuf)
  166. #define PL_statcache        (vTHX->Tstatcache)
  167. #define PL_statgv        (vTHX->Tstatgv)
  168. #define PL_statname        (vTHX->Tstatname)
  169. #define PL_tainted        (vTHX->Ttainted)
  170. #define PL_timesbuf        (vTHX->Ttimesbuf)
  171. #define PL_tmps_floor        (vTHX->Ttmps_floor)
  172. #define PL_tmps_ix        (vTHX->Ttmps_ix)
  173. #define PL_tmps_max        (vTHX->Ttmps_max)
  174. #define PL_tmps_stack        (vTHX->Ttmps_stack)
  175. #define PL_top_env        (vTHX->Ttop_env)
  176. #define PL_toptarget        (vTHX->Ttoptarget)
  177. #define PL_watchaddr        (vTHX->Twatchaddr)
  178. #define PL_watchok        (vTHX->Twatchok)
  179.  
  180. #  if defined(USE_5005THREADS)
  181. /* case 5 above */
  182.  
  183. #define PL_Argv            (PERL_GET_INTERP->IArgv)
  184. #define PL_BINCOMPAT0        (PERL_GET_INTERP->IBINCOMPAT0)
  185. #define PL_Cmd            (PERL_GET_INTERP->ICmd)
  186. #define PL_DBcv            (PERL_GET_INTERP->IDBcv)
  187. #define PL_DBgv            (PERL_GET_INTERP->IDBgv)
  188. #define PL_DBline        (PERL_GET_INTERP->IDBline)
  189. #define PL_DBsignal        (PERL_GET_INTERP->IDBsignal)
  190. #define PL_DBsingle        (PERL_GET_INTERP->IDBsingle)
  191. #define PL_DBsub        (PERL_GET_INTERP->IDBsub)
  192. #define PL_DBtrace        (PERL_GET_INTERP->IDBtrace)
  193. #define PL_Dir            (PERL_GET_INTERP->IDir)
  194. #define PL_Env            (PERL_GET_INTERP->IEnv)
  195. #define PL_LIO            (PERL_GET_INTERP->ILIO)
  196. #define PL_Mem            (PERL_GET_INTERP->IMem)
  197. #define PL_MemParse        (PERL_GET_INTERP->IMemParse)
  198. #define PL_MemShared        (PERL_GET_INTERP->IMemShared)
  199. #define PL_OpPtr        (PERL_GET_INTERP->IOpPtr)
  200. #define PL_OpSlab        (PERL_GET_INTERP->IOpSlab)
  201. #define PL_OpSpace        (PERL_GET_INTERP->IOpSpace)
  202. #define PL_Proc            (PERL_GET_INTERP->IProc)
  203. #define PL_Sock            (PERL_GET_INTERP->ISock)
  204. #define PL_StdIO        (PERL_GET_INTERP->IStdIO)
  205. #define PL_amagic_generation    (PERL_GET_INTERP->Iamagic_generation)
  206. #define PL_an            (PERL_GET_INTERP->Ian)
  207. #define PL_argvgv        (PERL_GET_INTERP->Iargvgv)
  208. #define PL_argvout_stack    (PERL_GET_INTERP->Iargvout_stack)
  209. #define PL_argvoutgv        (PERL_GET_INTERP->Iargvoutgv)
  210. #define PL_basetime        (PERL_GET_INTERP->Ibasetime)
  211. #define PL_beginav        (PERL_GET_INTERP->Ibeginav)
  212. #define PL_beginav_save        (PERL_GET_INTERP->Ibeginav_save)
  213. #define PL_bitcount        (PERL_GET_INTERP->Ibitcount)
  214. #define PL_bufend        (PERL_GET_INTERP->Ibufend)
  215. #define PL_bufptr        (PERL_GET_INTERP->Ibufptr)
  216. #define PL_checkav        (PERL_GET_INTERP->Icheckav)
  217. #define PL_checkav_save        (PERL_GET_INTERP->Icheckav_save)
  218. #define PL_clocktick        (PERL_GET_INTERP->Iclocktick)
  219. #define PL_collation_ix        (PERL_GET_INTERP->Icollation_ix)
  220. #define PL_collation_name    (PERL_GET_INTERP->Icollation_name)
  221. #define PL_collation_standard    (PERL_GET_INTERP->Icollation_standard)
  222. #define PL_collxfrm_base    (PERL_GET_INTERP->Icollxfrm_base)
  223. #define PL_collxfrm_mult    (PERL_GET_INTERP->Icollxfrm_mult)
  224. #define PL_compcv        (PERL_GET_INTERP->Icompcv)
  225. #define PL_compiling        (PERL_GET_INTERP->Icompiling)
  226. #define PL_comppad_name        (PERL_GET_INTERP->Icomppad_name)
  227. #define PL_comppad_name_fill    (PERL_GET_INTERP->Icomppad_name_fill)
  228. #define PL_comppad_name_floor    (PERL_GET_INTERP->Icomppad_name_floor)
  229. #define PL_cop_seqmax        (PERL_GET_INTERP->Icop_seqmax)
  230. #define PL_copline        (PERL_GET_INTERP->Icopline)
  231. #define PL_cred_mutex        (PERL_GET_INTERP->Icred_mutex)
  232. #define PL_cryptseen        (PERL_GET_INTERP->Icryptseen)
  233. #define PL_cshlen        (PERL_GET_INTERP->Icshlen)
  234. #define PL_cshname        (PERL_GET_INTERP->Icshname)
  235. #define PL_curcopdb        (PERL_GET_INTERP->Icurcopdb)
  236. #define PL_curstname        (PERL_GET_INTERP->Icurstname)
  237. #define PL_curthr        (PERL_GET_INTERP->Icurthr)
  238. #define PL_custom_op_descs    (PERL_GET_INTERP->Icustom_op_descs)
  239. #define PL_custom_op_names    (PERL_GET_INTERP->Icustom_op_names)
  240. #define PL_dbargs        (PERL_GET_INTERP->Idbargs)
  241. #define PL_debstash        (PERL_GET_INTERP->Idebstash)
  242. #define PL_debug        (PERL_GET_INTERP->Idebug)
  243. #define PL_debug_pad        (PERL_GET_INTERP->Idebug_pad)
  244. #define PL_def_layerlist    (PERL_GET_INTERP->Idef_layerlist)
  245. #define PL_defgv        (PERL_GET_INTERP->Idefgv)
  246. #define PL_diehook        (PERL_GET_INTERP->Idiehook)
  247. #define PL_doextract        (PERL_GET_INTERP->Idoextract)
  248. #define PL_doswitches        (PERL_GET_INTERP->Idoswitches)
  249. #define PL_dowarn        (PERL_GET_INTERP->Idowarn)
  250. #define PL_e_script        (PERL_GET_INTERP->Ie_script)
  251. #define PL_egid            (PERL_GET_INTERP->Iegid)
  252. #define PL_encoding        (PERL_GET_INTERP->Iencoding)
  253. #define PL_endav        (PERL_GET_INTERP->Iendav)
  254. #define PL_envgv        (PERL_GET_INTERP->Ienvgv)
  255. #define PL_errgv        (PERL_GET_INTERP->Ierrgv)
  256. #define PL_error_count        (PERL_GET_INTERP->Ierror_count)
  257. #define PL_euid            (PERL_GET_INTERP->Ieuid)
  258. #define PL_eval_cond        (PERL_GET_INTERP->Ieval_cond)
  259. #define PL_eval_mutex        (PERL_GET_INTERP->Ieval_mutex)
  260. #define PL_eval_owner        (PERL_GET_INTERP->Ieval_owner)
  261. #define PL_eval_root        (PERL_GET_INTERP->Ieval_root)
  262. #define PL_eval_start        (PERL_GET_INTERP->Ieval_start)
  263. #define PL_evalseq        (PERL_GET_INTERP->Ievalseq)
  264. #define PL_exit_flags        (PERL_GET_INTERP->Iexit_flags)
  265. #define PL_exitlist        (PERL_GET_INTERP->Iexitlist)
  266. #define PL_exitlistlen        (PERL_GET_INTERP->Iexitlistlen)
  267. #define PL_expect        (PERL_GET_INTERP->Iexpect)
  268. #define PL_fdpid        (PERL_GET_INTERP->Ifdpid)
  269. #define PL_fdpid_mutex        (PERL_GET_INTERP->Ifdpid_mutex)
  270. #define PL_fdscript        (PERL_GET_INTERP->Ifdscript)
  271. #define PL_filemode        (PERL_GET_INTERP->Ifilemode)
  272. #define PL_forkprocess        (PERL_GET_INTERP->Iforkprocess)
  273. #define PL_formfeed        (PERL_GET_INTERP->Iformfeed)
  274. #define PL_generation        (PERL_GET_INTERP->Igeneration)
  275. #define PL_gensym        (PERL_GET_INTERP->Igensym)
  276. #define PL_gid            (PERL_GET_INTERP->Igid)
  277. #define PL_glob_index        (PERL_GET_INTERP->Iglob_index)
  278. #define PL_globalstash        (PERL_GET_INTERP->Iglobalstash)
  279. #define PL_hash_seed        (PERL_GET_INTERP->Ihash_seed)
  280. #define PL_hash_seed_set    (PERL_GET_INTERP->Ihash_seed_set)
  281. #define PL_he_arenaroot        (PERL_GET_INTERP->Ihe_arenaroot)
  282. #define PL_he_root        (PERL_GET_INTERP->Ihe_root)
  283. #define PL_hintgv        (PERL_GET_INTERP->Ihintgv)
  284. #define PL_hints        (PERL_GET_INTERP->Ihints)
  285. #define PL_in_clean_all        (PERL_GET_INTERP->Iin_clean_all)
  286. #define PL_in_clean_objs    (PERL_GET_INTERP->Iin_clean_objs)
  287. #define PL_in_load_module    (PERL_GET_INTERP->Iin_load_module)
  288. #define PL_in_my        (PERL_GET_INTERP->Iin_my)
  289. #define PL_in_my_stash        (PERL_GET_INTERP->Iin_my_stash)
  290. #define PL_incgv        (PERL_GET_INTERP->Iincgv)
  291. #define PL_initav        (PERL_GET_INTERP->Iinitav)
  292. #define PL_inplace        (PERL_GET_INTERP->Iinplace)
  293. #define PL_known_layers        (PERL_GET_INTERP->Iknown_layers)
  294. #define PL_last_lop        (PERL_GET_INTERP->Ilast_lop)
  295. #define PL_last_lop_op        (PERL_GET_INTERP->Ilast_lop_op)
  296. #define PL_last_swash_hv    (PERL_GET_INTERP->Ilast_swash_hv)
  297. #define PL_last_swash_key    (PERL_GET_INTERP->Ilast_swash_key)
  298. #define PL_last_swash_klen    (PERL_GET_INTERP->Ilast_swash_klen)
  299. #define PL_last_swash_slen    (PERL_GET_INTERP->Ilast_swash_slen)
  300. #define PL_last_swash_tmps    (PERL_GET_INTERP->Ilast_swash_tmps)
  301. #define PL_last_uni        (PERL_GET_INTERP->Ilast_uni)
  302. #define PL_lastfd        (PERL_GET_INTERP->Ilastfd)
  303. #define PL_laststatval        (PERL_GET_INTERP->Ilaststatval)
  304. #define PL_laststype        (PERL_GET_INTERP->Ilaststype)
  305. #define PL_lex_brackets        (PERL_GET_INTERP->Ilex_brackets)
  306. #define PL_lex_brackstack    (PERL_GET_INTERP->Ilex_brackstack)
  307. #define PL_lex_casemods        (PERL_GET_INTERP->Ilex_casemods)
  308. #define PL_lex_casestack    (PERL_GET_INTERP->Ilex_casestack)
  309. #define PL_lex_defer        (PERL_GET_INTERP->Ilex_defer)
  310. #define PL_lex_dojoin        (PERL_GET_INTERP->Ilex_dojoin)
  311. #define PL_lex_expect        (PERL_GET_INTERP->Ilex_expect)
  312. #define PL_lex_formbrack    (PERL_GET_INTERP->Ilex_formbrack)
  313. #define PL_lex_inpat        (PERL_GET_INTERP->Ilex_inpat)
  314. #define PL_lex_inwhat        (PERL_GET_INTERP->Ilex_inwhat)
  315. #define PL_lex_op        (PERL_GET_INTERP->Ilex_op)
  316. #define PL_lex_repl        (PERL_GET_INTERP->Ilex_repl)
  317. #define PL_lex_starts        (PERL_GET_INTERP->Ilex_starts)
  318. #define PL_lex_state        (PERL_GET_INTERP->Ilex_state)
  319. #define PL_lex_stuff        (PERL_GET_INTERP->Ilex_stuff)
  320. #define PL_lineary        (PERL_GET_INTERP->Ilineary)
  321. #define PL_linestart        (PERL_GET_INTERP->Ilinestart)
  322. #define PL_linestr        (PERL_GET_INTERP->Ilinestr)
  323. #define PL_localpatches        (PERL_GET_INTERP->Ilocalpatches)
  324. #define PL_lockhook        (PERL_GET_INTERP->Ilockhook)
  325. #define PL_main_cv        (PERL_GET_INTERP->Imain_cv)
  326. #define PL_main_root        (PERL_GET_INTERP->Imain_root)
  327. #define PL_main_start        (PERL_GET_INTERP->Imain_start)
  328. #define PL_max_intro_pending    (PERL_GET_INTERP->Imax_intro_pending)
  329. #define PL_maxo            (PERL_GET_INTERP->Imaxo)
  330. #define PL_maxsysfd        (PERL_GET_INTERP->Imaxsysfd)
  331. #define PL_mess_sv        (PERL_GET_INTERP->Imess_sv)
  332. #define PL_min_intro_pending    (PERL_GET_INTERP->Imin_intro_pending)
  333. #define PL_minus_F        (PERL_GET_INTERP->Iminus_F)
  334. #define PL_minus_a        (PERL_GET_INTERP->Iminus_a)
  335. #define PL_minus_c        (PERL_GET_INTERP->Iminus_c)
  336. #define PL_minus_l        (PERL_GET_INTERP->Iminus_l)
  337. #define PL_minus_n        (PERL_GET_INTERP->Iminus_n)
  338. #define PL_minus_p        (PERL_GET_INTERP->Iminus_p)
  339. #define PL_modglobal        (PERL_GET_INTERP->Imodglobal)
  340. #define PL_multi_close        (PERL_GET_INTERP->Imulti_close)
  341. #define PL_multi_end        (PERL_GET_INTERP->Imulti_end)
  342. #define PL_multi_open        (PERL_GET_INTERP->Imulti_open)
  343. #define PL_multi_start        (PERL_GET_INTERP->Imulti_start)
  344. #define PL_multiline        (PERL_GET_INTERP->Imultiline)
  345. #define PL_nexttoke        (PERL_GET_INTERP->Inexttoke)
  346. #define PL_nexttype        (PERL_GET_INTERP->Inexttype)
  347. #define PL_nextval        (PERL_GET_INTERP->Inextval)
  348. #define PL_nice_chunk        (PERL_GET_INTERP->Inice_chunk)
  349. #define PL_nice_chunk_size    (PERL_GET_INTERP->Inice_chunk_size)
  350. #define PL_nomemok        (PERL_GET_INTERP->Inomemok)
  351. #define PL_nthreads        (PERL_GET_INTERP->Inthreads)
  352. #define PL_nthreads_cond    (PERL_GET_INTERP->Inthreads_cond)
  353. #define PL_nullstash        (PERL_GET_INTERP->Inullstash)
  354. #define PL_numeric_compat1    (PERL_GET_INTERP->Inumeric_compat1)
  355. #define PL_numeric_local    (PERL_GET_INTERP->Inumeric_local)
  356. #define PL_numeric_name        (PERL_GET_INTERP->Inumeric_name)
  357. #define PL_numeric_radix_sv    (PERL_GET_INTERP->Inumeric_radix_sv)
  358. #define PL_numeric_standard    (PERL_GET_INTERP->Inumeric_standard)
  359. #define PL_ofmt            (PERL_GET_INTERP->Iofmt)
  360. #define PL_oldbufptr        (PERL_GET_INTERP->Ioldbufptr)
  361. #define PL_oldname        (PERL_GET_INTERP->Ioldname)
  362. #define PL_oldoldbufptr        (PERL_GET_INTERP->Ioldoldbufptr)
  363. #define PL_op_mask        (PERL_GET_INTERP->Iop_mask)
  364. #define PL_op_seqmax        (PERL_GET_INTERP->Iop_seqmax)
  365. #define PL_origalen        (PERL_GET_INTERP->Iorigalen)
  366. #define PL_origargc        (PERL_GET_INTERP->Iorigargc)
  367. #define PL_origargv        (PERL_GET_INTERP->Iorigargv)
  368. #define PL_origenviron        (PERL_GET_INTERP->Iorigenviron)
  369. #define PL_origfilename        (PERL_GET_INTERP->Iorigfilename)
  370. #define PL_ors_sv        (PERL_GET_INTERP->Iors_sv)
  371. #define PL_osname        (PERL_GET_INTERP->Iosname)
  372. #define PL_pad_reset_pending    (PERL_GET_INTERP->Ipad_reset_pending)
  373. #define PL_padix        (PERL_GET_INTERP->Ipadix)
  374. #define PL_padix_floor        (PERL_GET_INTERP->Ipadix_floor)
  375. #define PL_patchlevel        (PERL_GET_INTERP->Ipatchlevel)
  376. #define PL_pending_ident    (PERL_GET_INTERP->Ipending_ident)
  377. #define PL_perl_destruct_level    (PERL_GET_INTERP->Iperl_destruct_level)
  378. #define PL_perldb        (PERL_GET_INTERP->Iperldb)
  379. #define PL_perlio        (PERL_GET_INTERP->Iperlio)
  380. #define PL_pidstatus        (PERL_GET_INTERP->Ipidstatus)
  381. #define PL_ppid            (PERL_GET_INTERP->Ippid)
  382. #define PL_preambleav        (PERL_GET_INTERP->Ipreambleav)
  383. #define PL_preambled        (PERL_GET_INTERP->Ipreambled)
  384. #define PL_preprocess        (PERL_GET_INTERP->Ipreprocess)
  385. #define PL_profiledata        (PERL_GET_INTERP->Iprofiledata)
  386. #define PL_psig_name        (PERL_GET_INTERP->Ipsig_name)
  387. #define PL_psig_pend        (PERL_GET_INTERP->Ipsig_pend)
  388. #define PL_psig_ptr        (PERL_GET_INTERP->Ipsig_ptr)
  389. #define PL_ptr_table        (PERL_GET_INTERP->Iptr_table)
  390. #define PL_reentrant_buffer    (PERL_GET_INTERP->Ireentrant_buffer)
  391. #define PL_reentrant_retint    (PERL_GET_INTERP->Ireentrant_retint)
  392. #define PL_regex_pad        (PERL_GET_INTERP->Iregex_pad)
  393. #define PL_regex_padav        (PERL_GET_INTERP->Iregex_padav)
  394. #define PL_rehash_seed        (PERL_GET_INTERP->Irehash_seed)
  395. #define PL_rehash_seed_set    (PERL_GET_INTERP->Irehash_seed_set)
  396. #define PL_replgv        (PERL_GET_INTERP->Ireplgv)
  397. #define PL_rsfp            (PERL_GET_INTERP->Irsfp)
  398. #define PL_rsfp_filters        (PERL_GET_INTERP->Irsfp_filters)
  399. #define PL_runops        (PERL_GET_INTERP->Irunops)
  400. #define PL_runops_dbg        (PERL_GET_INTERP->Irunops_dbg)
  401. #define PL_runops_std        (PERL_GET_INTERP->Irunops_std)
  402. #define PL_savebegin        (PERL_GET_INTERP->Isavebegin)
  403. #define PL_sawampersand        (PERL_GET_INTERP->Isawampersand)
  404. #define PL_sh_path_compat    (PERL_GET_INTERP->Ish_path_compat)
  405. #define PL_sharehook        (PERL_GET_INTERP->Isharehook)
  406. #define PL_sig_pending        (PERL_GET_INTERP->Isig_pending)
  407. #define PL_sighandlerp        (PERL_GET_INTERP->Isighandlerp)
  408. #define PL_signals        (PERL_GET_INTERP->Isignals)
  409. #define PL_sort_RealCmp        (PERL_GET_INTERP->Isort_RealCmp)
  410. #define PL_splitstr        (PERL_GET_INTERP->Isplitstr)
  411. #define PL_srand_called        (PERL_GET_INTERP->Isrand_called)
  412. #define PL_stashcache        (PERL_GET_INTERP->Istashcache)
  413. #define PL_statusvalue        (PERL_GET_INTERP->Istatusvalue)
  414. #define PL_statusvalue_vms    (PERL_GET_INTERP->Istatusvalue_vms)
  415. #define PL_stderrgv        (PERL_GET_INTERP->Istderrgv)
  416. #define PL_stdingv        (PERL_GET_INTERP->Istdingv)
  417. #define PL_strtab        (PERL_GET_INTERP->Istrtab)
  418. #define PL_strtab_mutex        (PERL_GET_INTERP->Istrtab_mutex)
  419. #define PL_sub_generation    (PERL_GET_INTERP->Isub_generation)
  420. #define PL_sublex_info        (PERL_GET_INTERP->Isublex_info)
  421. #define PL_subline        (PERL_GET_INTERP->Isubline)
  422. #define PL_subname        (PERL_GET_INTERP->Isubname)
  423. #define PL_suidscript        (PERL_GET_INTERP->Isuidscript)
  424. #define PL_sv_arenaroot        (PERL_GET_INTERP->Isv_arenaroot)
  425. #define PL_sv_count        (PERL_GET_INTERP->Isv_count)
  426. #define PL_sv_lock_mutex    (PERL_GET_INTERP->Isv_lock_mutex)
  427. #define PL_sv_mutex        (PERL_GET_INTERP->Isv_mutex)
  428. #define PL_sv_no        (PERL_GET_INTERP->Isv_no)
  429. #define PL_sv_objcount        (PERL_GET_INTERP->Isv_objcount)
  430. #define PL_sv_root        (PERL_GET_INTERP->Isv_root)
  431. #define PL_sv_undef        (PERL_GET_INTERP->Isv_undef)
  432. #define PL_sv_yes        (PERL_GET_INTERP->Isv_yes)
  433. #define PL_svref_mutex        (PERL_GET_INTERP->Isvref_mutex)
  434. #define PL_sys_intern        (PERL_GET_INTERP->Isys_intern)
  435. #define PL_taint_warn        (PERL_GET_INTERP->Itaint_warn)
  436. #define PL_tainting        (PERL_GET_INTERP->Itainting)
  437. #define PL_threadhook        (PERL_GET_INTERP->Ithreadhook)
  438. #define PL_threadnum        (PERL_GET_INTERP->Ithreadnum)
  439. #define PL_threads_mutex    (PERL_GET_INTERP->Ithreads_mutex)
  440. #define PL_threadsv_names    (PERL_GET_INTERP->Ithreadsv_names)
  441. #define PL_thrsv        (PERL_GET_INTERP->Ithrsv)
  442. #define PL_tokenbuf        (PERL_GET_INTERP->Itokenbuf)
  443. #define PL_uid            (PERL_GET_INTERP->Iuid)
  444. #define PL_unicode        (PERL_GET_INTERP->Iunicode)
  445. #define PL_unlockhook        (PERL_GET_INTERP->Iunlockhook)
  446. #define PL_unsafe        (PERL_GET_INTERP->Iunsafe)
  447. #define PL_utf8_alnum        (PERL_GET_INTERP->Iutf8_alnum)
  448. #define PL_utf8_alnumc        (PERL_GET_INTERP->Iutf8_alnumc)
  449. #define PL_utf8_alpha        (PERL_GET_INTERP->Iutf8_alpha)
  450. #define PL_utf8_ascii        (PERL_GET_INTERP->Iutf8_ascii)
  451. #define PL_utf8_cntrl        (PERL_GET_INTERP->Iutf8_cntrl)
  452. #define PL_utf8_digit        (PERL_GET_INTERP->Iutf8_digit)
  453. #define PL_utf8_graph        (PERL_GET_INTERP->Iutf8_graph)
  454. #define PL_utf8_idcont        (PERL_GET_INTERP->Iutf8_idcont)
  455. #define PL_utf8_idstart        (PERL_GET_INTERP->Iutf8_idstart)
  456. #define PL_utf8_lower        (PERL_GET_INTERP->Iutf8_lower)
  457. #define PL_utf8_mark        (PERL_GET_INTERP->Iutf8_mark)
  458. #define PL_utf8_print        (PERL_GET_INTERP->Iutf8_print)
  459. #define PL_utf8_punct        (PERL_GET_INTERP->Iutf8_punct)
  460. #define PL_utf8_space        (PERL_GET_INTERP->Iutf8_space)
  461. #define PL_utf8_tofold        (PERL_GET_INTERP->Iutf8_tofold)
  462. #define PL_utf8_tolower        (PERL_GET_INTERP->Iutf8_tolower)
  463. #define PL_utf8_totitle        (PERL_GET_INTERP->Iutf8_totitle)
  464. #define PL_utf8_toupper        (PERL_GET_INTERP->Iutf8_toupper)
  465. #define PL_utf8_upper        (PERL_GET_INTERP->Iutf8_upper)
  466. #define PL_utf8_xdigit        (PERL_GET_INTERP->Iutf8_xdigit)
  467. #define PL_utf8locale        (PERL_GET_INTERP->Iutf8locale)
  468. #define PL_uudmap        (PERL_GET_INTERP->Iuudmap)
  469. #define PL_warnhook        (PERL_GET_INTERP->Iwarnhook)
  470. #define PL_widesyscalls        (PERL_GET_INTERP->Iwidesyscalls)
  471. #define PL_xiv_arenaroot    (PERL_GET_INTERP->Ixiv_arenaroot)
  472. #define PL_xiv_root        (PERL_GET_INTERP->Ixiv_root)
  473. #define PL_xnv_arenaroot    (PERL_GET_INTERP->Ixnv_arenaroot)
  474. #define PL_xnv_root        (PERL_GET_INTERP->Ixnv_root)
  475. #define PL_xpv_arenaroot    (PERL_GET_INTERP->Ixpv_arenaroot)
  476. #define PL_xpv_root        (PERL_GET_INTERP->Ixpv_root)
  477. #define PL_xpvav_arenaroot    (PERL_GET_INTERP->Ixpvav_arenaroot)
  478. #define PL_xpvav_root        (PERL_GET_INTERP->Ixpvav_root)
  479. #define PL_xpvbm_arenaroot    (PERL_GET_INTERP->Ixpvbm_arenaroot)
  480. #define PL_xpvbm_root        (PERL_GET_INTERP->Ixpvbm_root)
  481. #define PL_xpvcv_arenaroot    (PERL_GET_INTERP->Ixpvcv_arenaroot)
  482. #define PL_xpvcv_root        (PERL_GET_INTERP->Ixpvcv_root)
  483. #define PL_xpvhv_arenaroot    (PERL_GET_INTERP->Ixpvhv_arenaroot)
  484. #define PL_xpvhv_root        (PERL_GET_INTERP->Ixpvhv_root)
  485. #define PL_xpviv_arenaroot    (PERL_GET_INTERP->Ixpviv_arenaroot)
  486. #define PL_xpviv_root        (PERL_GET_INTERP->Ixpviv_root)
  487. #define PL_xpvlv_arenaroot    (PERL_GET_INTERP->Ixpvlv_arenaroot)
  488. #define PL_xpvlv_root        (PERL_GET_INTERP->Ixpvlv_root)
  489. #define PL_xpvmg_arenaroot    (PERL_GET_INTERP->Ixpvmg_arenaroot)
  490. #define PL_xpvmg_root        (PERL_GET_INTERP->Ixpvmg_root)
  491. #define PL_xpvnv_arenaroot    (PERL_GET_INTERP->Ixpvnv_arenaroot)
  492. #define PL_xpvnv_root        (PERL_GET_INTERP->Ixpvnv_root)
  493. #define PL_xrv_arenaroot    (PERL_GET_INTERP->Ixrv_arenaroot)
  494. #define PL_xrv_root        (PERL_GET_INTERP->Ixrv_root)
  495. #define PL_yychar        (PERL_GET_INTERP->Iyychar)
  496. #define PL_yydebug        (PERL_GET_INTERP->Iyydebug)
  497. #define PL_yyerrflag        (PERL_GET_INTERP->Iyyerrflag)
  498. #define PL_yylval        (PERL_GET_INTERP->Iyylval)
  499. #define PL_yynerrs        (PERL_GET_INTERP->Iyynerrs)
  500. #define PL_yyval        (PERL_GET_INTERP->Iyyval)
  501.  
  502. #  else        /* !USE_5005THREADS */
  503. /* cases 2 and 3 above */
  504.  
  505. #define PL_Argv            (vTHX->IArgv)
  506. #define PL_BINCOMPAT0        (vTHX->IBINCOMPAT0)
  507. #define PL_Cmd            (vTHX->ICmd)
  508. #define PL_DBcv            (vTHX->IDBcv)
  509. #define PL_DBgv            (vTHX->IDBgv)
  510. #define PL_DBline        (vTHX->IDBline)
  511. #define PL_DBsignal        (vTHX->IDBsignal)
  512. #define PL_DBsingle        (vTHX->IDBsingle)
  513. #define PL_DBsub        (vTHX->IDBsub)
  514. #define PL_DBtrace        (vTHX->IDBtrace)
  515. #define PL_Dir            (vTHX->IDir)
  516. #define PL_Env            (vTHX->IEnv)
  517. #define PL_LIO            (vTHX->ILIO)
  518. #define PL_Mem            (vTHX->IMem)
  519. #define PL_MemParse        (vTHX->IMemParse)
  520. #define PL_MemShared        (vTHX->IMemShared)
  521. #define PL_OpPtr        (vTHX->IOpPtr)
  522. #define PL_OpSlab        (vTHX->IOpSlab)
  523. #define PL_OpSpace        (vTHX->IOpSpace)
  524. #define PL_Proc            (vTHX->IProc)
  525. #define PL_Sock            (vTHX->ISock)
  526. #define PL_StdIO        (vTHX->IStdIO)
  527. #define PL_amagic_generation    (vTHX->Iamagic_generation)
  528. #define PL_an            (vTHX->Ian)
  529. #define PL_argvgv        (vTHX->Iargvgv)
  530. #define PL_argvout_stack    (vTHX->Iargvout_stack)
  531. #define PL_argvoutgv        (vTHX->Iargvoutgv)
  532. #define PL_basetime        (vTHX->Ibasetime)
  533. #define PL_beginav        (vTHX->Ibeginav)
  534. #define PL_beginav_save        (vTHX->Ibeginav_save)
  535. #define PL_bitcount        (vTHX->Ibitcount)
  536. #define PL_bufend        (vTHX->Ibufend)
  537. #define PL_bufptr        (vTHX->Ibufptr)
  538. #define PL_checkav        (vTHX->Icheckav)
  539. #define PL_checkav_save        (vTHX->Icheckav_save)
  540. #define PL_clocktick        (vTHX->Iclocktick)
  541. #define PL_collation_ix        (vTHX->Icollation_ix)
  542. #define PL_collation_name    (vTHX->Icollation_name)
  543. #define PL_collation_standard    (vTHX->Icollation_standard)
  544. #define PL_collxfrm_base    (vTHX->Icollxfrm_base)
  545. #define PL_collxfrm_mult    (vTHX->Icollxfrm_mult)
  546. #define PL_compcv        (vTHX->Icompcv)
  547. #define PL_compiling        (vTHX->Icompiling)
  548. #define PL_comppad_name        (vTHX->Icomppad_name)
  549. #define PL_comppad_name_fill    (vTHX->Icomppad_name_fill)
  550. #define PL_comppad_name_floor    (vTHX->Icomppad_name_floor)
  551. #define PL_cop_seqmax        (vTHX->Icop_seqmax)
  552. #define PL_copline        (vTHX->Icopline)
  553. #define PL_cred_mutex        (vTHX->Icred_mutex)
  554. #define PL_cryptseen        (vTHX->Icryptseen)
  555. #define PL_cshlen        (vTHX->Icshlen)
  556. #define PL_cshname        (vTHX->Icshname)
  557. #define PL_curcopdb        (vTHX->Icurcopdb)
  558. #define PL_curstname        (vTHX->Icurstname)
  559. #define PL_curthr        (vTHX->Icurthr)
  560. #define PL_custom_op_descs    (vTHX->Icustom_op_descs)
  561. #define PL_custom_op_names    (vTHX->Icustom_op_names)
  562. #define PL_dbargs        (vTHX->Idbargs)
  563. #define PL_debstash        (vTHX->Idebstash)
  564. #define PL_debug        (vTHX->Idebug)
  565. #define PL_debug_pad        (vTHX->Idebug_pad)
  566. #define PL_def_layerlist    (vTHX->Idef_layerlist)
  567. #define PL_defgv        (vTHX->Idefgv)
  568. #define PL_diehook        (vTHX->Idiehook)
  569. #define PL_doextract        (vTHX->Idoextract)
  570. #define PL_doswitches        (vTHX->Idoswitches)
  571. #define PL_dowarn        (vTHX->Idowarn)
  572. #define PL_e_script        (vTHX->Ie_script)
  573. #define PL_egid            (vTHX->Iegid)
  574. #define PL_encoding        (vTHX->Iencoding)
  575. #define PL_endav        (vTHX->Iendav)
  576. #define PL_envgv        (vTHX->Ienvgv)
  577. #define PL_errgv        (vTHX->Ierrgv)
  578. #define PL_error_count        (vTHX->Ierror_count)
  579. #define PL_euid            (vTHX->Ieuid)
  580. #define PL_eval_cond        (vTHX->Ieval_cond)
  581. #define PL_eval_mutex        (vTHX->Ieval_mutex)
  582. #define PL_eval_owner        (vTHX->Ieval_owner)
  583. #define PL_eval_root        (vTHX->Ieval_root)
  584. #define PL_eval_start        (vTHX->Ieval_start)
  585. #define PL_evalseq        (vTHX->Ievalseq)
  586. #define PL_exit_flags        (vTHX->Iexit_flags)
  587. #define PL_exitlist        (vTHX->Iexitlist)
  588. #define PL_exitlistlen        (vTHX->Iexitlistlen)
  589. #define PL_expect        (vTHX->Iexpect)
  590. #define PL_fdpid        (vTHX->Ifdpid)
  591. #define PL_fdpid_mutex        (vTHX->Ifdpid_mutex)
  592. #define PL_fdscript        (vTHX->Ifdscript)
  593. #define PL_filemode        (vTHX->Ifilemode)
  594. #define PL_forkprocess        (vTHX->Iforkprocess)
  595. #define PL_formfeed        (vTHX->Iformfeed)
  596. #define PL_generation        (vTHX->Igeneration)
  597. #define PL_gensym        (vTHX->Igensym)
  598. #define PL_gid            (vTHX->Igid)
  599. #define PL_glob_index        (vTHX->Iglob_index)
  600. #define PL_globalstash        (vTHX->Iglobalstash)
  601. #define PL_hash_seed        (vTHX->Ihash_seed)
  602. #define PL_hash_seed_set    (vTHX->Ihash_seed_set)
  603. #define PL_he_arenaroot        (vTHX->Ihe_arenaroot)
  604. #define PL_he_root        (vTHX->Ihe_root)
  605. #define PL_hintgv        (vTHX->Ihintgv)
  606. #define PL_hints        (vTHX->Ihints)
  607. #define PL_in_clean_all        (vTHX->Iin_clean_all)
  608. #define PL_in_clean_objs    (vTHX->Iin_clean_objs)
  609. #define PL_in_load_module    (vTHX->Iin_load_module)
  610. #define PL_in_my        (vTHX->Iin_my)
  611. #define PL_in_my_stash        (vTHX->Iin_my_stash)
  612. #define PL_incgv        (vTHX->Iincgv)
  613. #define PL_initav        (vTHX->Iinitav)
  614. #define PL_inplace        (vTHX->Iinplace)
  615. #define PL_known_layers        (vTHX->Iknown_layers)
  616. #define PL_last_lop        (vTHX->Ilast_lop)
  617. #define PL_last_lop_op        (vTHX->Ilast_lop_op)
  618. #define PL_last_swash_hv    (vTHX->Ilast_swash_hv)
  619. #define PL_last_swash_key    (vTHX->Ilast_swash_key)
  620. #define PL_last_swash_klen    (vTHX->Ilast_swash_klen)
  621. #define PL_last_swash_slen    (vTHX->Ilast_swash_slen)
  622. #define PL_last_swash_tmps    (vTHX->Ilast_swash_tmps)
  623. #define PL_last_uni        (vTHX->Ilast_uni)
  624. #define PL_lastfd        (vTHX->Ilastfd)
  625. #define PL_laststatval        (vTHX->Ilaststatval)
  626. #define PL_laststype        (vTHX->Ilaststype)
  627. #define PL_lex_brackets        (vTHX->Ilex_brackets)
  628. #define PL_lex_brackstack    (vTHX->Ilex_brackstack)
  629. #define PL_lex_casemods        (vTHX->Ilex_casemods)
  630. #define PL_lex_casestack    (vTHX->Ilex_casestack)
  631. #define PL_lex_defer        (vTHX->Ilex_defer)
  632. #define PL_lex_dojoin        (vTHX->Ilex_dojoin)
  633. #define PL_lex_expect        (vTHX->Ilex_expect)
  634. #define PL_lex_formbrack    (vTHX->Ilex_formbrack)
  635. #define PL_lex_inpat        (vTHX->Ilex_inpat)
  636. #define PL_lex_inwhat        (vTHX->Ilex_inwhat)
  637. #define PL_lex_op        (vTHX->Ilex_op)
  638. #define PL_lex_repl        (vTHX->Ilex_repl)
  639. #define PL_lex_starts        (vTHX->Ilex_starts)
  640. #define PL_lex_state        (vTHX->Ilex_state)
  641. #define PL_lex_stuff        (vTHX->Ilex_stuff)
  642. #define PL_lineary        (vTHX->Ilineary)
  643. #define PL_linestart        (vTHX->Ilinestart)
  644. #define PL_linestr        (vTHX->Ilinestr)
  645. #define PL_localpatches        (vTHX->Ilocalpatches)
  646. #define PL_lockhook        (vTHX->Ilockhook)
  647. #define PL_main_cv        (vTHX->Imain_cv)
  648. #define PL_main_root        (vTHX->Imain_root)
  649. #define PL_main_start        (vTHX->Imain_start)
  650. #define PL_max_intro_pending    (vTHX->Imax_intro_pending)
  651. #define PL_maxo            (vTHX->Imaxo)
  652. #define PL_maxsysfd        (vTHX->Imaxsysfd)
  653. #define PL_mess_sv        (vTHX->Imess_sv)
  654. #define PL_min_intro_pending    (vTHX->Imin_intro_pending)
  655. #define PL_minus_F        (vTHX->Iminus_F)
  656. #define PL_minus_a        (vTHX->Iminus_a)
  657. #define PL_minus_c        (vTHX->Iminus_c)
  658. #define PL_minus_l        (vTHX->Iminus_l)
  659. #define PL_minus_n        (vTHX->Iminus_n)
  660. #define PL_minus_p        (vTHX->Iminus_p)
  661. #define PL_modglobal        (vTHX->Imodglobal)
  662. #define PL_multi_close        (vTHX->Imulti_close)
  663. #define PL_multi_end        (vTHX->Imulti_end)
  664. #define PL_multi_open        (vTHX->Imulti_open)
  665. #define PL_multi_start        (vTHX->Imulti_start)
  666. #define PL_multiline        (vTHX->Imultiline)
  667. #define PL_nexttoke        (vTHX->Inexttoke)
  668. #define PL_nexttype        (vTHX->Inexttype)
  669. #define PL_nextval        (vTHX->Inextval)
  670. #define PL_nice_chunk        (vTHX->Inice_chunk)
  671. #define PL_nice_chunk_size    (vTHX->Inice_chunk_size)
  672. #define PL_nomemok        (vTHX->Inomemok)
  673. #define PL_nthreads        (vTHX->Inthreads)
  674. #define PL_nthreads_cond    (vTHX->Inthreads_cond)
  675. #define PL_nullstash        (vTHX->Inullstash)
  676. #define PL_numeric_compat1    (vTHX->Inumeric_compat1)
  677. #define PL_numeric_local    (vTHX->Inumeric_local)
  678. #define PL_numeric_name        (vTHX->Inumeric_name)
  679. #define PL_numeric_radix_sv    (vTHX->Inumeric_radix_sv)
  680. #define PL_numeric_standard    (vTHX->Inumeric_standard)
  681. #define PL_ofmt            (vTHX->Iofmt)
  682. #define PL_oldbufptr        (vTHX->Ioldbufptr)
  683. #define PL_oldname        (vTHX->Ioldname)
  684. #define PL_oldoldbufptr        (vTHX->Ioldoldbufptr)
  685. #define PL_op_mask        (vTHX->Iop_mask)
  686. #define PL_op_seqmax        (vTHX->Iop_seqmax)
  687. #define PL_origalen        (vTHX->Iorigalen)
  688. #define PL_origargc        (vTHX->Iorigargc)
  689. #define PL_origargv        (vTHX->Iorigargv)
  690. #define PL_origenviron        (vTHX->Iorigenviron)
  691. #define PL_origfilename        (vTHX->Iorigfilename)
  692. #define PL_ors_sv        (vTHX->Iors_sv)
  693. #define PL_osname        (vTHX->Iosname)
  694. #define PL_pad_reset_pending    (vTHX->Ipad_reset_pending)
  695. #define PL_padix        (vTHX->Ipadix)
  696. #define PL_padix_floor        (vTHX->Ipadix_floor)
  697. #define PL_patchlevel        (vTHX->Ipatchlevel)
  698. #define PL_pending_ident    (vTHX->Ipending_ident)
  699. #define PL_perl_destruct_level    (vTHX->Iperl_destruct_level)
  700. #define PL_perldb        (vTHX->Iperldb)
  701. #define PL_perlio        (vTHX->Iperlio)
  702. #define PL_pidstatus        (vTHX->Ipidstatus)
  703. #define PL_ppid            (vTHX->Ippid)
  704. #define PL_preambleav        (vTHX->Ipreambleav)
  705. #define PL_preambled        (vTHX->Ipreambled)
  706. #define PL_preprocess        (vTHX->Ipreprocess)
  707. #define PL_profiledata        (vTHX->Iprofiledata)
  708. #define PL_psig_name        (vTHX->Ipsig_name)
  709. #define PL_psig_pend        (vTHX->Ipsig_pend)
  710. #define PL_psig_ptr        (vTHX->Ipsig_ptr)
  711. #define PL_ptr_table        (vTHX->Iptr_table)
  712. #define PL_reentrant_buffer    (vTHX->Ireentrant_buffer)
  713. #define PL_reentrant_retint    (vTHX->Ireentrant_retint)
  714. #define PL_regex_pad        (vTHX->Iregex_pad)
  715. #define PL_regex_padav        (vTHX->Iregex_padav)
  716. #define PL_rehash_seed        (vTHX->Irehash_seed)
  717. #define PL_rehash_seed_set    (vTHX->Irehash_seed_set)
  718. #define PL_replgv        (vTHX->Ireplgv)
  719. #define PL_rsfp            (vTHX->Irsfp)
  720. #define PL_rsfp_filters        (vTHX->Irsfp_filters)
  721. #define PL_runops        (vTHX->Irunops)
  722. #define PL_runops_dbg        (vTHX->Irunops_dbg)
  723. #define PL_runops_std        (vTHX->Irunops_std)
  724. #define PL_savebegin        (vTHX->Isavebegin)
  725. #define PL_sawampersand        (vTHX->Isawampersand)
  726. #define PL_sh_path_compat    (vTHX->Ish_path_compat)
  727. #define PL_sharehook        (vTHX->Isharehook)
  728. #define PL_sig_pending        (vTHX->Isig_pending)
  729. #define PL_sighandlerp        (vTHX->Isighandlerp)
  730. #define PL_signals        (vTHX->Isignals)
  731. #define PL_sort_RealCmp        (vTHX->Isort_RealCmp)
  732. #define PL_splitstr        (vTHX->Isplitstr)
  733. #define PL_srand_called        (vTHX->Isrand_called)
  734. #define PL_stashcache        (vTHX->Istashcache)
  735. #define PL_statusvalue        (vTHX->Istatusvalue)
  736. #define PL_statusvalue_vms    (vTHX->Istatusvalue_vms)
  737. #define PL_stderrgv        (vTHX->Istderrgv)
  738. #define PL_stdingv        (vTHX->Istdingv)
  739. #define PL_strtab        (vTHX->Istrtab)
  740. #define PL_strtab_mutex        (vTHX->Istrtab_mutex)
  741. #define PL_sub_generation    (vTHX->Isub_generation)
  742. #define PL_sublex_info        (vTHX->Isublex_info)
  743. #define PL_subline        (vTHX->Isubline)
  744. #define PL_subname        (vTHX->Isubname)
  745. #define PL_suidscript        (vTHX->Isuidscript)
  746. #define PL_sv_arenaroot        (vTHX->Isv_arenaroot)
  747. #define PL_sv_count        (vTHX->Isv_count)
  748. #define PL_sv_lock_mutex    (vTHX->Isv_lock_mutex)
  749. #define PL_sv_mutex        (vTHX->Isv_mutex)
  750. #define PL_sv_no        (vTHX->Isv_no)
  751. #define PL_sv_objcount        (vTHX->Isv_objcount)
  752. #define PL_sv_root        (vTHX->Isv_root)
  753. #define PL_sv_undef        (vTHX->Isv_undef)
  754. #define PL_sv_yes        (vTHX->Isv_yes)
  755. #define PL_svref_mutex        (vTHX->Isvref_mutex)
  756. #define PL_sys_intern        (vTHX->Isys_intern)
  757. #define PL_taint_warn        (vTHX->Itaint_warn)
  758. #define PL_tainting        (vTHX->Itainting)
  759. #define PL_threadhook        (vTHX->Ithreadhook)
  760. #define PL_threadnum        (vTHX->Ithreadnum)
  761. #define PL_threads_mutex    (vTHX->Ithreads_mutex)
  762. #define PL_threadsv_names    (vTHX->Ithreadsv_names)
  763. #define PL_thrsv        (vTHX->Ithrsv)
  764. #define PL_tokenbuf        (vTHX->Itokenbuf)
  765. #define PL_uid            (vTHX->Iuid)
  766. #define PL_unicode        (vTHX->Iunicode)
  767. #define PL_unlockhook        (vTHX->Iunlockhook)
  768. #define PL_unsafe        (vTHX->Iunsafe)
  769. #define PL_utf8_alnum        (vTHX->Iutf8_alnum)
  770. #define PL_utf8_alnumc        (vTHX->Iutf8_alnumc)
  771. #define PL_utf8_alpha        (vTHX->Iutf8_alpha)
  772. #define PL_utf8_ascii        (vTHX->Iutf8_ascii)
  773. #define PL_utf8_cntrl        (vTHX->Iutf8_cntrl)
  774. #define PL_utf8_digit        (vTHX->Iutf8_digit)
  775. #define PL_utf8_graph        (vTHX->Iutf8_graph)
  776. #define PL_utf8_idcont        (vTHX->Iutf8_idcont)
  777. #define PL_utf8_idstart        (vTHX->Iutf8_idstart)
  778. #define PL_utf8_lower        (vTHX->Iutf8_lower)
  779. #define PL_utf8_mark        (vTHX->Iutf8_mark)
  780. #define PL_utf8_print        (vTHX->Iutf8_print)
  781. #define PL_utf8_punct        (vTHX->Iutf8_punct)
  782. #define PL_utf8_space        (vTHX->Iutf8_space)
  783. #define PL_utf8_tofold        (vTHX->Iutf8_tofold)
  784. #define PL_utf8_tolower        (vTHX->Iutf8_tolower)
  785. #define PL_utf8_totitle        (vTHX->Iutf8_totitle)
  786. #define PL_utf8_toupper        (vTHX->Iutf8_toupper)
  787. #define PL_utf8_upper        (vTHX->Iutf8_upper)
  788. #define PL_utf8_xdigit        (vTHX->Iutf8_xdigit)
  789. #define PL_utf8locale        (vTHX->Iutf8locale)
  790. #define PL_uudmap        (vTHX->Iuudmap)
  791. #define PL_warnhook        (vTHX->Iwarnhook)
  792. #define PL_widesyscalls        (vTHX->Iwidesyscalls)
  793. #define PL_xiv_arenaroot    (vTHX->Ixiv_arenaroot)
  794. #define PL_xiv_root        (vTHX->Ixiv_root)
  795. #define PL_xnv_arenaroot    (vTHX->Ixnv_arenaroot)
  796. #define PL_xnv_root        (vTHX->Ixnv_root)
  797. #define PL_xpv_arenaroot    (vTHX->Ixpv_arenaroot)
  798. #define PL_xpv_root        (vTHX->Ixpv_root)
  799. #define PL_xpvav_arenaroot    (vTHX->Ixpvav_arenaroot)
  800. #define PL_xpvav_root        (vTHX->Ixpvav_root)
  801. #define PL_xpvbm_arenaroot    (vTHX->Ixpvbm_arenaroot)
  802. #define PL_xpvbm_root        (vTHX->Ixpvbm_root)
  803. #define PL_xpvcv_arenaroot    (vTHX->Ixpvcv_arenaroot)
  804. #define PL_xpvcv_root        (vTHX->Ixpvcv_root)
  805. #define PL_xpvhv_arenaroot    (vTHX->Ixpvhv_arenaroot)
  806. #define PL_xpvhv_root        (vTHX->Ixpvhv_root)
  807. #define PL_xpviv_arenaroot    (vTHX->Ixpviv_arenaroot)
  808. #define PL_xpviv_root        (vTHX->Ixpviv_root)
  809. #define PL_xpvlv_arenaroot    (vTHX->Ixpvlv_arenaroot)
  810. #define PL_xpvlv_root        (vTHX->Ixpvlv_root)
  811. #define PL_xpvmg_arenaroot    (vTHX->Ixpvmg_arenaroot)
  812. #define PL_xpvmg_root        (vTHX->Ixpvmg_root)
  813. #define PL_xpvnv_arenaroot    (vTHX->Ixpvnv_arenaroot)
  814. #define PL_xpvnv_root        (vTHX->Ixpvnv_root)
  815. #define PL_xrv_arenaroot    (vTHX->Ixrv_arenaroot)
  816. #define PL_xrv_root        (vTHX->Ixrv_root)
  817. #define PL_yychar        (vTHX->Iyychar)
  818. #define PL_yydebug        (vTHX->Iyydebug)
  819. #define PL_yyerrflag        (vTHX->Iyyerrflag)
  820. #define PL_yylval        (vTHX->Iyylval)
  821. #define PL_yynerrs        (vTHX->Iyynerrs)
  822. #define PL_yyval        (vTHX->Iyyval)
  823.  
  824. #  endif    /* USE_5005THREADS */
  825.  
  826. #else    /* !MULTIPLICITY */
  827.  
  828. /* cases 1 and 4 above */
  829.  
  830. #define PL_IArgv        PL_Argv
  831. #define PL_IBINCOMPAT0        PL_BINCOMPAT0
  832. #define PL_ICmd            PL_Cmd
  833. #define PL_IDBcv        PL_DBcv
  834. #define PL_IDBgv        PL_DBgv
  835. #define PL_IDBline        PL_DBline
  836. #define PL_IDBsignal        PL_DBsignal
  837. #define PL_IDBsingle        PL_DBsingle
  838. #define PL_IDBsub        PL_DBsub
  839. #define PL_IDBtrace        PL_DBtrace
  840. #define PL_IDir            PL_Dir
  841. #define PL_IEnv            PL_Env
  842. #define PL_ILIO            PL_LIO
  843. #define PL_IMem            PL_Mem
  844. #define PL_IMemParse        PL_MemParse
  845. #define PL_IMemShared        PL_MemShared
  846. #define PL_IOpPtr        PL_OpPtr
  847. #define PL_IOpSlab        PL_OpSlab
  848. #define PL_IOpSpace        PL_OpSpace
  849. #define PL_IProc        PL_Proc
  850. #define PL_ISock        PL_Sock
  851. #define PL_IStdIO        PL_StdIO
  852. #define PL_Iamagic_generation    PL_amagic_generation
  853. #define PL_Ian            PL_an
  854. #define PL_Iargvgv        PL_argvgv
  855. #define PL_Iargvout_stack    PL_argvout_stack
  856. #define PL_Iargvoutgv        PL_argvoutgv
  857. #define PL_Ibasetime        PL_basetime
  858. #define PL_Ibeginav        PL_beginav
  859. #define PL_Ibeginav_save    PL_beginav_save
  860. #define PL_Ibitcount        PL_bitcount
  861. #define PL_Ibufend        PL_bufend
  862. #define PL_Ibufptr        PL_bufptr
  863. #define PL_Icheckav        PL_checkav
  864. #define PL_Icheckav_save    PL_checkav_save
  865. #define PL_Iclocktick        PL_clocktick
  866. #define PL_Icollation_ix    PL_collation_ix
  867. #define PL_Icollation_name    PL_collation_name
  868. #define PL_Icollation_standard    PL_collation_standard
  869. #define PL_Icollxfrm_base    PL_collxfrm_base
  870. #define PL_Icollxfrm_mult    PL_collxfrm_mult
  871. #define PL_Icompcv        PL_compcv
  872. #define PL_Icompiling        PL_compiling
  873. #define PL_Icomppad_name    PL_comppad_name
  874. #define PL_Icomppad_name_fill    PL_comppad_name_fill
  875. #define PL_Icomppad_name_floor    PL_comppad_name_floor
  876. #define PL_Icop_seqmax        PL_cop_seqmax
  877. #define PL_Icopline        PL_copline
  878. #define PL_Icred_mutex        PL_cred_mutex
  879. #define PL_Icryptseen        PL_cryptseen
  880. #define PL_Icshlen        PL_cshlen
  881. #define PL_Icshname        PL_cshname
  882. #define PL_Icurcopdb        PL_curcopdb
  883. #define PL_Icurstname        PL_curstname
  884. #define PL_Icurthr        PL_curthr
  885. #define PL_Icustom_op_descs    PL_custom_op_descs
  886. #define PL_Icustom_op_names    PL_custom_op_names
  887. #define PL_Idbargs        PL_dbargs
  888. #define PL_Idebstash        PL_debstash
  889. #define PL_Idebug        PL_debug
  890. #define PL_Idebug_pad        PL_debug_pad
  891. #define PL_Idef_layerlist    PL_def_layerlist
  892. #define PL_Idefgv        PL_defgv
  893. #define PL_Idiehook        PL_diehook
  894. #define PL_Idoextract        PL_doextract
  895. #define PL_Idoswitches        PL_doswitches
  896. #define PL_Idowarn        PL_dowarn
  897. #define PL_Ie_script        PL_e_script
  898. #define PL_Iegid        PL_egid
  899. #define PL_Iencoding        PL_encoding
  900. #define PL_Iendav        PL_endav
  901. #define PL_Ienvgv        PL_envgv
  902. #define PL_Ierrgv        PL_errgv
  903. #define PL_Ierror_count        PL_error_count
  904. #define PL_Ieuid        PL_euid
  905. #define PL_Ieval_cond        PL_eval_cond
  906. #define PL_Ieval_mutex        PL_eval_mutex
  907. #define PL_Ieval_owner        PL_eval_owner
  908. #define PL_Ieval_root        PL_eval_root
  909. #define PL_Ieval_start        PL_eval_start
  910. #define PL_Ievalseq        PL_evalseq
  911. #define PL_Iexit_flags        PL_exit_flags
  912. #define PL_Iexitlist        PL_exitlist
  913. #define PL_Iexitlistlen        PL_exitlistlen
  914. #define PL_Iexpect        PL_expect
  915. #define PL_Ifdpid        PL_fdpid
  916. #define PL_Ifdpid_mutex        PL_fdpid_mutex
  917. #define PL_Ifdscript        PL_fdscript
  918. #define PL_Ifilemode        PL_filemode
  919. #define PL_Iforkprocess        PL_forkprocess
  920. #define PL_Iformfeed        PL_formfeed
  921. #define PL_Igeneration        PL_generation
  922. #define PL_Igensym        PL_gensym
  923. #define PL_Igid            PL_gid
  924. #define PL_Iglob_index        PL_glob_index
  925. #define PL_Iglobalstash        PL_globalstash
  926. #define PL_Ihash_seed        PL_hash_seed
  927. #define PL_Ihash_seed_set    PL_hash_seed_set
  928. #define PL_Ihe_arenaroot    PL_he_arenaroot
  929. #define PL_Ihe_root        PL_he_root
  930. #define PL_Ihintgv        PL_hintgv
  931. #define PL_Ihints        PL_hints
  932. #define PL_Iin_clean_all    PL_in_clean_all
  933. #define PL_Iin_clean_objs    PL_in_clean_objs
  934. #define PL_Iin_load_module    PL_in_load_module
  935. #define PL_Iin_my        PL_in_my
  936. #define PL_Iin_my_stash        PL_in_my_stash
  937. #define PL_Iincgv        PL_incgv
  938. #define PL_Iinitav        PL_initav
  939. #define PL_Iinplace        PL_inplace
  940. #define PL_Iknown_layers    PL_known_layers
  941. #define PL_Ilast_lop        PL_last_lop
  942. #define PL_Ilast_lop_op        PL_last_lop_op
  943. #define PL_Ilast_swash_hv    PL_last_swash_hv
  944. #define PL_Ilast_swash_key    PL_last_swash_key
  945. #define PL_Ilast_swash_klen    PL_last_swash_klen
  946. #define PL_Ilast_swash_slen    PL_last_swash_slen
  947. #define PL_Ilast_swash_tmps    PL_last_swash_tmps
  948. #define PL_Ilast_uni        PL_last_uni
  949. #define PL_Ilastfd        PL_lastfd
  950. #define PL_Ilaststatval        PL_laststatval
  951. #define PL_Ilaststype        PL_laststype
  952. #define PL_Ilex_brackets    PL_lex_brackets
  953. #define PL_Ilex_brackstack    PL_lex_brackstack
  954. #define PL_Ilex_casemods    PL_lex_casemods
  955. #define PL_Ilex_casestack    PL_lex_casestack
  956. #define PL_Ilex_defer        PL_lex_defer
  957. #define PL_Ilex_dojoin        PL_lex_dojoin
  958. #define PL_Ilex_expect        PL_lex_expect
  959. #define PL_Ilex_formbrack    PL_lex_formbrack
  960. #define PL_Ilex_inpat        PL_lex_inpat
  961. #define PL_Ilex_inwhat        PL_lex_inwhat
  962. #define PL_Ilex_op        PL_lex_op
  963. #define PL_Ilex_repl        PL_lex_repl
  964. #define PL_Ilex_starts        PL_lex_starts
  965. #define PL_Ilex_state        PL_lex_state
  966. #define PL_Ilex_stuff        PL_lex_stuff
  967. #define PL_Ilineary        PL_lineary
  968. #define PL_Ilinestart        PL_linestart
  969. #define PL_Ilinestr        PL_linestr
  970. #define PL_Ilocalpatches    PL_localpatches
  971. #define PL_Ilockhook        PL_lockhook
  972. #define PL_Imain_cv        PL_main_cv
  973. #define PL_Imain_root        PL_main_root
  974. #define PL_Imain_start        PL_main_start
  975. #define PL_Imax_intro_pending    PL_max_intro_pending
  976. #define PL_Imaxo        PL_maxo
  977. #define PL_Imaxsysfd        PL_maxsysfd
  978. #define PL_Imess_sv        PL_mess_sv
  979. #define PL_Imin_intro_pending    PL_min_intro_pending
  980. #define PL_Iminus_F        PL_minus_F
  981. #define PL_Iminus_a        PL_minus_a
  982. #define PL_Iminus_c        PL_minus_c
  983. #define PL_Iminus_l        PL_minus_l
  984. #define PL_Iminus_n        PL_minus_n
  985. #define PL_Iminus_p        PL_minus_p
  986. #define PL_Imodglobal        PL_modglobal
  987. #define PL_Imulti_close        PL_multi_close
  988. #define PL_Imulti_end        PL_multi_end
  989. #define PL_Imulti_open        PL_multi_open
  990. #define PL_Imulti_start        PL_multi_start
  991. #define PL_Imultiline        PL_multiline
  992. #define PL_Inexttoke        PL_nexttoke
  993. #define PL_Inexttype        PL_nexttype
  994. #define PL_Inextval        PL_nextval
  995. #define PL_Inice_chunk        PL_nice_chunk
  996. #define PL_Inice_chunk_size    PL_nice_chunk_size
  997. #define PL_Inomemok        PL_nomemok
  998. #define PL_Inthreads        PL_nthreads
  999. #define PL_Inthreads_cond    PL_nthreads_cond
  1000. #define PL_Inullstash        PL_nullstash
  1001. #define PL_Inumeric_compat1    PL_numeric_compat1
  1002. #define PL_Inumeric_local    PL_numeric_local
  1003. #define PL_Inumeric_name    PL_numeric_name
  1004. #define PL_Inumeric_radix_sv    PL_numeric_radix_sv
  1005. #define PL_Inumeric_standard    PL_numeric_standard
  1006. #define PL_Iofmt        PL_ofmt
  1007. #define PL_Ioldbufptr        PL_oldbufptr
  1008. #define PL_Ioldname        PL_oldname
  1009. #define PL_Ioldoldbufptr    PL_oldoldbufptr
  1010. #define PL_Iop_mask        PL_op_mask
  1011. #define PL_Iop_seqmax        PL_op_seqmax
  1012. #define PL_Iorigalen        PL_origalen
  1013. #define PL_Iorigargc        PL_origargc
  1014. #define PL_Iorigargv        PL_origargv
  1015. #define PL_Iorigenviron        PL_origenviron
  1016. #define PL_Iorigfilename    PL_origfilename
  1017. #define PL_Iors_sv        PL_ors_sv
  1018. #define PL_Iosname        PL_osname
  1019. #define PL_Ipad_reset_pending    PL_pad_reset_pending
  1020. #define PL_Ipadix        PL_padix
  1021. #define PL_Ipadix_floor        PL_padix_floor
  1022. #define PL_Ipatchlevel        PL_patchlevel
  1023. #define PL_Ipending_ident    PL_pending_ident
  1024. #define PL_Iperl_destruct_level    PL_perl_destruct_level
  1025. #define PL_Iperldb        PL_perldb
  1026. #define PL_Iperlio        PL_perlio
  1027. #define PL_Ipidstatus        PL_pidstatus
  1028. #define PL_Ippid        PL_ppid
  1029. #define PL_Ipreambleav        PL_preambleav
  1030. #define PL_Ipreambled        PL_preambled
  1031. #define PL_Ipreprocess        PL_preprocess
  1032. #define PL_Iprofiledata        PL_profiledata
  1033. #define PL_Ipsig_name        PL_psig_name
  1034. #define PL_Ipsig_pend        PL_psig_pend
  1035. #define PL_Ipsig_ptr        PL_psig_ptr
  1036. #define PL_Iptr_table        PL_ptr_table
  1037. #define PL_Ireentrant_buffer    PL_reentrant_buffer
  1038. #define PL_Ireentrant_retint    PL_reentrant_retint
  1039. #define PL_Iregex_pad        PL_regex_pad
  1040. #define PL_Iregex_padav        PL_regex_padav
  1041. #define PL_Irehash_seed        PL_rehash_seed
  1042. #define PL_Irehash_seed_set    PL_rehash_seed_set
  1043. #define PL_Ireplgv        PL_replgv
  1044. #define PL_Irsfp        PL_rsfp
  1045. #define PL_Irsfp_filters    PL_rsfp_filters
  1046. #define PL_Irunops        PL_runops
  1047. #define PL_Irunops_dbg        PL_runops_dbg
  1048. #define PL_Irunops_std        PL_runops_std
  1049. #define PL_Isavebegin        PL_savebegin
  1050. #define PL_Isawampersand    PL_sawampersand
  1051. #define PL_Ish_path_compat    PL_sh_path_compat
  1052. #define PL_Isharehook        PL_sharehook
  1053. #define PL_Isig_pending        PL_sig_pending
  1054. #define PL_Isighandlerp        PL_sighandlerp
  1055. #define PL_Isignals        PL_signals
  1056. #define PL_Isort_RealCmp    PL_sort_RealCmp
  1057. #define PL_Isplitstr        PL_splitstr
  1058. #define PL_Isrand_called    PL_srand_called
  1059. #define PL_Istashcache        PL_stashcache
  1060. #define PL_Istatusvalue        PL_statusvalue
  1061. #define PL_Istatusvalue_vms    PL_statusvalue_vms
  1062. #define PL_Istderrgv        PL_stderrgv
  1063. #define PL_Istdingv        PL_stdingv
  1064. #define PL_Istrtab        PL_strtab
  1065. #define PL_Istrtab_mutex    PL_strtab_mutex
  1066. #define PL_Isub_generation    PL_sub_generation
  1067. #define PL_Isublex_info        PL_sublex_info
  1068. #define PL_Isubline        PL_subline
  1069. #define PL_Isubname        PL_subname
  1070. #define PL_Isuidscript        PL_suidscript
  1071. #define PL_Isv_arenaroot    PL_sv_arenaroot
  1072. #define PL_Isv_count        PL_sv_count
  1073. #define PL_Isv_lock_mutex    PL_sv_lock_mutex
  1074. #define PL_Isv_mutex        PL_sv_mutex
  1075. #define PL_Isv_no        PL_sv_no
  1076. #define PL_Isv_objcount        PL_sv_objcount
  1077. #define PL_Isv_root        PL_sv_root
  1078. #define PL_Isv_undef        PL_sv_undef
  1079. #define PL_Isv_yes        PL_sv_yes
  1080. #define PL_Isvref_mutex        PL_svref_mutex
  1081. #define PL_Isys_intern        PL_sys_intern
  1082. #define PL_Itaint_warn        PL_taint_warn
  1083. #define PL_Itainting        PL_tainting
  1084. #define PL_Ithreadhook        PL_threadhook
  1085. #define PL_Ithreadnum        PL_threadnum
  1086. #define PL_Ithreads_mutex    PL_threads_mutex
  1087. #define PL_Ithreadsv_names    PL_threadsv_names
  1088. #define PL_Ithrsv        PL_thrsv
  1089. #define PL_Itokenbuf        PL_tokenbuf
  1090. #define PL_Iuid            PL_uid
  1091. #define PL_Iunicode        PL_unicode
  1092. #define PL_Iunlockhook        PL_unlockhook
  1093. #define PL_Iunsafe        PL_unsafe
  1094. #define PL_Iutf8_alnum        PL_utf8_alnum
  1095. #define PL_Iutf8_alnumc        PL_utf8_alnumc
  1096. #define PL_Iutf8_alpha        PL_utf8_alpha
  1097. #define PL_Iutf8_ascii        PL_utf8_ascii
  1098. #define PL_Iutf8_cntrl        PL_utf8_cntrl
  1099. #define PL_Iutf8_digit        PL_utf8_digit
  1100. #define PL_Iutf8_graph        PL_utf8_graph
  1101. #define PL_Iutf8_idcont        PL_utf8_idcont
  1102. #define PL_Iutf8_idstart    PL_utf8_idstart
  1103. #define PL_Iutf8_lower        PL_utf8_lower
  1104. #define PL_Iutf8_mark        PL_utf8_mark
  1105. #define PL_Iutf8_print        PL_utf8_print
  1106. #define PL_Iutf8_punct        PL_utf8_punct
  1107. #define PL_Iutf8_space        PL_utf8_space
  1108. #define PL_Iutf8_tofold        PL_utf8_tofold
  1109. #define PL_Iutf8_tolower    PL_utf8_tolower
  1110. #define PL_Iutf8_totitle    PL_utf8_totitle
  1111. #define PL_Iutf8_toupper    PL_utf8_toupper
  1112. #define PL_Iutf8_upper        PL_utf8_upper
  1113. #define PL_Iutf8_xdigit        PL_utf8_xdigit
  1114. #define PL_Iutf8locale        PL_utf8locale
  1115. #define PL_Iuudmap        PL_uudmap
  1116. #define PL_Iwarnhook        PL_warnhook
  1117. #define PL_Iwidesyscalls    PL_widesyscalls
  1118. #define PL_Ixiv_arenaroot    PL_xiv_arenaroot
  1119. #define PL_Ixiv_root        PL_xiv_root
  1120. #define PL_Ixnv_arenaroot    PL_xnv_arenaroot
  1121. #define PL_Ixnv_root        PL_xnv_root
  1122. #define PL_Ixpv_arenaroot    PL_xpv_arenaroot
  1123. #define PL_Ixpv_root        PL_xpv_root
  1124. #define PL_Ixpvav_arenaroot    PL_xpvav_arenaroot
  1125. #define PL_Ixpvav_root        PL_xpvav_root
  1126. #define PL_Ixpvbm_arenaroot    PL_xpvbm_arenaroot
  1127. #define PL_Ixpvbm_root        PL_xpvbm_root
  1128. #define PL_Ixpvcv_arenaroot    PL_xpvcv_arenaroot
  1129. #define PL_Ixpvcv_root        PL_xpvcv_root
  1130. #define PL_Ixpvhv_arenaroot    PL_xpvhv_arenaroot
  1131. #define PL_Ixpvhv_root        PL_xpvhv_root
  1132. #define PL_Ixpviv_arenaroot    PL_xpviv_arenaroot
  1133. #define PL_Ixpviv_root        PL_xpviv_root
  1134. #define PL_Ixpvlv_arenaroot    PL_xpvlv_arenaroot
  1135. #define PL_Ixpvlv_root        PL_xpvlv_root
  1136. #define PL_Ixpvmg_arenaroot    PL_xpvmg_arenaroot
  1137. #define PL_Ixpvmg_root        PL_xpvmg_root
  1138. #define PL_Ixpvnv_arenaroot    PL_xpvnv_arenaroot
  1139. #define PL_Ixpvnv_root        PL_xpvnv_root
  1140. #define PL_Ixrv_arenaroot    PL_xrv_arenaroot
  1141. #define PL_Ixrv_root        PL_xrv_root
  1142. #define PL_Iyychar        PL_yychar
  1143. #define PL_Iyydebug        PL_yydebug
  1144. #define PL_Iyyerrflag        PL_yyerrflag
  1145. #define PL_Iyylval        PL_yylval
  1146. #define PL_Iyynerrs        PL_yynerrs
  1147. #define PL_Iyyval        PL_yyval
  1148.  
  1149. #  if defined(USE_5005THREADS)
  1150. /* case 4 above */
  1151.  
  1152. #define PL_Sv            (aTHX->TSv)
  1153. #define PL_Xpv            (aTHX->TXpv)
  1154. #define PL_av_fetch_sv        (aTHX->Tav_fetch_sv)
  1155. #define PL_bodytarget        (aTHX->Tbodytarget)
  1156. #define PL_bostr        (aTHX->Tbostr)
  1157. #define PL_chopset        (aTHX->Tchopset)
  1158. #define PL_colors        (aTHX->Tcolors)
  1159. #define PL_colorset        (aTHX->Tcolorset)
  1160. #define PL_comppad        (aTHX->Tcomppad)
  1161. #define PL_curcop        (aTHX->Tcurcop)
  1162. #define PL_curpad        (aTHX->Tcurpad)
  1163. #define PL_curpm        (aTHX->Tcurpm)
  1164. #define PL_curstack        (aTHX->Tcurstack)
  1165. #define PL_curstackinfo        (aTHX->Tcurstackinfo)
  1166. #define PL_curstash        (aTHX->Tcurstash)
  1167. #define PL_defoutgv        (aTHX->Tdefoutgv)
  1168. #define PL_defstash        (aTHX->Tdefstash)
  1169. #define PL_delaymagic        (aTHX->Tdelaymagic)
  1170. #define PL_dirty        (aTHX->Tdirty)
  1171. #define PL_dumpindent        (aTHX->Tdumpindent)
  1172. #define PL_efloatbuf        (aTHX->Tefloatbuf)
  1173. #define PL_efloatsize        (aTHX->Tefloatsize)
  1174. #define PL_errors        (aTHX->Terrors)
  1175. #define PL_extralen        (aTHX->Textralen)
  1176. #define PL_firstgv        (aTHX->Tfirstgv)
  1177. #define PL_formtarget        (aTHX->Tformtarget)
  1178. #define PL_hv_fetch_ent_mh    (aTHX->Thv_fetch_ent_mh)
  1179. #define PL_hv_fetch_sv        (aTHX->Thv_fetch_sv)
  1180. #define PL_in_eval        (aTHX->Tin_eval)
  1181. #define PL_last_in_gv        (aTHX->Tlast_in_gv)
  1182. #define PL_lastgotoprobe    (aTHX->Tlastgotoprobe)
  1183. #define PL_lastscream        (aTHX->Tlastscream)
  1184. #define PL_localizing        (aTHX->Tlocalizing)
  1185. #define PL_mainstack        (aTHX->Tmainstack)
  1186. #define PL_markstack        (aTHX->Tmarkstack)
  1187. #define PL_markstack_max    (aTHX->Tmarkstack_max)
  1188. #define PL_markstack_ptr    (aTHX->Tmarkstack_ptr)
  1189. #define PL_maxscream        (aTHX->Tmaxscream)
  1190. #define PL_modcount        (aTHX->Tmodcount)
  1191. #define PL_na            (aTHX->Tna)
  1192. #define PL_nrs            (aTHX->Tnrs)
  1193. #define PL_ofs_sv        (aTHX->Tofs_sv)
  1194. #define PL_op            (aTHX->Top)
  1195. #define PL_opsave        (aTHX->Topsave)
  1196. #define PL_peepp        (aTHX->Tpeepp)
  1197. #define PL_protect        (aTHX->Tprotect)
  1198. #define PL_reg_call_cc        (aTHX->Treg_call_cc)
  1199. #define PL_reg_curpm        (aTHX->Treg_curpm)
  1200. #define PL_reg_eval_set        (aTHX->Treg_eval_set)
  1201. #define PL_reg_flags        (aTHX->Treg_flags)
  1202. #define PL_reg_ganch        (aTHX->Treg_ganch)
  1203. #define PL_reg_leftiter        (aTHX->Treg_leftiter)
  1204. #define PL_reg_magic        (aTHX->Treg_magic)
  1205. #define PL_reg_match_utf8    (aTHX->Treg_match_utf8)
  1206. #define PL_reg_maxiter        (aTHX->Treg_maxiter)
  1207. #define PL_reg_oldcurpm        (aTHX->Treg_oldcurpm)
  1208. #define PL_reg_oldpos        (aTHX->Treg_oldpos)
  1209. #define PL_reg_oldsaved        (aTHX->Treg_oldsaved)
  1210. #define PL_reg_oldsavedlen    (aTHX->Treg_oldsavedlen)
  1211. #define PL_reg_poscache        (aTHX->Treg_poscache)
  1212. #define PL_reg_poscache_size    (aTHX->Treg_poscache_size)
  1213. #define PL_reg_re        (aTHX->Treg_re)
  1214. #define PL_reg_start_tmp    (aTHX->Treg_start_tmp)
  1215. #define PL_reg_start_tmpl    (aTHX->Treg_start_tmpl)
  1216. #define PL_reg_starttry        (aTHX->Treg_starttry)
  1217. #define PL_reg_sv        (aTHX->Treg_sv)
  1218. #define PL_reg_whilem_seen    (aTHX->Treg_whilem_seen)
  1219. #define PL_regbol        (aTHX->Tregbol)
  1220. #define PL_regcc        (aTHX->Tregcc)
  1221. #define PL_regcode        (aTHX->Tregcode)
  1222. #define PL_regcomp_parse    (aTHX->Tregcomp_parse)
  1223. #define PL_regcomp_rx        (aTHX->Tregcomp_rx)
  1224. #define PL_regcompat1        (aTHX->Tregcompat1)
  1225. #define PL_regcompp        (aTHX->Tregcompp)
  1226. #define PL_regdata        (aTHX->Tregdata)
  1227. #define PL_regdummy        (aTHX->Tregdummy)
  1228. #define PL_regendp        (aTHX->Tregendp)
  1229. #define PL_regeol        (aTHX->Tregeol)
  1230. #define PL_regexecp        (aTHX->Tregexecp)
  1231. #define PL_regflags        (aTHX->Tregflags)
  1232. #define PL_regfree        (aTHX->Tregfree)
  1233. #define PL_regindent        (aTHX->Tregindent)
  1234. #define PL_reginput        (aTHX->Treginput)
  1235. #define PL_regint_start        (aTHX->Tregint_start)
  1236. #define PL_regint_string    (aTHX->Tregint_string)
  1237. #define PL_reginterp_cnt    (aTHX->Treginterp_cnt)
  1238. #define PL_reglastcloseparen    (aTHX->Treglastcloseparen)
  1239. #define PL_reglastparen        (aTHX->Treglastparen)
  1240. #define PL_regnarrate        (aTHX->Tregnarrate)
  1241. #define PL_regnaughty        (aTHX->Tregnaughty)
  1242. #define PL_regnpar        (aTHX->Tregnpar)
  1243. #define PL_regprecomp        (aTHX->Tregprecomp)
  1244. #define PL_regprogram        (aTHX->Tregprogram)
  1245. #define PL_regsawback        (aTHX->Tregsawback)
  1246. #define PL_regseen        (aTHX->Tregseen)
  1247. #define PL_regsize        (aTHX->Tregsize)
  1248. #define PL_regstartp        (aTHX->Tregstartp)
  1249. #define PL_regtill        (aTHX->Tregtill)
  1250. #define PL_regxend        (aTHX->Tregxend)
  1251. #define PL_restartop        (aTHX->Trestartop)
  1252. #define PL_retstack        (aTHX->Tretstack)
  1253. #define PL_retstack_ix        (aTHX->Tretstack_ix)
  1254. #define PL_retstack_max        (aTHX->Tretstack_max)
  1255. #define PL_rs            (aTHX->Trs)
  1256. #define PL_savestack        (aTHX->Tsavestack)
  1257. #define PL_savestack_ix        (aTHX->Tsavestack_ix)
  1258. #define PL_savestack_max    (aTHX->Tsavestack_max)
  1259. #define PL_scopestack        (aTHX->Tscopestack)
  1260. #define PL_scopestack_ix    (aTHX->Tscopestack_ix)
  1261. #define PL_scopestack_max    (aTHX->Tscopestack_max)
  1262. #define PL_screamfirst        (aTHX->Tscreamfirst)
  1263. #define PL_screamnext        (aTHX->Tscreamnext)
  1264. #define PL_secondgv        (aTHX->Tsecondgv)
  1265. #define PL_seen_evals        (aTHX->Tseen_evals)
  1266. #define PL_seen_zerolen        (aTHX->Tseen_zerolen)
  1267. #define PL_sortcop        (aTHX->Tsortcop)
  1268. #define PL_sortcxix        (aTHX->Tsortcxix)
  1269. #define PL_sortstash        (aTHX->Tsortstash)
  1270. #define PL_stack_base        (aTHX->Tstack_base)
  1271. #define PL_stack_max        (aTHX->Tstack_max)
  1272. #define PL_stack_sp        (aTHX->Tstack_sp)
  1273. #define PL_start_env        (aTHX->Tstart_env)
  1274. #define PL_statbuf        (aTHX->Tstatbuf)
  1275. #define PL_statcache        (aTHX->Tstatcache)
  1276. #define PL_statgv        (aTHX->Tstatgv)
  1277. #define PL_statname        (aTHX->Tstatname)
  1278. #define PL_tainted        (aTHX->Ttainted)
  1279. #define PL_timesbuf        (aTHX->Ttimesbuf)
  1280. #define PL_tmps_floor        (aTHX->Ttmps_floor)
  1281. #define PL_tmps_ix        (aTHX->Ttmps_ix)
  1282. #define PL_tmps_max        (aTHX->Ttmps_max)
  1283. #define PL_tmps_stack        (aTHX->Ttmps_stack)
  1284. #define PL_top_env        (aTHX->Ttop_env)
  1285. #define PL_toptarget        (aTHX->Ttoptarget)
  1286. #define PL_watchaddr        (aTHX->Twatchaddr)
  1287. #define PL_watchok        (aTHX->Twatchok)
  1288.  
  1289. #  else    /* !USE_5005THREADS */
  1290. /* case 1 above */
  1291.  
  1292. #define PL_TSv            PL_Sv
  1293. #define PL_TXpv            PL_Xpv
  1294. #define PL_Tav_fetch_sv        PL_av_fetch_sv
  1295. #define PL_Tbodytarget        PL_bodytarget
  1296. #define PL_Tbostr        PL_bostr
  1297. #define PL_Tchopset        PL_chopset
  1298. #define PL_Tcolors        PL_colors
  1299. #define PL_Tcolorset        PL_colorset
  1300. #define PL_Tcomppad        PL_comppad
  1301. #define PL_Tcurcop        PL_curcop
  1302. #define PL_Tcurpad        PL_curpad
  1303. #define PL_Tcurpm        PL_curpm
  1304. #define PL_Tcurstack        PL_curstack
  1305. #define PL_Tcurstackinfo    PL_curstackinfo
  1306. #define PL_Tcurstash        PL_curstash
  1307. #define PL_Tdefoutgv        PL_defoutgv
  1308. #define PL_Tdefstash        PL_defstash
  1309. #define PL_Tdelaymagic        PL_delaymagic
  1310. #define PL_Tdirty        PL_dirty
  1311. #define PL_Tdumpindent        PL_dumpindent
  1312. #define PL_Tefloatbuf        PL_efloatbuf
  1313. #define PL_Tefloatsize        PL_efloatsize
  1314. #define PL_Terrors        PL_errors
  1315. #define PL_Textralen        PL_extralen
  1316. #define PL_Tfirstgv        PL_firstgv
  1317. #define PL_Tformtarget        PL_formtarget
  1318. #define PL_Thv_fetch_ent_mh    PL_hv_fetch_ent_mh
  1319. #define PL_Thv_fetch_sv        PL_hv_fetch_sv
  1320. #define PL_Tin_eval        PL_in_eval
  1321. #define PL_Tlast_in_gv        PL_last_in_gv
  1322. #define PL_Tlastgotoprobe    PL_lastgotoprobe
  1323. #define PL_Tlastscream        PL_lastscream
  1324. #define PL_Tlocalizing        PL_localizing
  1325. #define PL_Tmainstack        PL_mainstack
  1326. #define PL_Tmarkstack        PL_markstack
  1327. #define PL_Tmarkstack_max    PL_markstack_max
  1328. #define PL_Tmarkstack_ptr    PL_markstack_ptr
  1329. #define PL_Tmaxscream        PL_maxscream
  1330. #define PL_Tmodcount        PL_modcount
  1331. #define PL_Tna            PL_na
  1332. #define PL_Tnrs            PL_nrs
  1333. #define PL_Tofs_sv        PL_ofs_sv
  1334. #define PL_Top            PL_op
  1335. #define PL_Topsave        PL_opsave
  1336. #define PL_Tpeepp        PL_peepp
  1337. #define PL_Tprotect        PL_protect
  1338. #define PL_Treg_call_cc        PL_reg_call_cc
  1339. #define PL_Treg_curpm        PL_reg_curpm
  1340. #define PL_Treg_eval_set    PL_reg_eval_set
  1341. #define PL_Treg_flags        PL_reg_flags
  1342. #define PL_Treg_ganch        PL_reg_ganch
  1343. #define PL_Treg_leftiter    PL_reg_leftiter
  1344. #define PL_Treg_magic        PL_reg_magic
  1345. #define PL_Treg_match_utf8    PL_reg_match_utf8
  1346. #define PL_Treg_maxiter        PL_reg_maxiter
  1347. #define PL_Treg_oldcurpm    PL_reg_oldcurpm
  1348. #define PL_Treg_oldpos        PL_reg_oldpos
  1349. #define PL_Treg_oldsaved    PL_reg_oldsaved
  1350. #define PL_Treg_oldsavedlen    PL_reg_oldsavedlen
  1351. #define PL_Treg_poscache    PL_reg_poscache
  1352. #define PL_Treg_poscache_size    PL_reg_poscache_size
  1353. #define PL_Treg_re        PL_reg_re
  1354. #define PL_Treg_start_tmp    PL_reg_start_tmp
  1355. #define PL_Treg_start_tmpl    PL_reg_start_tmpl
  1356. #define PL_Treg_starttry    PL_reg_starttry
  1357. #define PL_Treg_sv        PL_reg_sv
  1358. #define PL_Treg_whilem_seen    PL_reg_whilem_seen
  1359. #define PL_Tregbol        PL_regbol
  1360. #define PL_Tregcc        PL_regcc
  1361. #define PL_Tregcode        PL_regcode
  1362. #define PL_Tregcomp_parse    PL_regcomp_parse
  1363. #define PL_Tregcomp_rx        PL_regcomp_rx
  1364. #define PL_Tregcompat1        PL_regcompat1
  1365. #define PL_Tregcompp        PL_regcompp
  1366. #define PL_Tregdata        PL_regdata
  1367. #define PL_Tregdummy        PL_regdummy
  1368. #define PL_Tregendp        PL_regendp
  1369. #define PL_Tregeol        PL_regeol
  1370. #define PL_Tregexecp        PL_regexecp
  1371. #define PL_Tregflags        PL_regflags
  1372. #define PL_Tregfree        PL_regfree
  1373. #define PL_Tregindent        PL_regindent
  1374. #define PL_Treginput        PL_reginput
  1375. #define PL_Tregint_start    PL_regint_start
  1376. #define PL_Tregint_string    PL_regint_string
  1377. #define PL_Treginterp_cnt    PL_reginterp_cnt
  1378. #define PL_Treglastcloseparen    PL_reglastcloseparen
  1379. #define PL_Treglastparen    PL_reglastparen
  1380. #define PL_Tregnarrate        PL_regnarrate
  1381. #define PL_Tregnaughty        PL_regnaughty
  1382. #define PL_Tregnpar        PL_regnpar
  1383. #define PL_Tregprecomp        PL_regprecomp
  1384. #define PL_Tregprogram        PL_regprogram
  1385. #define PL_Tregsawback        PL_regsawback
  1386. #define PL_Tregseen        PL_regseen
  1387. #define PL_Tregsize        PL_regsize
  1388. #define PL_Tregstartp        PL_regstartp
  1389. #define PL_Tregtill        PL_regtill
  1390. #define PL_Tregxend        PL_regxend
  1391. #define PL_Trestartop        PL_restartop
  1392. #define PL_Tretstack        PL_retstack
  1393. #define PL_Tretstack_ix        PL_retstack_ix
  1394. #define PL_Tretstack_max    PL_retstack_max
  1395. #define PL_Trs            PL_rs
  1396. #define PL_Tsavestack        PL_savestack
  1397. #define PL_Tsavestack_ix    PL_savestack_ix
  1398. #define PL_Tsavestack_max    PL_savestack_max
  1399. #define PL_Tscopestack        PL_scopestack
  1400. #define PL_Tscopestack_ix    PL_scopestack_ix
  1401. #define PL_Tscopestack_max    PL_scopestack_max
  1402. #define PL_Tscreamfirst        PL_screamfirst
  1403. #define PL_Tscreamnext        PL_screamnext
  1404. #define PL_Tsecondgv        PL_secondgv
  1405. #define PL_Tseen_evals        PL_seen_evals
  1406. #define PL_Tseen_zerolen    PL_seen_zerolen
  1407. #define PL_Tsortcop        PL_sortcop
  1408. #define PL_Tsortcxix        PL_sortcxix
  1409. #define PL_Tsortstash        PL_sortstash
  1410. #define PL_Tstack_base        PL_stack_base
  1411. #define PL_Tstack_max        PL_stack_max
  1412. #define PL_Tstack_sp        PL_stack_sp
  1413. #define PL_Tstart_env        PL_start_env
  1414. #define PL_Tstatbuf        PL_statbuf
  1415. #define PL_Tstatcache        PL_statcache
  1416. #define PL_Tstatgv        PL_statgv
  1417. #define PL_Tstatname        PL_statname
  1418. #define PL_Ttainted        PL_tainted
  1419. #define PL_Ttimesbuf        PL_timesbuf
  1420. #define PL_Ttmps_floor        PL_tmps_floor
  1421. #define PL_Ttmps_ix        PL_tmps_ix
  1422. #define PL_Ttmps_max        PL_tmps_max
  1423. #define PL_Ttmps_stack        PL_tmps_stack
  1424. #define PL_Ttop_env        PL_top_env
  1425. #define PL_Ttoptarget        PL_toptarget
  1426. #define PL_Twatchaddr        PL_watchaddr
  1427. #define PL_Twatchok        PL_watchok
  1428.  
  1429. #  endif    /* USE_5005THREADS */
  1430. #endif    /* MULTIPLICITY */
  1431.  
  1432. #if defined(PERL_GLOBAL_STRUCT)
  1433.  
  1434. #define PL_No            (PL_Vars.GNo)
  1435. #define PL_Yes            (PL_Vars.GYes)
  1436. #define PL_csighandlerp        (PL_Vars.Gcsighandlerp)
  1437. #define PL_curinterp        (PL_Vars.Gcurinterp)
  1438. #define PL_do_undump        (PL_Vars.Gdo_undump)
  1439. #define PL_dollarzero_mutex    (PL_Vars.Gdollarzero_mutex)
  1440. #define PL_hexdigit        (PL_Vars.Ghexdigit)
  1441. #define PL_malloc_mutex        (PL_Vars.Gmalloc_mutex)
  1442. #define PL_op_mutex        (PL_Vars.Gop_mutex)
  1443. #define PL_patleave        (PL_Vars.Gpatleave)
  1444. #define PL_sh_path        (PL_Vars.Gsh_path)
  1445. #define PL_sigfpe_saved        (PL_Vars.Gsigfpe_saved)
  1446. #define PL_sv_placeholder    (PL_Vars.Gsv_placeholder)
  1447. #define PL_thr_key        (PL_Vars.Gthr_key)
  1448. #define PL_use_safe_putenv    (PL_Vars.Guse_safe_putenv)
  1449.  
  1450. #else /* !PERL_GLOBAL_STRUCT */
  1451.  
  1452. #define PL_GNo            PL_No
  1453. #define PL_GYes            PL_Yes
  1454. #define PL_Gcsighandlerp    PL_csighandlerp
  1455. #define PL_Gcurinterp        PL_curinterp
  1456. #define PL_Gdo_undump        PL_do_undump
  1457. #define PL_Gdollarzero_mutex    PL_dollarzero_mutex
  1458. #define PL_Ghexdigit        PL_hexdigit
  1459. #define PL_Gmalloc_mutex    PL_malloc_mutex
  1460. #define PL_Gop_mutex        PL_op_mutex
  1461. #define PL_Gpatleave        PL_patleave
  1462. #define PL_Gsh_path        PL_sh_path
  1463. #define PL_Gsigfpe_saved    PL_sigfpe_saved
  1464. #define PL_Gsv_placeholder    PL_sv_placeholder
  1465. #define PL_Gthr_key        PL_thr_key
  1466. #define PL_Guse_safe_putenv    PL_use_safe_putenv
  1467.  
  1468. #endif /* PERL_GLOBAL_STRUCT */
  1469.  
  1470. #ifdef PERL_POLLUTE        /* disabled by default in 5.6.0 */
  1471.  
  1472. #define DBsingle        PL_DBsingle
  1473. #define DBsub            PL_DBsub
  1474. #define compiling        PL_compiling
  1475. #define curcop            PL_curcop
  1476. #define curstash        PL_curstash
  1477. #define debstash        PL_debstash
  1478. #define defgv            PL_defgv
  1479. #define diehook            PL_diehook
  1480. #define dirty            PL_dirty
  1481. #define dowarn            PL_dowarn
  1482. #define errgv            PL_errgv
  1483. #define na            PL_na
  1484. #define no_modify        PL_no_modify
  1485. #define perl_destruct_level    PL_perl_destruct_level
  1486. #define perldb            PL_perldb
  1487. #define ppaddr            PL_ppaddr
  1488. #define rsfp            PL_rsfp
  1489. #define rsfp_filters        PL_rsfp_filters
  1490. #define stack_base        PL_stack_base
  1491. #define stack_sp        PL_stack_sp
  1492. #define stdingv            PL_stdingv
  1493. #define sv_arenaroot        PL_sv_arenaroot
  1494. #define sv_no            PL_sv_no
  1495. #define sv_undef        PL_sv_undef
  1496. #define sv_yes            PL_sv_yes
  1497. #define tainted            PL_tainted
  1498. #define tainting        PL_tainting
  1499.  
  1500. #endif /* PERL_POLLUTE */
  1501.