X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perliol.h;h=b659de0bf38f4985b3491e9945bcd3fb4c0dc813;hb=23acf6821d640f06d65b9a368b9c4101c358376d;hp=e9f6a975bb3f85487ac1c695f0ab0076758fb0b0;hpb=fcf2db383b9625d65c84a8308e9be05a073bed3b;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/perliol.h b/perliol.h
index e9f6a97..b659de0 100644
--- a/perliol.h
+++ b/perliol.h
@@ -107,7 +107,9 @@ EXT PerlIO_funcs PerlIO_pending;
 #ifdef HAS_MMAP
 EXT PerlIO_funcs PerlIO_mmap;
 #endif
-
+#ifdef WIN32
+EXT PerlIO_funcs PerlIO_win32;
+#endif
 extern PerlIO *PerlIO_allocate(pTHX);
 extern SV *PerlIO_arg_fetch(PerlIO_list_t *av,IV n);
 #define PerlIOArg PerlIO_arg_fetch(layers,n)
@@ -169,6 +171,8 @@ extern STDCHAR *PerlIOBuf_get_ptr    (PerlIO *f);
 extern SSize_t	PerlIOBuf_get_cnt    (PerlIO *f);
 extern void	PerlIOBuf_set_ptrcnt (PerlIO *f, STDCHAR *ptr, SSize_t cnt);
 
+extern int	PerlIOUnix_oflags    (const char *mode);
+
 /*--------------------------------------------------------------------------------------*/
 
 #endif /* _PERLIOL_H */