Lines Matching refs:allowed

4680 				my @allowed = ();
4692 					$allowed[$allow] = 0;
4708 						$allowed[$allow] = 1;
4712 						$allowed[$allow] = 1;
4716 						$allowed[$allow] = 1;
4722 					foreach (@allowed) {
4738 			my $allowed = 0;
4743 				$allowed = 1;
4757 				$allowed = 1;
4761 				$allowed = 1;
4765 				$allowed = 1;
4775 					$allowed = 1;
4778 			if ($level == 0 && $block =~ /^\s*\{/ && !$allowed) {