Gecko [ v99win.today ]

Name	Size	Permission
EXTERN.h	1.54 KB	-rw-r--r--
INTERN.h	1.25 KB	-rw-r--r--
XSUB.h	24.29 KB	-rw-r--r--
av.h	3.65 KB	-rw-r--r--
bitcount.h	1.01 KB	-rw-r--r--
charclass_invlists.h	4.15 MB	-rw-r--r--
config.h	161.32 KB	-rw-r--r--
cop.h	45.5 KB	-rw-r--r--
cv.h	12.07 KB	-rw-r--r--
dosish.h	5.33 KB	-rw-r--r--
ebcdic_tables.h	52 KB	-rw-r--r--
embed.h	99.51 KB	-rw-r--r--
embedvar.h	15.27 KB	-rw-r--r--
fakesdio.h	3.13 KB	-rw-r--r--
feature.h	12.36 KB	-rw-r--r--
form.h	1.43 KB	-rw-r--r--
git_version.h	357 B	-rw-r--r--
gv.h	11.34 KB	-rw-r--r--
handy.h	131.01 KB	-rw-r--r--
hv.h	25.97 KB	-rw-r--r--
hv_func.h	7.02 KB	-rw-r--r--
hv_macro.h	3.04 KB	-rw-r--r--
inline.h	81.02 KB	-rw-r--r--
intrpvar.h	35.13 KB	-rw-r--r--
invlist_inline.h	7.29 KB	-rw-r--r--
iperlsys.h	51.29 KB	-rw-r--r--
keywords.h	6.5 KB	-rw-r--r--
l1_char_class_tab.h	119.64 KB	-rw-r--r--
malloc_ctl.h	1.49 KB	-rw-r--r--
metaconfig.h	728 B	-rw-r--r--
mg.h	3.56 KB	-rw-r--r--
mg_data.h	5.21 KB	-rw-r--r--
mg_raw.h	4.27 KB	-rw-r--r--
mg_vtable.h	9.4 KB	-rw-r--r--
mydtrace.h	1.65 KB	-rw-r--r--
nostdio.h	3.31 KB	-rw-r--r--
op.h	39.34 KB	-rw-r--r--
op_reg_common.h	5.77 KB	-rw-r--r--
opcode.h	91.69 KB	-rw-r--r--
opnames.h	8.8 KB	-rw-r--r--
overload.h	3.2 KB	-rw-r--r--
pad.h	17.17 KB	-rw-r--r--
parser.h	6.92 KB	-rw-r--r--
patchlevel-debian.h	6.75 KB	-rw-r--r--
patchlevel.h	6.42 KB	-rw-r--r--
perl.h	286.63 KB	-rw-r--r--
perl_inc_macro.h	6.32 KB	-rw-r--r--
perl_langinfo.h	2.85 KB	-rw-r--r--
perl_siphash.h	5.06 KB	-rw-r--r--
perlapi.h	634 B	-rw-r--r--
perlio.h	9.2 KB	-rw-r--r--
perliol.h	13.33 KB	-rw-r--r--
perlsdio.h	527 B	-rw-r--r--
perlvars.h	12.02 KB	-rw-r--r--
perly.h	5.16 KB	-rw-r--r--
pp.h	28.99 KB	-rw-r--r--
pp_proto.h	11.95 KB	-rw-r--r--
proto.h	271.9 KB	-rw-r--r--
reentr.h	85.18 KB	-rw-r--r--
regcharclass.h	267.62 KB	-rw-r--r--
regcomp.h	52.06 KB	-rw-r--r--
regexp.h	37.07 KB	-rw-r--r--
regnodes.h	85.25 KB	-rw-r--r--
sbox32_hash.h	55.95 KB	-rw-r--r--
scope.h	11.86 KB	-rw-r--r--
sv.h	91.59 KB	-rw-r--r--
thread.h	16.51 KB	-rw-r--r--
time64.h	900 B	-rw-r--r--
time64_config.h	2.02 KB	-rw-r--r--
uconfig.h	161.03 KB	-rw-r--r--
uni_keywords.h	541.83 KB	-rw-r--r--
unicode_constants.h	8.26 KB	-rw-r--r--
unixish.h	5.16 KB	-rw-r--r--
utf8.h	49.07 KB	-rw-r--r--
utfebcdic.h	64.54 KB	-rw-r--r--
util.h	10.58 KB	-rw-r--r--
uudmap.h	1.03 KB	-rw-r--r--
vutil.h	7.59 KB	-rw-r--r--
warnings.h	10.65 KB	-rw-r--r--
zaphod32_hash.h	9.43 KB	-rw-r--r--

Code Editor : perl_inc_macro.h

