diff options
author | Nicholas Clark <nick@ccl4.org> | 2009-02-20 20:09:16 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2009-02-20 20:16:12 +0000 |
commit | e6a0bbf8b4e00dca6da011b9cb1d8c949b3bfa1e (patch) | |
tree | 4fb59c91c234617af3526425a3b8123c2c5a2bab /win32/config_H.gc | |
parent | fd2c5c6c3907b40a30d10beb189791226562c647 (diff) | |
download | perl-e6a0bbf8b4e00dca6da011b9cb1d8c949b3bfa1e.tar.gz |
Add a parameter to win32_get_{priv,site,vendor}lib(), to return the length,
as we already know it, and use it in S_init_perllib() to save a strlen() in
S_incpush_use_sep().
Diffstat (limited to 'win32/config_H.gc')
-rw-r--r-- | win32/config_H.gc | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/win32/config_H.gc b/win32/config_H.gc index 12c2215116..823cb3e614 100644 --- a/win32/config_H.gc +++ b/win32/config_H.gc @@ -2638,7 +2638,7 @@ * in programs that are not prepared to deal with ~ expansion at run-time. */ #define PRIVLIB "c:\\perl\\lib" /**/ -#define PRIVLIB_EXP (win32_get_privlib("5.11.0")) /**/ +#define PRIVLIB_EXP (win32_get_privlib(PERL_VERSION_STRING, NULL)) /**/ /* CAN_PROTOTYPE: * If defined, this macro indicates that the C compiler can handle @@ -2754,7 +2754,7 @@ * be tacked onto this variable to generate a list of directories to search. */ #define SITELIB "c:\\perl\\site\\lib" /**/ -#define SITELIB_EXP (win32_get_sitelib("5.11.0")) /**/ +#define SITELIB_EXP (win32_get_sitelib(PERL_VERSION_STRING, NULL)) /**/ #define SITELIB_STEM "" /**/ /* Size_t_size: |