diff options
| author | Dave Mitchell <davem@fdisolutions.com> | 2007-05-20 23:56:30 +0000 |
|---|---|---|
| committer | Dave Mitchell <davem@fdisolutions.com> | 2007-05-20 23:56:30 +0000 |
| commit | 95ca8690fb514421b98da534c91bfd455c9daabc (patch) | |
| tree | 9fd8976fcc88e752e6dad70da878d20df9048699 /perlvars.h | |
| parent | 907b3e23950be4dd31c150e1902fbd26201355bd (diff) | |
| download | perl-95ca8690fb514421b98da534c91bfd455c9daabc.tar.gz | |
delete unused vars PL_av_fetch_sv, PL_hv_fetch_sv
and fix 'duplicate symbol' warnings from embed.pl
for utf8cache and sh_path
p4raw-id: //depot/perl@31246
Diffstat (limited to 'perlvars.h')
| -rw-r--r-- | perlvars.h | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/perlvars.h b/perlvars.h index 4970146b07..cd88e071f1 100644 --- a/perlvars.h +++ b/perlvars.h @@ -54,12 +54,15 @@ PERLVAR(Gop_mutex, perl_mutex) /* Mutex for op refcounting */ PERLVAR(Gdollarzero_mutex, perl_mutex) /* Modifying $0 */ #endif + /* This is constant on most architectures, a global on OS/2 */ #ifdef OS2 -PERLVARI(Gsh_path, char *, SH_PATH)/* full path of shell */ +# define PERL___C #else -PERLVARI(Gsh_path, const char *, SH_PATH)/* full path of shell */ +# define PERL___C const #endif +PERLVARI(Gsh_path, PERL___C char *, SH_PATH) /* full path of shell */ +#undef PERL___C #ifndef PERL_MICRO /* If Perl has to ignore SIGPFE, this is its saved state. |