/* just define a list of macros to push elements in INC
*  so we can easily use them and change order on demand
*
* list of available INCPUSH macros
* - INCPUSH_APPLLIB_EXP
* - INCPUSH_SITEARCH_EXP
* - INCPUSH_SITELIB_EXP
* - INCPUSH_PERL_VENDORARCH_EXP
* - INCPUSH_PERL_VENDORLIB_EXP
* - INCPUSH_ARCHLIB_EXP
* - INCPUSH_PRIVLIB_EXP
* - INCPUSH_PERL_OTHERLIBDIRS
* - INCPUSH_PERL5LIB
* - INCPUSH_APPLLIB_OLD_EXP
* - INCPUSH_SITELIB_STEM
* - INCPUSH_PERL_VENDORLIB_STEM
* - INCPUSH_PERL_OTHERLIBDIRS_ARCHONLY
*/

#ifndef DEFINE_INC_MACROS

/* protect against multiple inclusions */
#define DEFINE_INC_MACROS 1

#ifdef APPLLIB_EXP
#	define INCPUSH_APPLLIB_EXP  S_incpush_use_sep(aTHX_ STR_WITH_LEN(APPLLIB_EXP), \
                      INCPUSH_ADD_SUB_DIRS|INCPUSH_CAN_RELOCATE);
#endif

#ifdef SITEARCH_EXP
    /* sitearch is always relative to sitelib on Windows for
     * DLL-based path intuition to work correctly */
#  if !defined(WIN32)
#	define INCPUSH_SITEARCH_EXP S_incpush_use_sep(aTHX_ STR_WITH_LEN(SITEARCH_EXP), \
                          INCPUSH_CAN_RELOCATE);
#  endif
#endif

#ifdef SITELIB_EXP
#  if defined(WIN32)
    /* this picks up sitearch as well */
#	  define INCPUSH_SITELIB_EXP s = PerlEnv_sitelib_path(PERL_FS_VERSION, &len); \
                if (s) incpush_use_sep(s, len, INCPUSH_ADD_SUB_DIRS|INCPUSH_CAN_RELOCATE);
#  else
#	  define INCPUSH_SITELIB_EXP S_incpush_use_sep(aTHX_ STR_WITH_LEN(SITELIB_EXP), \
                INCPUSH_CAN_RELOCATE);
#  endif
#endif

#ifdef PERL_VENDORARCH_EXP
    /* vendorarch is always relative to vendorlib on Windows for
     * DLL-based path intuition to work correctly */
#  if !defined(WIN32)
#		define INCPUSH_PERL_VENDORARCH_EXP  S_incpush_use_sep(aTHX_ STR_WITH_LEN(PERL_VENDORARCH_EXP), INCPUSH_CAN_RELOCATE);
#  endif
#endif

#ifdef PERL_VENDORLIB_EXP
#  if defined(WIN32)
    /* this picks up vendorarch as well */
#		define INCPUSH_PERL_VENDORLIB_EXP s = PerlEnv_vendorlib_path(PERL_FS_VERSION, &len); \
                        if (s) incpush_use_sep(s, len, INCPUSH_ADD_SUB_DIRS|INCPUSH_CAN_RELOCATE);
#  else
#		define INCPUSH_PERL_VENDORLIB_EXP S_incpush_use_sep(aTHX_ STR_WITH_LEN(PERL_VENDORLIB_EXP), INCPUSH_CAN_RELOCATE);
#  endif
#endif

#ifdef ARCHLIB_EXP
#	define INCPUSH_ARCHLIB_EXP S_incpush_use_sep(aTHX_ STR_WITH_LEN(ARCHLIB_EXP), INCPUSH_CAN_RELOCATE);
#endif

/* used by INCPUSH_PRIVLIB_EXP */
#ifndef PRIVLIB_EXP
#  define PRIVLIB_EXP "/usr/local/lib/perl5:/usr/local/lib/perl"
#endif

#if defined(WIN32)
#	define INCPUSH_PRIVLIB_EXP s = PerlEnv_lib_path(PERL_FS_VERSION, &len); \
    if (s) incpush_use_sep(s, len, INCPUSH_ADD_SUB_DIRS|INCPUSH_CAN_RELOCATE);
#elif defined(NETWARE)
#	define INCPUSH_PRIVLIB_EXP S_incpush_use_sep(aTHX_ PRIVLIB_EXP, 0, INCPUSH_CAN_RELOCATE);
#else
#	define INCPUSH_PRIVLIB_EXP S_incpush_use_sep(aTHX_ STR_WITH_LEN(PRIVLIB_EXP), INCPUSH_CAN_RELOCATE);
#endif

#ifdef PERL_OTHERLIBDIRS
#	define INCPUSH_PERL_OTHERLIBDIRS S_incpush_use_sep(aTHX_ STR_WITH_LEN(PERL_OTHERLIBDIRS), \
                      INCPUSH_ADD_VERSIONED_SUB_DIRS|INCPUSH_NOT_BASEDIR|INCPUSH_CAN_RELOCATE);
#endif

/* submacros for INCPUSH_PERL5LIB */

#if defined(PERL_USE_SAFE_PUTENV) && ! defined(HAS_UNSETENV)
# 	define _INCPUSH_PERL5LIB_IF	if (perl5lib && *perl5lib != '\0')
#else
# 	define _INCPUSH_PERL5LIB_IF	if (perl5lib)
#endif

