diff options
| author | Ilya Zakharevich <ilya@math.berkeley.edu> | 2006-11-27 19:36:29 -0800 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2006-11-28 14:59:03 +0000 |
| commit | 428eed4a3c021dd32b21fe7b786a478613c6dcc3 (patch) | |
| tree | b21ea6b198f4f36df27cdccd793690903d9e8d10 /perlvars.h | |
| parent | 9331e88fec8adcad7b90a706da0720fa58b85bac (diff) | |
| download | perl-428eed4a3c021dd32b21fe7b786a478613c6dcc3.tar.gz | |
OS/2 compilation fixes by Ilya
Subject: [PATCH 5.8.8] Build on OS/2
Message-ID: <20061128113629.GA18108@powdermilk.math.berkeley.edu>
p4raw-id: //depot/perl@29407
Diffstat (limited to 'perlvars.h')
| -rw-r--r-- | perlvars.h | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/perlvars.h b/perlvars.h index 5bdad036da..94792fe0da 100644 --- a/perlvars.h +++ b/perlvars.h @@ -55,7 +55,11 @@ 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 */ +#else PERLVARI(Gsh_path, const char *, SH_PATH)/* full path of shell */ +#endif #ifndef PERL_MICRO /* If Perl has to ignore SIGPFE, this is its saved state. |