Lines Matching refs:res
1489 my $res = '';
1493 $res .= ' ';
1496 $res .= ' ';
1500 $res .= $c;
1504 return $res;
1507 (my $res = shift) =~ tr/\t/ /c;
1508 return $res;
1538 my $res = '';
1546 $res = substr($line, 0, 1);
1556 substr($res, $off, 2, "$;$;");
1562 substr($res, $off, 2, "$;$;");
1569 substr($res, $off, 2, $sanitise_quote);
1577 substr($res, $off, 2, 'XX');
1586 substr($res, $off, 1, $c);
1595 substr($res, $off, 1, $;);
1597 substr($res, $off, 1, $;);
1599 substr($res, $off, 1, 'X');
1601 substr($res, $off, 1, $c);
1610 if ($res =~ /^.\s*\#\s*include\s+\<(.*)\>/) {
1612 $res =~ s@\<.*\>@<$clean>@;
1615 } elsif ($res =~ /^.\s*\#\s*(?:error|warning)\s+(.*)\b/) {
1617 $res =~ s@(\#\s*(?:error|warning)\s+).*@$1$clean@;
1620 if ($allow_c99_comments && $res =~ m@(//.*$)@) {
1622 $res =~ s/\Q$match\E/"$;" x length($match)/e;
1625 return $res;
1849 my @res = ();
1884 push(@res, $rawlines[$line]);
1890 return ($level, @res);
2011 my ($res, $coded);
2013 $res = '';
2015 $res .= $1;
2018 $res .= $coded;
2021 $res =~ s/$/\$/;
2023 return $res;
2041 my $res;
2195 substr($var, length($res), 1, $av_pend_colon);
2217 substr($var, length($res), 1, $variant);
2231 $res .= $type x length($1);
2235 return ($res, $var);