Lines Matching refs:layera
1488 PerlIO_list_t *layera = NULL;
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, n + 1, layera->cur) != 0) {
1555 PerlIO_list_free(aTHX_ layera);