Lines Matching full:allowed
3107 # Only one name comment should be allowed
3846 # Check the allowed long line types first
5045 # check for spacing round square brackets; allowed:
5283 # unary ++ and unary -- are allowed no space on one side.
5564 # but this is not allowed here as many ?: uses would appear to be labels
5895 #no spaces allowed after \ in define
6149 my @allowed = ();
6161 $allowed[$allow] = 0;
6164 # We have looked at and allowed this specific line.
6174 #print "cond<$cond> block<$block> allowed<$allowed[$allow]>\n";
6176 #print "APW: ALLOWED: cond<$cond>\n";
6177 $allowed[$allow] = 1;
6180 #print "APW: ALLOWED: block<$block>\n";
6181 $allowed[$allow] = 1;
6184 #print "APW: ALLOWED: lines block<$block>\n";
6185 $allowed[$allow] = 1;
6191 foreach (@allowed) {
6207 my $allowed = 0;
6211 #print "APW: ALLOWED: pre<$1>\n";
6212 $allowed = 1;
6225 #print "APW: ALLOWED: cond<$cond>\n";
6226 $allowed = 1;
6229 #print "APW: ALLOWED: block<$block>\n";
6230 $allowed = 1;
6233 #print "APW: ALLOWED: lines block<$block>\n";
6234 $allowed = 1;
6243 #print "APW: ALLOWED: chunk-1 block<$block>\n";
6244 $allowed = 1;
6247 if ($level == 0 && $block =~ /^\s*\{/ && !$allowed) {