This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
regcomp.c: Remove memory leak
[perl5.git] / embedvar.h
index d8b09fe..67ccd6b 100644 (file)
@@ -42,6 +42,7 @@
 
 #define PL_AboveLatin1         (vTHX->IAboveLatin1)
 #define PL_Assigned_invlist    (vTHX->IAssigned_invlist)
+#define PL_CCC_non0_non230     (vTHX->ICCC_non0_non230)
 #define PL_DBcontrol           (vTHX->IDBcontrol)
 #define PL_DBcv                        (vTHX->IDBcv)
 #define PL_DBgv                        (vTHX->IDBgv)
 #define PL_GCB_invlist         (vTHX->IGCB_invlist)
 #define PL_HasMultiCharFold    (vTHX->IHasMultiCharFold)
 #define PL_InBitmap            (vTHX->IInBitmap)
+#define PL_InMultiCharFold     (vTHX->IInMultiCharFold)
 #define PL_LB_invlist          (vTHX->ILB_invlist)
 #define PL_LIO                 (vTHX->ILIO)
 #define PL_Latin1              (vTHX->ILatin1)
 #define PL_Mem                 (vTHX->IMem)
 #define PL_MemParse            (vTHX->IMemParse)
 #define PL_MemShared           (vTHX->IMemShared)
-#define PL_NonL1NonFinalFold   (vTHX->INonL1NonFinalFold)
+#define PL_Posix_ptrs          (vTHX->IPosix_ptrs)
+#define PL_Private_Use         (vTHX->IPrivate_Use)
 #define PL_Proc                        (vTHX->IProc)
 #define PL_SB_invlist          (vTHX->ISB_invlist)
 #define PL_SCX_invlist         (vTHX->ISCX_invlist)
 #define PL_Sock                        (vTHX->ISock)
 #define PL_StdIO               (vTHX->IStdIO)
 #define PL_Sv                  (vTHX->ISv)
+#define PL_TR_SPECIAL_HANDLING_UTF8    (vTHX->ITR_SPECIAL_HANDLING_UTF8)
 #define PL_UpperLatin1         (vTHX->IUpperLatin1)
 #define PL_WB_invlist          (vTHX->IWB_invlist)
 #define PL_XPosix_ptrs         (vTHX->IXPosix_ptrs)
 #define PL_comppad_name_floor  (vTHX->Icomppad_name_floor)
 #define PL_constpadix          (vTHX->Iconstpadix)
 #define PL_cop_seqmax          (vTHX->Icop_seqmax)
-#define PL_cryptseen           (vTHX->Icryptseen)
 #define PL_curcop              (vTHX->Icurcop)
 #define PL_curcopdb            (vTHX->Icurcopdb)
+#define PL_curlocales          (vTHX->Icurlocales)
 #define PL_curpad              (vTHX->Icurpad)
 #define PL_curpm               (vTHX->Icurpm)
 #define PL_curpm_under         (vTHX->Icurpm_under)
 #define PL_in_clean_objs       (vTHX->Iin_clean_objs)
 #define PL_in_eval             (vTHX->Iin_eval)
 #define PL_in_load_module      (vTHX->Iin_load_module)
+#define PL_in_some_fold                (vTHX->Iin_some_fold)
 #define PL_in_utf8_COLLATE_locale      (vTHX->Iin_utf8_COLLATE_locale)
 #define PL_in_utf8_CTYPE_locale        (vTHX->Iin_utf8_CTYPE_locale)
+#define PL_in_utf8_turkic_locale       (vTHX->Iin_utf8_turkic_locale)
 #define PL_incgv               (vTHX->Iincgv)
 #define PL_initav              (vTHX->Iinitav)
 #define PL_inplace             (vTHX->Iinplace)
 #define PL_langinfo_buf                (vTHX->Ilanginfo_buf)
 #define PL_langinfo_bufsize    (vTHX->Ilanginfo_bufsize)
 #define PL_last_in_gv          (vTHX->Ilast_in_gv)
