summaryrefslogtreecommitdiff
path: root/perliol.h
diff options
context:
space:
mode:
authorNick Ing-Simmons <nik@tiuk.ti.com>2001-03-26 17:32:06 +0000
committerNick Ing-Simmons <nik@tiuk.ti.com>2001-03-26 17:32:06 +0000
commita9c883f63197ffe78a9fa90fb454b99d9d4027c2 (patch)
treee981b5bc2bbda851f6a58188b6b22ea388b67c09 /perliol.h
parent9133bbab1b418762e5735878fdd7f85407fdd45a (diff)
downloadperl-a9c883f63197ffe78a9fa90fb454b99d9d4027c2.tar.gz
Implement flush of linebuffered streams on read of a tty.
p4raw-id: //depot/perlio@9361
Diffstat (limited to 'perliol.h')
-rw-r--r--perliol.h2
1 files changed, 2 insertions, 0 deletions
diff --git a/perliol.h b/perliol.h
index d4604e2342..de875470fa 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);