Lines Matching refs:block
6152 my ($cond, $block) = @{$chunk};
6165 $ln += statement_rawlines($block) - 1;
6167 substr($block, 0, length($cond), '');
6169 $seen++ if ($block =~ /^\s*{/);
6176 if ($block =~/\b(?:if|for|while)\b/) {
6180 if (statement_block_size($block) > 1) {
6216 my ($cond, $block) = @{$chunks[0]};
6219 substr($block, 0, length($cond), '');
6225 if ($block =~/\b(?:if|for|while)\b/) {
6229 if (statement_block_size($block) > 1) {
6235 my ($cond, $block) = @{$chunks[1]};
6237 substr($block, 0, length($cond), '');
6239 if ($block =~ /^\s*\{/) {
6244 if ($level == 0 && $block =~ /^\s*\{/ && !$allowed) {
6245 my $cnt = statement_rawlines($block);