-#define PL_last_swash_hv       (vTHX->Ilast_swash_hv)
-#define PL_last_swash_key      (vTHX->Ilast_swash_key)
-#define PL_last_swash_klen     (vTHX->Ilast_swash_klen)
-#define PL_last_swash_slen     (vTHX->Ilast_swash_slen)
-#define PL_last_swash_tmps     (vTHX->Ilast_swash_tmps)
 #define PL_lastfd              (vTHX->Ilastfd)
 #define PL_lastgotoprobe       (vTHX->Ilastgotoprobe)
 #define PL_laststatval         (vTHX->Ilaststatval)
 #define PL_markstack_ptr       (vTHX->Imarkstack_ptr)
 #define PL_max_intro_pending   (vTHX->Imax_intro_pending)
 #define PL_maxsysfd            (vTHX->Imaxsysfd)
+#define PL_mbrlen_ps           (vTHX->Imbrlen_ps)
+#define PL_mbrtowc_ps          (vTHX->Imbrtowc_ps)
+#define PL_mem_log             (vTHX->Imem_log)
 #define PL_memory_debug_header (vTHX->Imemory_debug_header)
 #define PL_mess_sv             (vTHX->Imess_sv)
 #define PL_min_intro_pending   (vTHX->Imin_intro_pending)
 #define PL_modcount            (vTHX->Imodcount)
 #define PL_modglobal           (vTHX->Imodglobal)
 #define PL_multideref_pc       (vTHX->Imultideref_pc)
-#define PL_my_cxt_keys         (vTHX->Imy_cxt_keys)
 #define PL_my_cxt_list         (vTHX->Imy_cxt_list)
 #define PL_my_cxt_size         (vTHX->Imy_cxt_size)
 #define PL_na                  (vTHX->Ina)
 #define PL_scopestack_max      (vTHX->Iscopestack_max)
 #define PL_scopestack_name     (vTHX->Iscopestack_name)
 #define PL_secondgv            (vTHX->Isecondgv)
-#define PL_seen_deprecated_macro       (vTHX->Iseen_deprecated_macro)
 #define PL_setlocale_buf       (vTHX->Isetlocale_buf)
 #define PL_setlocale_bufsize   (vTHX->Isetlocale_bufsize)
 #define PL_sharehook           (vTHX->Isharehook)
 #define PL_sig_pending         (vTHX->Isig_pending)
+#define PL_sighandler1p                (vTHX->Isighandler1p)
+#define PL_sighandler3p                (vTHX->Isighandler3p)
 #define PL_sighandlerp         (vTHX->Isighandlerp)
 #define PL_signalhook          (vTHX->Isignalhook)
 #define PL_signals             (vTHX->Isignals)
-#define PL_sort_RealCmp                (vTHX->Isort_RealCmp)
 #define PL_sortcop             (vTHX->Isortcop)
 #define PL_sortstash           (vTHX->Isortstash)
 #define PL_splitstr            (vTHX->Isplitstr)
 #define PL_unsafe              (vTHX->Iunsafe)
 #define PL_utf8_charname_begin (vTHX->Iutf8_charname_begin)
 #define PL_utf8_charname_continue      (vTHX->Iutf8_charname_continue)
-#define PL_utf8_foldable       (vTHX->Iutf8_foldable)
 #define PL_utf8_foldclosures   (vTHX->Iutf8_foldclosures)
 #define PL_utf8_idcont         (vTHX->Iutf8_idcont)
 #define PL_utf8_idstart                (vTHX->Iutf8_idstart)
 #define PL_utf8_mark           (vTHX->Iutf8_mark)
 #define PL_utf8_perl_idcont    (vTHX->Iutf8_perl_idcont)
 #define PL_utf8_perl_idstart   (vTHX->Iutf8_perl_idstart)
-#define PL_utf8_swash_ptrs     (vTHX->Iutf8_swash_ptrs)
 #define PL_utf8_tofold         (vTHX->Iutf8_tofold)
 #define PL_utf8_tolower                (vTHX->Iutf8_tolower)
