diff options
Diffstat (limited to 'contrib/perl5/perlvars.h')
| -rw-r--r-- | contrib/perl5/perlvars.h | 40 |
1 files changed, 0 insertions, 40 deletions
diff --git a/contrib/perl5/perlvars.h b/contrib/perl5/perlvars.h deleted file mode 100644 index bd07adc..0000000 --- a/contrib/perl5/perlvars.h +++ /dev/null @@ -1,40 +0,0 @@ -/****************/ -/* Truly global */ -/****************/ - -/* Don't forget to re-run embed.pl to propagate changes! */ - -/* This file describes the "global" variables used by perl - * This used to be in perl.h directly but we want to abstract out into - * distinct files which are per-thread, per-interpreter or really global, - * and how they're initialized. - * - * The 'G' prefix is only needed for vars that need appropriate #defines - * generated in embed*.h. Such symbols are also used to generate - * the appropriate export list for win32. */ - -/* global state */ -PERLVAR(Gcurinterp, PerlInterpreter *) - /* currently running interpreter - * (initial parent interpreter under - * useithreads) */ -#if defined(USE_THREADS) || defined(USE_ITHREADS) -PERLVAR(Gthr_key, perl_key) /* key to retrieve per-thread struct */ -#endif - -/* constants (these are not literals to facilitate pointer comparisons) */ -PERLVARIC(GYes, char *, "1") -PERLVARIC(GNo, char *, "") -PERLVARIC(Ghexdigit, char *, "0123456789abcdef0123456789ABCDEF") -PERLVARIC(Gpatleave, char *, "\\.^$@dDwWsSbB+*?|()-nrtfeaxc0123456789[{]}") - -/* XXX does anyone even use this? */ -PERLVARI(Gdo_undump, bool, FALSE) /* -u or dump seen? */ - -#if defined(MYMALLOC) && (defined(USE_THREADS) || defined(USE_ITHREADS)) -PERLVAR(Gmalloc_mutex, perl_mutex) /* Mutex for malloc */ -#endif - -#if defined(USE_ITHREADS) -PERLVAR(Gop_mutex, perl_mutex) /* Mutex for op refcounting */ -#endif |
