This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
AUTHORS updates and
[perl5.git] / perliol.h
index e9f6a97..b659de0 100644 (file)
--- 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 */