Searched refs:firstkid (Results 1 – 2 of 2) sorted by relevance
13771 OP *firstkid; in Perl_ck_sort() local13779 firstkid = OpSIBLING(cLISTOPo->op_first); /* get past pushmark */ in Perl_ck_sort()13781 if (!firstkid) in Perl_ck_sort()13785 OP *kid = cUNOPx(firstkid)->op_first; /* get past null */ in Perl_ck_sort()13797 kid = scalar(firstkid); in Perl_ck_sort()13822 op_sibling_splice(firstkid, NULL, 1, in Perl_ck_sort()13829 firstkid = OpSIBLING(firstkid); in Perl_ck_sort()13832 for (kid = firstkid; kid; kid = OpSIBLING(kid)) { in Perl_ck_sort()
3584 my $firstkid = my $kid = $op->first->sibling;3608 …$expr = $self->deparse($kid, !$indir && $kid == $firstkid && $name eq "sort" && $firstkid->name eq…