Lines Matching refs:report
241 sub report { subroutine
297 report("indent = $count != $comment_indent within multi-line comment")
301 … report("indent = ".($count + $tweak)." != $comment_indent at end of multi-line comment")
335 report("intra-line comment indent = $count != $ref_indent") if $in_comment == 0;
336 report("multi-line comment indent = $count != $ref_indent") if $in_comment < 0;
354 report("indent = $count != $ref_indent for $ref_desc".
420 report("unexpected '$c' @ ".($in_paren_expr ? "(expr)" : "expr"));
426 report("unexpected '}'");
436 report("code after (expr)")
449 report("unclosed '$symbol' in $position");
474 report(($2 eq "\x09" ? "TAB" : $2 eq "\x0D" ? "CR " : $2 =~ m/[\x00-\x1F]/ ? "non-printable"
479 report("trailing whitespace at EOL") if m/\s\n$/;
498 report("multi-line string literal not terminated by '\"' and trailing '\' is missing")
523 …report("missing space or '*' after leading '*' in multi-line comment") if $cmt_text =~ m|^[^*\s/$s…
525 report("missing leading '*' in multi-line comment");
532 report("neither space nor '*' before '*/'") if $head =~ m/[^*\s]$/;
533 … report("missing space after '*/'") if $tail =~ m/^[^\s,;)}\]]/; # no space or ,;)}] after '*/'
536 report("unexpected '*/' outside comment");
539 … report("text before '*/' in multi-line comment") if ($head =~ m/[^*\s]/); # non-SPC before '*/'
556 report("missing space before '/*'")
558 …report("missing space, '*' or '!' after '/*' or '/*-'") if $tail =~ m/^[^*\s!$self_test_exception]…
561 report("unexpected '/*' inside multi-line comment");
563 report("unexpected '/*' inside intra-line comment") if $1 =~ /\/\*/;
570 report("text after '/*' in multi-line comment")
603 report("line length = $len > ".MAX_LINE_LENGTH);
608 report("'//' end-of-line comment"); # the '//' comment style is not allowed for C90
658 report(extra_SPC($intra_line)) if $intra_line =~ m/\s\s\S/ && eof
661 report(extra_SPC($intra_line)) if $intra_line =~ m/\s\s\S/;
683 …report("space before '$1'") if $intra_line =~ m/[\w)\]]\s+(\+\+|--)/; # postfix ++/-- with preced…
684 …report("space after '$1'") if $intra_line =~ m/(\+\+|--)\s+[a-zA-Z_(]/; # prefix ++/-- with follo…
686 …report("space before '$1'") if $intra_line =~ m/\s(\.|->)/; # '.' or '->' with precedin…
687 …report("space after '$1'") if $intra_line =~ m/(\.|->)\s/; # '.' or '->' with followin…
689 …report("space before '$1'") if $intra_line =~ m/[^:)]\s+(;)/; # space before ';' but not …
690 report("space before '$1'") if $intra_line =~ m/\s([,)\]])/; # space before ,)]
691 report("space after '$1'") if $intra_line =~ m/([(\[~!])\s/; # space after ([~!
692 … report("space after '$1'") if $intra_line =~ m/(defined)\s/; # space after 'defined'
693 …report("missing space before '=' or '<op>='") if $intra_line =~ m/\S(=)/; # '=' etc. without pre…
694 …report("missing space before '$1'") if $intra_line =~ m/\S([|\/%<>^\?])/; # |/%<>^? without prec…
696 …report("missing space before binary '$2'") if $intra_line =~ m/([^\s{()\[e])([+\-])/; # '+'/'-' w…
698 …report("missing space before binary '$1'") if $intra_line =~ m/[^\s{()\[*!]([*])/; # '*' without …
699 …report("missing space before binary '$1'") if $intra_line =~ m/[^\s{()\[]([&])/; # '&' without p…
700 …report("missing space after ternary '$1'") if $intra_line =~ m/(:)[^\s\d]/; # ':' without followin…
701 …report("missing space after '$1'") if $intra_line =~ m/([,;=|\/%<>^\?])\S/; # ,;=|/%<>^? without…
702 …report("missing space after binary '$1'") if $intra_line=~m/[^{(\[]([*])[^\sa-zA-Z_(),*]/;# '*' w/…
704 …report("missing space after binary '$1'") if $intra_line=~m/([&])[^\sa-zA-Z_(]/; # '&' w/o follow…
706 …report("missing space after binary '$1'") if $intra_line=~m/[^{(\[]([+\-])[^\s\d(]/; # +/- w/o fo…
708 …report("missing space after '$2'") if $intra_line =~ m/(^|\W)(if|while|for|switch|case)[^\w\s]/;…
709 …report("missing space after '$2'") if $intra_line =~ m/(^|\W)(return)[^\w\s;]/; # return w/o SP…
710 report("space after function/macro name")
716 …report("missing space before '{'") if $intra_line =~ m/[^\s{(\[]\{/; # '{' without precedin…
717 …report("missing space after '}'") if $intra_line =~ m/\}[^\s,;\])}]/; # '}' without followin…
726 report("indent = $count != 0 for '#'") if $count != 0;
730 report("unexpected '#$directive'");
732 …report("'#' directive nesting = $space_count != $directive_nesting") if $space_count != $directive…
764 report("code before '}'");
774 report("unexpected 'else'");
787 … report("code after '}'") unless $tail eq "" || $tail =~ m/(else|while|OSSL_TRACE_END)(\W|$)/;
796 report("code before '}'");
817 report("code after $keyword: ") if $2 =~ /:.*[^\s@].*$/;
872 report("more than one stmt") if !m/(^|\W)for(\W.*|$)/ && # no 'for' - TODO improve matching
890 …report("single-letter name '$2'") if (m/(^|.*\W)([IO])(\W.*|$)/); # single-letter name 'I' or 'O' …
892 report("constant on LHS of '$3'")
941 report("code before '$mid'") if $code_before;
942 …report("code after '$mid'" ) if $tail =~ m/[^\s\@{]/# trailing non-whitespace non-comment non-'{' …
1036 report("'{' not at beginning") if $head ne "";
1048 … report("code after '{'") if $tail=~ m/[^\s\@]/ && # trailing non-whitespace non-comment (non-'\')
1059 report("'{' not on same line as preceding '$mid'") if !$brace_after;
1067 report("missing '{' on same line after '} else'");
1081 report("'while' not on same line as preceding '}'");
1092 report("'else' not on same line as preceding '}'");
1094 report("missing '}' on same line before 'else ... {'") if $brace_after;
1097 report("missing '{' on same line after '} else'") if $brace_before && !$brace_after;
1132 … report("leading ".($1 eq "" ? "blank" :"whitespace")." line") if $line == 1 && !$sloppy_SPC;
1136 report("$linediff blank lines before") if $linediff > 1 && !$sloppy_SPC;
1159 report(($1 eq "\n" ? "blank line" : $2 ne "" ? "'\\'" : "whitespace")." at EOF")