Lines Matching refs:LINE
32 while (my $LINE = <>) {
35 if ($LINE =~ /^.*?\*\/(.*)$/) {
36 $LINE = $1;
45 $LINE =~ s/^(.*?)\/\/.*$/$1/;
48 while ($LINE =~ /\/\*.*?\*\//) {
49 $LINE =~ s/\/\*.*?\*\///;
53 if ($LINE =~ /^(.*)\/\*/) {
55 $LINE = $1;
59 next if $LINE =~ /^\s*$/;
62 $LINE =~ s/^\s*(.*)$/$1/;
65 while ($LINE =~ /^(.*?)\s+\\$/) {
67 $LINE = $1;
69 $LINE .= " " . $LINE2;
73 next if ($LINE =~ /^#/);
75 if ($LINE =~ /^extern\s+"C"\s+\{/) {
80 if (($LINE =~ /^[^\{]*\}/) and $extern_C_block) {
85 $LINE =~ s/^extern\s//;
89 my $REST = $LINE;
110 chomp($LINE);
111 $LINE .= " " . $LINE2;
122 $REST = $LINE;
143 chomp($LINE);
144 $LINE .= " " . $LINE2;
154 next if ($LINE =~ /^typedef\s/);
155 next if ($LINE =~ /^enum\s+[^\{\(]+\s+\{/);
156 next if ($LINE =~ /^struct\s+[^\{\(]+\s+\{.*\}\s*;/);
157 next if ($LINE =~ /^struct\s+[a-zA-Z0-9_]+\s*;/);
160 $LINE =~ s/(.*?)\s*$/$1/;
162 $LINE =~ s/^(.*\))\s+PRINTF_ATTRIBUTE\([^\)]*\)(\s*[;,])/$1$2/;
163 $LINE =~ s/^(.*\))\s*[a-zA-Z0-9_]+\s*;$/$1;/;
166 $LINE =~ s/([\s\(]\*?)[_0-9a-zA-Z]+\s*([,\)])/$1$2/g;
169 $LINE =~ s/\(\)/(void)/g;
172 $LINE =~ s/\s*\)\s*/)/g;
173 $LINE =~ s/\s*\(\s*/ (/g;
174 $LINE =~ s/\s*,\s*/, /g;
177 $LINE =~ s/([\s,\(])unsigned([,\)])/$1unsigned int$2/g;
180 $LINE =~ s/(\b)bool(\b)/_Bool/g;
182 print $LINE . "\n";