#ifndef VMS
/*
 * It isn't possible to delete an environment variable with
 * PERL_USE_SAFE_PUTENV set unless unsetenv() is also available, so in that
 * case we treat PERL5LIB as undefined if it has a zero-length value.
 */
# define _INCPUSH_PERL5LIB_ADD _INCPUSH_PERL5LIB_IF incpush_use_sep(perl5lib, 0, INCPUSH_ADD_OLD_VERS|INCPUSH_NOT_BASEDIR);
#else
/* VMS */
        /* Treat PERL5?LIB as a possible search list logical name -- the
         * "natural" VMS idiom for a Unix path string.  We allow each
         * element to be a set of |-separated directories for compatibility.
         */
# define _INCPUSH_PERL5LIB_ADD char buf[256]; \
        int idx = 0; \
        if (vmstrnenv("PERL5LIB",buf,0,NULL,0)) \
            do { \
                incpush_use_sep(buf, 0, \
                                INCPUSH_ADD_OLD_VERS|INCPUSH_NOT_BASEDIR); \
            } while (vmstrnenv("PERL5LIB",buf,++idx,NULL,0));
#endif

/* this macro is special and use submacros from above */
#define INCPUSH_PERL5LIB if (!TAINTING_get) { _INCPUSH_PERL5LIB_ADD }

/* Use the ~-expanded versions of APPLLIB (undocumented),
    SITELIB and VENDORLIB for older versions
*/
#ifdef APPLLIB_EXP
#	define INCPUSH_APPLLIB_OLD_EXP S_incpush_use_sep(aTHX_ STR_WITH_LEN(APPLLIB_EXP), \
            INCPUSH_ADD_OLD_VERS|INCPUSH_NOT_BASEDIR|INCPUSH_CAN_RELOCATE);
#endif

#if defined(SITELIB_STEM) && defined(PERL_INC_VERSION_LIST)
    /* Search for version-specific dirs below here */
#	define INCPUSH_SITELIB_STEM   S_incpush_use_sep(aTHX_ STR_WITH_LEN(SITELIB_STEM), \
                      INCPUSH_ADD_OLD_VERS|INCPUSH_CAN_RELOCATE);
#endif

#if defined(PERL_VENDORLIB_STEM) && defined(PERL_INC_VERSION_LIST)
    /* Search for version-specific dirs below here */
#	define INCPUSH_PERL_VENDORLIB_STEM    S_incpush_use_sep(aTHX_ STR_WITH_LEN(PERL_VENDORLIB_STEM), \
                      INCPUSH_ADD_OLD_VERS|INCPUSH_CAN_RELOCATE);
#endif

#ifdef PERL_OTHERLIBDIRS
#	define INCPUSH_PERL_OTHERLIBDIRS_ARCHONLY  S_incpush_use_sep(aTHX_ STR_WITH_LEN(PERL_OTHERLIBDIRS), \
                      INCPUSH_ADD_OLD_VERS|INCPUSH_ADD_ARCHONLY_SUB_DIRS|INCPUSH_CAN_RELOCATE);
#endif

/* define all undefined macros... */
#ifndef INCPUSH_APPLLIB_EXP
#define INCPUSH_APPLLIB_EXP
#endif
#ifndef INCPUSH_SITEARCH_EXP
#define INCPUSH_SITEARCH_EXP
#endif
#ifndef INCPUSH_SITELIB_EXP
#define INCPUSH_SITELIB_EXP
#endif
#ifndef INCPUSH_PERL_VENDORARCH_EXP
#define INCPUSH_PERL_VENDORARCH_EXP
#endif
#ifndef INCPUSH_PERL_VENDORLIB_EXP
#define INCPUSH_PERL_VENDORLIB_EXP
#endif
#ifndef INCPUSH_ARCHLIB_EXP
#define INCPUSH_ARCHLIB_EXP
#endif
#ifndef INCPUSH_PRIVLIB_EXP
#define INCPUSH_PRIVLIB_EXP
#endif
#ifndef INCPUSH_PERL_OTHERLIBDIRS
#define INCPUSH_PERL_OTHERLIBDIRS
#endif
#ifndef INCPUSH_PERL5LIB
#define INCPUSH_PERL5LIB
#endif
#ifndef INCPUSH_APPLLIB_OLD_EXP
#define INCPUSH_APPLLIB_OLD_EXP
#endif
#ifndef INCPUSH_SITELIB_STEM
#define INCPUSH_SITELIB_STEM
#endif
#ifndef INCPUSH_PERL_VENDORLIB_STEM
#define INCPUSH_PERL_VENDORLIB_STEM
#endif
#ifndef INCPUSH_PERL_OTHERLIBDIRS_ARCHONLY
#define INCPUSH_PERL_OTHERLIBDIRS_ARCHONLY
#endif

#endif /* DEFINE_INC_MACROS */

${this.title}

Code Editor : perl_inc_macro.h