[asperl] added AS patch#7

[p5sagit/p5-mst-13.2.git] / perllio.h

diff --git a/perllio.h b/perllio.h
index 0b0f591..283e6ce 100644 (file)
--- a/perllio.h
+++ b/perllio.h
@@ -12,7 +12,7 @@
 #define PerlLIO_dup(fd) piLIO->Dup((fd), ErrorNo())
 #define PerlLIO_dup2(fd1, fd2) piLIO->Dup2((fd1), (fd2), ErrorNo())
 #define PerlLIO_flock(fd, op) piLIO->Flock((fd), (op), ErrorNo())
-#define PerlLIO_fstat(fd, buf) piLIO->FStat((fd), (buf), ErrorNo())
+#define PerlLIO_fstat(fd, buf) piLIO->FileStat((fd), (buf), ErrorNo())
 #define PerlLIO_ioctl(fd, u, buf) piLIO->IOCtl((fd), (u), (buf), ErrorNo())
 #define PerlLIO_isatty(fd) piLIO->Isatty((fd), ErrorNo())
 #define PerlLIO_lseek(fd, offset, mode) piLIO->Lseek((fd), (offset), (mode), ErrorNo())
@@ -23,7 +23,7 @@
 #define PerlLIO_read(fd, buf, count) piLIO->Read((fd), (buf), (count), ErrorNo())
 #define PerlLIO_rename(oldname, newname) piLIO->Rename((oldname), (newname), ErrorNo())
 #define PerlLIO_setmode(fd, mode) piLIO->Setmode((fd), (mode), ErrorNo())
-#define PerlLIO_stat(name, buf) piLIO->STat((name), (buf), ErrorNo())
+#define PerlLIO_stat(name, buf) piLIO->NameStat((name), (buf), ErrorNo())
 #define PerlLIO_tmpnam(str) piLIO->Tmpnam((str), ErrorNo())
 #define PerlLIO_umask(mode) piLIO->Umask((mode), ErrorNo())
 #define PerlLIO_unlink(file) piLIO->Unlink((file), ErrorNo())