+#define PL_utf8_tosimplefold   (vTHX->Iutf8_tosimplefold)
 #define PL_utf8_totitle                (vTHX->Iutf8_totitle)
 #define PL_utf8_toupper                (vTHX->Iutf8_toupper)
 #define PL_utf8_xidcont                (vTHX->Iutf8_xidcont)
 #define PL_warnhook            (vTHX->Iwarnhook)
 #define PL_watchaddr           (vTHX->Iwatchaddr)
 #define PL_watchok             (vTHX->Iwatchok)
+#define PL_wcrtomb_ps          (vTHX->Iwcrtomb_ps)
 #define PL_xsubfilename                (vTHX->Ixsubfilename)
 
 #endif /* MULTIPLICITY */
 
-#if defined(PERL_GLOBAL_STRUCT)
-
-#define PL_C_locale_obj                (my_vars->GC_locale_obj)
-#define PL_GC_locale_obj       (my_vars->GC_locale_obj)
-#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_check_mutex         (my_vars->Gcheck_mutex)
-#define PL_Gcheck_mutex                (my_vars->Gcheck_mutex)
-#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_hash_chars          (my_vars->Ghash_chars)
-#define PL_Ghash_chars         (my_vars->Ghash_chars)
-#define PL_hash_seed           (my_vars->Ghash_seed)
-#define PL_Ghash_seed          (my_vars->Ghash_seed)
-#define PL_hash_seed_set       (my_vars->Ghash_seed_set)
-#define PL_Ghash_seed_set      (my_vars->Ghash_seed_set)
-#define PL_hash_state          (my_vars->Ghash_state)
-#define PL_Ghash_state         (my_vars->Ghash_state)
-#define PL_hints_mutex         (my_vars->Ghints_mutex)
-#define PL_Ghints_mutex                (my_vars->Ghints_mutex)
-#define PL_keyword_plugin      (my_vars->Gkeyword_plugin)
-#define PL_Gkeyword_plugin     (my_vars->Gkeyword_plugin)
-#define PL_keyword_plugin_mutex        (my_vars->Gkeyword_plugin_mutex)
-#define PL_Gkeyword_plugin_mutex       (my_vars->Gkeyword_plugin_mutex)
-#define PL_lc_numeric_mutex    (my_vars->Glc_numeric_mutex)
-#define PL_Glc_numeric_mutex   (my_vars->Glc_numeric_mutex)
-#define PL_locale_mutex                (my_vars->Glocale_mutex)
-#define PL_Glocale_mutex       (my_vars->Glocale_mutex)
-#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_my_ctx_mutex                (my_vars->Gmy_ctx_mutex)
-#define PL_Gmy_ctx_mutex       (my_vars->Gmy_ctx_mutex)
-#define PL_my_cxt_index                (my_vars->Gmy_cxt_index)
-#define PL_Gmy_cxt_index       (my_vars->Gmy_cxt_index)
-#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_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_perlio_fd_refcnt_size       (my_vars->Gperlio_fd_refcnt_size)
-#define PL_Gperlio_fd_refcnt_size      (my_vars->Gperlio_fd_refcnt_size)
-#define PL_perlio_mutex                (my_vars->Gperlio_mutex)
-#define PL_Gperlio_mutex       (my_vars->Gperlio_mutex)
-#ifdef __VMS
-#define PL_perllib_sep         (my_vars->Gperllib_sep)
-#define PL_Gperllib_sep                (my_vars->Gperllib_sep)
-#endif
-#define PL_ppaddr              (my_vars->Gppaddr)
-#define PL_Gppaddr             (my_vars->Gppaddr)
-#ifdef OS2
-#define PL_sh_path             (my_vars->Gsh_path)
-#define PL_Gsh_path            (my_vars->Gsh_path)
-#endif
-#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_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_veto_cleanup                (my_vars->Gveto_cleanup)
-#define PL_Gveto_cleanup       (my_vars->Gveto_cleanup)
-#define PL_watch_pvx           (my_vars->Gwatch_pvx)
-#define PL_Gwatch_pvx          (my_vars->Gwatch_pvx)
-
-#endif /* PERL_GLOBAL_STRUCT */
-
 /* ex: set ro: */