diff options
| author | Nicholas Clark <nick@ccl4.org> | 2008-11-26 23:20:31 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2008-11-26 23:20:31 +0000 |
| commit | 051b305ded17acbcebcc33237adf2a68c22c2001 (patch) | |
| tree | c331d2c02f22f3bead40111ee77cdaf640b11cd5 /embed.h | |
| parent | 90f7771ac004a1086e5ea9601d735c6ab0abc0e4 (diff) | |
| download | perl-051b305ded17acbcebcc33237adf2a68c22c2001.tar.gz | |
setenv_getix() is not used anywhere other than util.c (and the "special
biologist word for stable" Msql-Mysql-modules-1.2219) so make it
static.
p4raw-id: //depot/perl@34940
Diffstat (limited to 'embed.h')
| -rw-r--r-- | embed.h | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -838,9 +838,9 @@ #define scope Perl_scope #endif #define screaminstr Perl_screaminstr -#if !defined(VMS) +#if !defined(VMS) && defined(PERL_IN_UTIL_C) #ifdef PERL_CORE -#define setenv_getix Perl_setenv_getix +#define setenv_getix S_setenv_getix #endif #endif #define setdefout Perl_setdefout @@ -3185,9 +3185,9 @@ #define scope(a) Perl_scope(aTHX_ a) #endif #define screaminstr(a,b,c,d,e,f) Perl_screaminstr(aTHX_ a,b,c,d,e,f) -#if !defined(VMS) +#if !defined(VMS) && defined(PERL_IN_UTIL_C) #ifdef PERL_CORE -#define setenv_getix(a) Perl_setenv_getix(aTHX_ a) +#define setenv_getix(a) S_setenv_getix(aTHX_ a) #endif #endif #define setdefout(a) Perl_setdefout(aTHX_ a) |