Lines Matching refs:report

318 sub report {  subroutine
375 report("indent = $count != $comment_indent within multi-line comment")
379report("indent = ".($count + $tweak)." != $comment_indent at end of multi-line comment")
413 report("intra-line comment indent = $count != $ref_indent") if $in_comment == 0;
414 report("multi-line comment indent = $count != $ref_indent") if $in_comment < 0;
432 report("indent = $count != $ref_indent for $ref_desc".
498 report("unexpected '$c' @ ".($in_paren_expr ? "(expr)" : "expr"));
504 report("unexpected '}'");
514 report("code after (expr)")
527 report("unclosed '$symbol' in $position");
552 report(($2 eq "\x09" ? "TAB" : $2 eq "\x0D" ? "CR " : $2 =~ m/[\x00-\x1F]/ ? "non-printable"
557 report("trailing whitespace at EOL") if m/\s\n$/;
576 report("multi-line string literal not terminated by '\"' and trailing '\' is missing")
601report("missing space or '*' after leading '*' in multi-line comment") if $cmt_text =~ m|^[^*\s/$s…
603 report("missing leading '*' in multi-line comment");
610 report("missing space or '*' before '*/'") if $head =~ m/[^*\s]$/;
611report("missing space (or ',', ';', ')', '}', ']') after '*/'") if $tail =~ m/^[^\s,;)}\]]/; # no …
614 report("unexpected '*/' outside comment");
617report("text before '*/' in multi-line comment") if ($head =~ m/[^*\s]/); # non-SPC before '*/'
634 report("missing space before '/*'")
636report("missing space, '*', or '!' after '/*$opt_minus'") if $tail =~ m/^[^\s*!$self_test_exceptio…
639 report("unexpected '/*' inside multi-line comment");
641 report("unexpected '/*' inside intra-line comment") if $1 =~ /\/\*/;
648 report("text after '/*' in multi-line comment")
681 report("line length = $len > ".$max_length);
686 report("'//' end-of-line comment"); # the '//' comment style is not allowed for C90
704 report("preprocessor directive within multi-line directive");
708 report("indent = $count != 0 for '#'") if $count != 0;
709 report("'#$preproc_directive' with constant condition")
714 report("unexpected '#$preproc_directive' according to '#if' nesting");
717report("'#if' nesting indent = $space_count != $preproc_if_nesting") if $space_count != $preproc_i…
768 report(extra_SPC($intra_line)) if $intra_line =~ m/\s\s\S/ && eof
771 report(extra_SPC($intra_line)) if $intra_line =~ m/\s\s\S/;
775 report("missing space before '$2'")
803report("space before '$1'") if $intra_line =~ m/[\w)\]]\s+(\+\+|--)/; # postfix ++/-- with preced…
804report("space after '$1'") if $intra_line =~ m/(\+\+|--)\s+[a-zA-Z_(]/; # prefix ++/-- with follo…
806report("space before '$1'") if $intra_line =~ m/\s(\.|->)/; # '.' or '->' with precedin…
807report("space after '$1'") if $intra_line =~ m/(\.|->)\s/; # '.' or '->' with followin…
809report("space before '$1'") if $intra_line =~ m/[^:)]\s+(;)/; # space before ';' but not …
811 report("space before '$1'") if $intra_line =~ m/\s([,)\]])/; # space before ,)]
812 report("space after '$1'") if $intra_line =~ m/([(\[~!])\s/; # space after ([~!
813report("space after '$1'") if $intra_line =~ m/(defined)\s/; # space after 'defined'
814report("missing space before '$1'") if $intra_line =~ m/\S([|\/%<>^\?])/; # |/%<>^? without prec…
816report("missing space before binary '$2'") if $intra_line =~ m/([^\s{()\[e])([+\-])/; # '+'/'-' w…
818report("missing space before binary '$1'") if $intra_line =~ m/[^\s{()\[*!]([*])/; # '*' without …
819report("missing space before binary '$1'") if $intra_line =~ m/[^\s{()\[]([&])/; # '&' without p…
820report("missing space after ternary '$1'") if $intra_line =~ m/(:)[^\s\d]/; # ':' without followin…
821report("missing space after '$1'") if $intra_line =~ m/([,;=|\/%<>^\?])\S/; # ,;=|/%<>^? without…
822report("missing space after binary '$1'") if $intra_line=~m/[^{(\[]([*])[^\sa-zA-Z_(),*]/;# '*' w/…
824report("missing space after binary '$1'") if $intra_line=~m/([&])[^\sa-zA-Z_(]/; # '&' w/o follow…
826report("missing space after binary '$1'") if $intra_line=~m/[^{(\[]([+\-])[^\s\d(]/; # +/- w/o fo…
828report("missing space after '$2'") if $intra_line =~ m/(^|\W)(if|while|for|switch|case)[^\w\s]/;…
829report("missing space after '$2'") if $intra_line =~ m/(^|\W)(return)[^\w\s;]/; # return w/o SP…
830 report("space after function/macro name")
834report("missing space before '{'") if $intra_line =~ m/[^\s{(\[]\{/; # '{' without precedin…
835report("missing space after '}'") if $intra_line =~ m/\}[^\s,;\])}]/; # '}' without followin…
862 report("code before '}'");
872 report("unexpected 'else'");
885report("code after '}'") unless $tail eq "" || $tail =~ m/(else|while|OSSL_TRACE_END)(\W|$)/;
894 report("code before '}'");
915 report("code after $keyword: ") if $2 =~ /:.*[^\s@].*$/;
970report("more than one stmt") if !m/(^|\W)(for|(OSSL_)?LIST_FOREACH(_\w+)?)(\W.*|$)/ && # no 'for' …
991report("single-letter name '$2'") if (m/(^|.*\W)([IO])(\W.*|$)/); # single-letter name 'I' or 'O' …
993 report("constant on LHS of '$3'")
1040 report("code before '$mid'") if $code_before;
1041report("code after '$mid'" ) if $tail =~ m/[^\s\@{]/# trailing non-whitespace non-comment non-'{' …
1135report("'{' not at line start") if length($head) != $preproc_offset && $head =~ m/\)\s*/; # at end…
1147report("code after '{'") if $tail=~ m/[^\s\@]/ && # trailing non-whitespace non-comment (non-'\')
1158 report("'{' not on same line as preceding '$mid'") if !$brace_after;
1166 report("missing '{' on same line after '} else'");
1180 report("'while' not on same line as preceding '}'");
1191 report("'else' not on same line as preceding '}'");
1193 report("missing '}' on same line before 'else ... {'") if $brace_after;
1196 report("missing '{' on same line after '} else'") if $brace_before && !$brace_after;
1227report("leading ".($1 eq "" ? "blank" :"whitespace")." line") if $line == 1 && !$sloppy_SPC;
1231 report("$linediff blank lines before") if $linediff > 1 && !$sloppy_SPC;
1254 report(($1 eq "\n" ? "blank line" : $2 ne "" ? "'\\'" : "whitespace")." at EOF")