diff options
| author | Perl 5 Porters <perl5-porters@africa.nicoh.com> | 1996-08-29 22:24:29 +0000 |
|---|---|---|
| committer | Andy Dougherty <doughera@lafcol.lafayette.edu> | 1996-08-29 22:24:29 +0000 |
| commit | 5ae7bdf7abb6651ff52ed1bd203856fc5886c039 (patch) | |
| tree | ea2a2464f3f70c58c7cae25711c7d299d4d06665 /os2 | |
| parent | 89078e0fc0659c720f21de63d8d61f6f995a7d0b (diff) | |
| download | perl-5ae7bdf7abb6651ff52ed1bd203856fc5886c039.tar.gz | |
perl 5.003_04: os2/os2ish.h
SH_PATH_INI added (needed to redefine SH_PATH for binary
distribution).
SH_PATH is redefined.
Diffstat (limited to 'os2')
| -rw-r--r-- | os2/os2ish.h | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/os2/os2ish.h b/os2/os2ish.h index 12c6ad337e..7d5e8538ea 100644 --- a/os2/os2ish.h +++ b/os2/os2ish.h @@ -47,6 +47,12 @@ #define BIT_BUCKET "/dev/nul" /* Will this work? */ +/* SH_PATH_INI: + * Duplicate for SH_PATH. This symbol allows redefinition of SH_PATH, + * which may be needed to make a binary distribution. + */ +#define SH_PATH_INI SH_PATH /**/ + void Perl_OS2_init(); #define PERL_SYS_INIT(argcp, argvp) STMT_START { \ @@ -172,6 +178,7 @@ extern OS2_Perl_data_t OS2_Perl_data; #define STATIC_FILE_LENGTH 127 extern char sh_path[STATIC_FILE_LENGTH+1]; +#undef SH_PATH #define SH_PATH sh_path #define PERLLIB_MANGLE(s, n) perllib_mangle((s), (n)) char *perllib_mangle(char *, unsigned int); @@ -348,3 +355,4 @@ typedef struct { PQTOPLEVEL get_sysinfo(ULONG pid, ULONG flags); #endif /* _OS2EMX_H */ + |