Home
last modified time | relevance | path

Searched refs:PerlIOBase (Results 1 – 6 of 6) sorted by relevance

/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/
H A Dperlio.c61 PerlIO_funcs *tab = PerlIOBase(f)->tab; \
74 PerlIO_funcs *tab = PerlIOBase(f)->tab; \
86 PerlIO_funcs *tab = PerlIOBase(f)->tab; \
98 PerlIO_funcs *tab = PerlIOBase(f)->tab; \
533 PerlIO_funcs *tab = PerlIOBase(f)->tab;
713 PerlIOl *l = PerlIOBase(f);
1189 if (PerlIOBase(f)->tab->kind & PERLIO_K_RAW) {
1191 PerlIOBase(f)->flags &= ~PERLIO_F_UTF8;
1233 PerlIO_debug(":raw f=%p :%s\n", (void*)f, PerlIOBase(f)->tab->name);
1283 (void*)f, PerlIOBase(f)->tab->name, iotype, mode,
[all …]
H A Dperliol.h93 #define PerlIOBase(f) (*(f)) macro
94 #define PerlIOSelf(f,type) ((type *)PerlIOBase(f))
95 #define PerlIONext(f) (&(PerlIOBase(f)->next))
/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/ext/PerlIO/scalar/
H A Dscalar.xs42 if ((PerlIOBase(f)->flags) & PERLIO_F_TRUNCATE) in PerlIOScalar_pushed()
44 if ((PerlIOBase(f)->flags) & PERLIO_F_APPEND) in PerlIOScalar_pushed()
66 PerlIOBase(f)->flags &= ~(PERLIO_F_RDBUF | PERLIO_F_WRBUF); in PerlIOScalar_close()
119 if (PerlIOBase(f)->flags & PERLIO_F_CANWRITE) { in PerlIOScalar_write()
124 if ((PerlIOBase(f)->flags) & PERLIO_F_APPEND) { in PerlIOScalar_write()
163 if (PerlIOBase(f)->flags & PERLIO_F_CANREAD) { in PerlIOScalar_get_base()
172 if (PerlIOBase(f)->flags & PERLIO_F_CANREAD) { in PerlIOScalar_get_ptr()
182 if (PerlIOBase(f)->flags & PERLIO_F_CANREAD) { in PerlIOScalar_get_cnt()
195 if (PerlIOBase(f)->flags & PERLIO_F_CANREAD) { in PerlIOScalar_bufsiz()
220 PerlIOBase(f)->flags |= PERLIO_F_OPEN; in PerlIOScalar_open()
/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/ext/PerlIO/via/
H A Dvia.xs168 modesv = (*PerlIONext(f) && (PerlIOBase(PerlIONext(f))->flags & PERLIO_F_UTF8)) in PerlIOVia_pushed()
172 PerlIOBase(f)->flags |= ~PERLIO_F_UTF8; in PerlIOVia_pushed()
175 PerlIOBase(f)->flags &= ~PERLIO_F_UTF8; in PerlIOVia_pushed()
179 PerlIOBase(f)->flags &= ~PERLIO_F_FASTGETS; in PerlIOVia_pushed()
181 PerlIOBase(f)->flags |= PERLIO_F_FASTGETS; in PerlIOVia_pushed()
333 PerlIOBase(f)->flags &= ~(PERLIO_F_RDBUF | PERLIO_F_WRBUF); in PerlIOVia_close()
408 if (PerlIOBase(f)->flags & PERLIO_F_CANREAD) { in PerlIOVia_read()
409 if (PerlIOBase(f)->flags & PERLIO_F_FASTGETS) { in PerlIOVia_read()
432 if (PerlIOBase(f)->flags & PERLIO_F_CANWRITE) { in PerlIOVia_write()
449 if (PerlIOBase(f)->flags & PERLIO_F_CANREAD) { in PerlIOVia_fill()
[all …]
/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/ext/PerlIO/encoding/
H A Dencoding.xs146 PerlIOBase(f)->flags |= PERLIO_F_UTF8; in PerlIOEncode_pushed()
359 PerlIOBase(f)->flags |= PERLIO_F_RDBUF; in PerlIOEncode_fill()
384 PerlIOBase(f)->flags |= PERLIO_F_EOF; in PerlIOEncode_fill()
386 PerlIOBase(f)->flags |= PERLIO_F_ERROR; in PerlIOEncode_fill()
406 if ((PerlIOBase(f)->flags & PERLIO_F_WRBUF) && (e->base.ptr > e->base.buf)) { in PerlIOEncode_flush()
442 else if ((PerlIOBase(f)->flags & PERLIO_F_RDBUF)) { in PerlIOEncode_flush()
492 PerlIOBase(f)->flags &= ~(PERLIO_F_RDBUF | PERLIO_F_WRBUF); in PerlIOEncode_flush()
502 if (PerlIOBase(f)->flags & PERLIO_F_RDBUF) { in PerlIOEncode_close()
522 PerlIOBase(f)->flags &= ~(PERLIO_F_RDBUF | PERLIO_F_WRBUF); in PerlIOEncode_close()
/onnv-gate/usr/src/cmd/perl/5.8.4/distrib/pod/
H A Dperliol.pod748 PerlIOBase(PerlIO *f) returns the "Base" pointer, or in other words,
751 PerlIOSelf(PerlIO* f, type) return the PerlIOBase cast to a type.
1008 PerlIOBase(f)->flags |= PERLIO_F_OPEN;