Add test for -i.

[perl5.git] / perliol.h

diff --git a/perliol.h b/perliol.h
index fa399e6..47fe6fc 100644 (file)
--- a/perliol.h
+++ b/perliol.h
@@ -88,6 +88,7 @@ struct _PerlIO {
 #define PERLIO_F_OPEN          0x00200000
 #define PERLIO_F_FASTGETS      0x00400000
 #define PERLIO_F_TTY           0x00800000
+#define PERLIO_F_NOTREG         0x01000000   
 
 #define PerlIOBase(f)      (*(f))
 #define PerlIOSelf(f,type) ((type *)PerlIOBase(f))