Lines Matching refs:res
1539 my $res = '';
1543 $res .= ' ';
1546 $res .= ' ';
1550 $res .= $c;
1554 return $res;
1557 (my $res = shift) =~ tr/\t/ /c;
1558 return $res;
1588 my $res = '';
1596 $res = substr($line, 0, 1);
1606 substr($res, $off, 2, "$;$;");
1612 substr($res, $off, 2, "$;$;");
1619 substr($res, $off, 2, $sanitise_quote);
1627 substr($res, $off, 2, 'XX');
1636 substr($res, $off, 1, $c);
1645 substr($res, $off, 1, $;);
1647 substr($res, $off, 1, $;);
1649 substr($res, $off, 1, 'X');
1651 substr($res, $off, 1, $c);
1660 if ($res =~ /^.\s*\#\s*include\s+\<(.*)\>/) {
1662 $res =~ s@\<.*\>@<$clean>@;
1665 } elsif ($res =~ /^.\s*\#\s*(?:error|warning)\s+(.*)\b/) {
1667 $res =~ s@(\#\s*(?:error|warning)\s+).*@$1$clean@;
1670 if ($allow_c99_comments && $res =~ m@(//.*$)@) {
1672 $res =~ s/\Q$match\E/"$;" x length($match)/e;
1675 return $res;
1899 my @res = ();
1934 push(@res, $rawlines[$line]);
1940 return ($level, @res);
2061 my ($res, $coded);
2063 $res = '';
2065 $res .= $1;
2068 $res .= $coded;
2071 $res =~ s/$/\$/;
2073 return $res;
2091 my $res;
2245 substr($var, length($res), 1, $av_pend_colon);
2267 substr($var, length($res), 1, $variant);
2281 $res .= $type x length($1);
2285 return ($res, $var);