X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perliol.h;h=6d4485abcca59fe72b3798eac3d0827f801e8fd5;hb=39644a267dae6dfa935b1c1d39151eb399850949;hp=f524fcd537c0a79567415c68856c197f4a288d03;hpb=dfebf9581083f76d0f88d6a3edc9e5b72e852d91;p=p5sagit%2Fp5-mst-13.2.git

diff --git a/perliol.h b/perliol.h
index f524fcd..6d4485a 100644
--- a/perliol.h
+++ b/perliol.h
@@ -41,6 +41,7 @@ struct _PerlIO_funcs
 #define PERLIO_K_CANCRLF	0x00000004
 #define PERLIO_K_FASTGETS	0x00000008
 #define PERLIO_K_DUMMY		0x00000010
+#define PERLIO_K_UTF8		0x00008000
 
 /*--------------------------------------------------------------------------------------*/
 struct _PerlIO
@@ -74,17 +75,17 @@ struct _PerlIO
 #define PerlIONext(f)      (&(PerlIOBase(f)->next))
 
 /*--------------------------------------------------------------------------------------*/
-
-extern PerlIO_funcs PerlIO_unix;
-extern PerlIO_funcs PerlIO_perlio;
-extern PerlIO_funcs PerlIO_stdio;
-extern PerlIO_funcs PerlIO_crlf;
-extern PerlIO_funcs PerlIO_utf8;
-extern PerlIO_funcs PerlIO_raw;
-/* The EXT is need for Cygwin -- but why only for _pending? --jhi */
+/* Data exports - EXT rather than extern is needed for Cygwin */
+EXT PerlIO_funcs PerlIO_unix;
+EXT PerlIO_funcs PerlIO_perlio;
+EXT PerlIO_funcs PerlIO_stdio;
+EXT PerlIO_funcs PerlIO_crlf;
+EXT PerlIO_funcs PerlIO_utf8;
+EXT PerlIO_funcs PerlIO_byte;
+EXT PerlIO_funcs PerlIO_raw;
 EXT PerlIO_funcs PerlIO_pending;
 #ifdef HAS_MMAP
-extern PerlIO_funcs PerlIO_mmap;
+EXT PerlIO_funcs PerlIO_mmap;
 #endif
 
 extern PerlIO *PerlIO_allocate(pTHX);