diff options
| author | Craig A. Berry <craigberry@mac.com> | 2001-10-27 11:07:47 -0500 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2001-10-27 20:56:38 +0000 |
| commit | 09b57f0d253eca293f6fda3ddec414b1420cc1ac (patch) | |
| tree | 10a33cbccd158ce1437868b5ddd0a5e5b2976687 /perlio.c | |
| parent | 303f9cd21ef802120827a79133a53a704763ef7b (diff) | |
| download | perl-09b57f0d253eca293f6fda3ddec414b1420cc1ac.tar.gz | |
C RTL awareness update for VMS
Message-Id: <5.1.0.14.2.20011027134037.01bebc60@exchi01>
p4raw-id: //depot/perl@12712
Diffstat (limited to 'perlio.c')
| -rw-r--r-- | perlio.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -3630,8 +3630,8 @@ PerlIOMmap_map(PerlIO *f) if (flags & PERLIO_F_CANREAD) { PerlIOBuf *b = PerlIOSelf(f, PerlIOBuf); int fd = PerlIO_fileno(f); - struct stat st; - code = fstat(fd, &st); + Stat_t st; + code = Fstat(fd, &st); if (code == 0 && S_ISREG(st.st_mode)) { SSize_t len = st.st_size - b->posn; if (len > 0) { |