Lines Matching refs:block
6136 my ($cond, $block) = @{$chunk};
6149 $ln += statement_rawlines($block) - 1;
6151 substr($block, 0, length($cond), '');
6153 $seen++ if ($block =~ /^\s*{/);
6160 if ($block =~/\b(?:if|for|while)\b/) {
6164 if (statement_block_size($block) > 1) {
6200 my ($cond, $block) = @{$chunks[0]};
6203 substr($block, 0, length($cond), '');
6209 if ($block =~/\b(?:if|for|while)\b/) {
6213 if (statement_block_size($block) > 1) {
6219 my ($cond, $block) = @{$chunks[1]};
6221 substr($block, 0, length($cond), '');
6223 if ($block =~ /^\s*\{/) {
6228 if ($level == 0 && $block =~ /^\s*\{/ && !$allowed) {
6229 my $cnt = statement_rawlines($block);