Lines Matching refs:res
1210 my $res = '';
1214 $res .= ' ';
1217 $res .= ' ';
1221 $res .= $c;
1225 return $res;
1228 (my $res = shift) =~ tr/\t/ /c;
1229 return $res;
1259 my $res = '';
1267 $res = substr($line, 0, 1);
1277 substr($res, $off, 2, "$;$;");
1283 substr($res, $off, 2, "$;$;");
1290 substr($res, $off, 2, $sanitise_quote);
1298 substr($res, $off, 2, 'XX');
1307 substr($res, $off, 1, $c);
1316 substr($res, $off, 1, $;);
1318 substr($res, $off, 1, $;);
1320 substr($res, $off, 1, 'X');
1322 substr($res, $off, 1, $c);
1331 if ($res =~ /^.\s*\#\s*include\s+\<(.*)\>/) {
1333 $res =~ s@\<.*\>@<$clean>@;
1336 } elsif ($res =~ /^.\s*\#\s*(?:error|warning)\s+(.*)\b/) {
1338 $res =~ s@(\#\s*(?:error|warning)\s+).*@$1$clean@;
1341 if ($allow_c99_comments && $res =~ m@(//.*$)@) {
1343 $res =~ s/\Q$match\E/"$;" x length($match)/e;
1346 return $res;
1570 my @res = ();
1605 push(@res, $rawlines[$line]);
1611 return ($level, @res);
1724 my ($res, $coded);
1726 $res = '';
1728 $res .= $1;
1731 $res .= $coded;
1734 $res =~ s/$/\$/;
1736 return $res;
1754 my $res;
1908 substr($var, length($res), 1, $av_pend_colon);
1930 substr($var, length($res), 1, $variant);
1944 $res .= $type x length($1);
1948 return ($res, $var);