X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=perliol.h;h=de875470fa5562d4ff724aa50b5a2ee25a823ed7;hb=cdf8218f4ad909c2193b756d53edeceefec447d4;hp=d4604e23429a1e7f4fb06abd4527073cf6d18cbb;hpb=13621cfb31449eed71b690b723c2463019b1b277;p=p5sagit%2Fp5-mst-13.2.git diff --git a/perliol.h b/perliol.h index d4604e2..de87547 100644 --- a/perliol.h +++ b/perliol.h @@ -74,6 +74,7 @@ struct _PerlIO #define PERLIO_F_TEMP 0x00100000 #define PERLIO_F_OPEN 0x00200000 #define PERLIO_F_FASTGETS 0x00400000 +#define PERLIO_F_TTY 0x00800000 #define PerlIOBase(f) (*(f)) #define PerlIOSelf(f,type) ((type *)PerlIOBase(f)) @@ -118,6 +119,7 @@ extern IV PerlIOBase_flush (PerlIO *f); extern IV PerlIOBase_fill (PerlIO *f); extern IV PerlIOBase_close (PerlIO *f); extern void PerlIOBase_setlinebuf(PerlIO *f); +extern void PerlIOBase_flush_linebuf(void); extern IV PerlIOBase_noop_ok (PerlIO *f); extern IV PerlIOBase_noop_fail (PerlIO *f);