Lines Matching refs:chunks
869 my (@chunks);
875 push(@chunks, [ $condition, $statement ]);
877 return ($level, $linenr, @chunks);
888 push(@chunks, [ $condition, $statement ]);
891 return ($level, $linenr, @chunks);
2950 my ($level, $endln, @chunks) =
2954 print "APW: <<$chunks[1][0]>><<$chunks[1][1]>>\n"
2955 if $#chunks >= 1;
2957 if ($#chunks >= 0 && $level == 0) {
2961 for my $chunk (@chunks) {
3001 if ($seen != ($#chunks + 1) && !$allowed) {
3023 my ($level, $endln, @chunks) =
3027 my ($cond, $block) = @{$chunks[0]};
3049 if (defined $chunks[1]) {
3050 my ($cond, $block) = @{$chunks[1]};