diff options
| author | Perl 5 Porters <perl5-porters@africa.nicoh.com> | 1996-02-08 10:31:00 +0000 |
|---|---|---|
| committer | Andy Dougherty <doughera@lafcol.lafayette.edu> | 1996-02-08 10:31:00 +0000 |
| commit | c0c09dfd3cf50dacd0bf01dff34b4904c5ed1cc6 (patch) | |
| tree | 584582791ab07b60b371935bd59423b9e7d2ea0d /os2/os2ish.h | |
| parent | 6f45a1d401152a2c8202b58306cc112de4c9bafe (diff) | |
| download | perl-c0c09dfd3cf50dacd0bf01dff34b4904c5ed1cc6.tar.gz | |
OS/2 updates.
Diffstat (limited to 'os2/os2ish.h')
| -rw-r--r-- | os2/os2ish.h | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/os2/os2ish.h b/os2/os2ish.h index 20e92b0845..8d0820dcfb 100644 --- a/os2/os2ish.h +++ b/os2/os2ish.h @@ -27,8 +27,13 @@ #define PERL_SYS_INIT(argcp, argvp) do { \ _response(argcp, argvp); \ - _wildcard(argcp, argvp); } while (0) + _wildcard(argcp, argvp); \ + settmppath(); } while (0) +#define TMPPATH tmppath +#define TMPPATH1 "plXXXXXX" +extern char *tmppath; +void settmppath(); /* * fwrite1() should be a routine with the same calling sequence as fwrite(), |