Lines Matching refs:block
2551 my ($cond, $block) = @{$chunk};
2563 $ln += statement_rawlines($block) - 1;
2565 substr($block, 0, length($cond), '');
2567 $seen++ if ($block =~ /^\s*{/);
2574 if ($block =~/\b(?:if|for|while)\b/) {
2578 if (statement_block_size($block) > 1) {
2602 my ($cond, $block) = @{$chunks[0]};
2605 substr($block, 0, length($cond), '');
2611 if ($block =~/\b(?:if|for|while)\b/) {
2615 if (statement_block_size($block) > 1) {
2621 my ($cond, $block) = @{$chunks[1]};
2623 substr($block, 0, length($cond), '');
2625 if ($block =~ /^\s*\{/) {
2630 if ($level == 0 && $block =~ /^\s*\{/ && !$allowed) {
2632 my $cnt = statement_rawlines($block);