Lines Matching refs:chunks
733 my (@chunks);
739 push(@chunks, [ $condition, $statement ]);
741 return ($level, $linenr, @chunks);
752 push(@chunks, [ $condition, $statement ]);
755 return ($level, $linenr, @chunks);
2417 my ($level, $endln, @chunks) =
2421 print "APW: <<$chunks[1][0]>><<$chunks[1][1]>>\n"
2422 if $#chunks >= 1;
2424 if ($#chunks >= 0 && $level == 0) {
2428 for my $chunk (@chunks) {
2469 if ($seen != ($#chunks + 1) && !$allowed) {
2491 my ($level, $endln, @chunks) =
2495 my ($cond, $block) = @{$chunks[0]};
2517 if (defined $chunks[1]) {
2518 my ($cond, $block) = @{$chunks[1]};