1 files changed, 2 insertions, 2 deletions
diff --git a/perlio.c b/perlio.c
index 2c9e7a8ff2..ba91393203 100644
--- a/perlio.c
+++ b/perlio.c
@@ -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) {