diff options
| author | Charles Bailey <bailey@newman.upenn.edu> | 1999-07-02 15:18:41 -0400 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-07-07 17:45:52 +0000 |
| commit | 1f47e8e2e6e01cf4845f0f3f0f0c7524761ffa80 (patch) | |
| tree | d302430354d07e16ddf40f2a034ab55b14889d8b /iperlsys.h | |
| parent | cae6c631be0cfed1f388d3116e456beb58714d6e (diff) | |
| download | perl-1f47e8e2e6e01cf4845f0f3f0f0c7524761ffa80.tar.gz | |
applied new parts of suggested patch
Message-id: <01JD3M8W1VXS000S5G@mail.newman.upenn.edu>
Subject: [PATCH 5.005_57] Consolidated VMS patch
p4raw-id: //depot/perl@3650
Diffstat (limited to 'iperlsys.h')
| -rw-r--r-- | iperlsys.h | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/iperlsys.h b/iperlsys.h index d3ac12f58d..2adb321956 100644 --- a/iperlsys.h +++ b/iperlsys.h @@ -777,10 +777,11 @@ struct IPerlLIOInfo #define PerlLIO_ioctl(fd, u, buf) ioctl((fd), (u), (buf)) #define PerlLIO_isatty(fd) isatty((fd)) #define PerlLIO_lseek(fd, offset, mode) lseek((fd), (offset), (mode)) +#define PerlLIO_stat(name, buf) Stat((name), (buf)) #ifdef HAS_LSTAT -#define PerlLIO_lstat(name, buf) lstat((name), (buf)) +# define PerlLIO_lstat(name, buf) lstat((name), (buf)) #else -#define PerlLIO_lstat(name, buf) PerlLIO_stat((name), (buf)) +# define PerlLIO_lstat(name, buf) PerlLIO_stat((name), (buf)) #endif #define PerlLIO_mktemp(file) mktemp((file)) #define PerlLIO_mkstemp(file) mkstemp((file)) @@ -789,7 +790,6 @@ struct IPerlLIOInfo #define PerlLIO_read(fd, buf, count) read((fd), (buf), (count)) #define PerlLIO_rename(old, new) rename((old), (new)) #define PerlLIO_setmode(fd, mode) setmode((fd), (mode)) -#define PerlLIO_stat(name, buf) Stat((name), (buf)) #define PerlLIO_tmpnam(str) tmpnam((str)) #define PerlLIO_umask(mode) umask((mode)) #define PerlLIO_unlink(file) unlink((file)) |