Lines Matching refs:_
40 my ($f)=@_;
50 if($_ !~ /.*?\*\/\s*(.*)$/) {
53 $_ = $1;
58 $_ = "$line $1";
61 if($_ =~ /^(.*)\\$/) {
66 while($_ =~ /^(.*?)\/\*.*?\*\/(.*)$/) {
67 $_ = "$1 $2";
69 if($_ =~ /^(.*)\/\*/) {
70 $_ = "$1 ";
75 if($_ =~ /^(?:#|$)/) {
79 if($_ !~ /[;,{}]$/ || $_ =~ /[^)],$/) {
81 $line = $_;
85 if($_ =~ /CURLOPT(?:DEPRECATED)?\s*\(\s*([^, \t]+)\s*,\s*CURLOPTTYPE_STRINGPOINT/) {
95 my ($f)=@_;
101 if($_ =~ /(BEGIN|END) TRANSLATABLE STRING OPTIONS/) {
104 elsif($inarmor && $_ =~ /case\s+([^:]+):/) {
125 delete $diff{$_};
