Searched refs:layera (Results 1 - 1 of 1) sorted by relevance
| /osnet-11/usr/src/cmd/perl/5.8.4/distrib/ |
| H A D | perlio.c | 1488 PerlIO_list_t *layera = NULL; local
1497 layera = PerlIO_list_alloc(aTHX);
1502 PerlIO_list_push(aTHX_ layera, l->tab, arg);
1507 layera = PerlIO_resolve_layers(aTHX_ layers, mode, narg, args);
1508 if (!layera) {
1515 n = layera->cur - 1;
1517 PerlIO_funcs *t = PerlIO_layer_fetch(aTHX_ layera, n, NULL);
1535 f = (*tab->Open) (aTHX_ tab, layera, n, mode, fd, imode, perm,
1542 if (n + 1 < layera->cur) {
1547 if (PerlIO_apply_layera(aTHX_ f, mode, layera,
[all...] |
Completed in 28 milliseconds