Home | History | Annotate | Download | only in Scripts

Lines Matching refs:line

41     $filename =~ m/^(\w+)\.h$/ or die "Command line args must be .h files.\n";
51 while (my $line = <OLDFILE>) {
53 $classDefs{$currentClassName} .= $line;
54 if ($line =~ /^$classIndent};\s*$/) {
58 if ($line =~ /^(\s*)class\s+(\w+)\s+[^;]*$/) {
61 $classDefs{$currentClassName} .= $line;
64 $fileContent .= $line;
96 foreach my $line (@lines) {
97 if ($line =~ /^###CLASS###(\w+)/) {
102 print NEWHEADER $line . "\n";
114 while (my $line = <OLDCPP>) {
117 print NEWCPP $line;
118 #setPreviousAllowedLine($line);
120 ignoringLine($line);
122 if ($line =~ /^}\s*$/) {
125 } elsif ($line =~ /$filename/) {
128 } elsif ($line =~ /#include/ || $line =~ /#import/) {
131 $line =~ s/DOM:://;
132 $line =~ s/khtml:://;
133 $line =~ s/namespace DOM/namespace WebCore/;
134 $line =~ s/namespace khtml/namespace WebCore/;
136 if ($line =~ /^(.*?\s+)?(\*|&)?(\w+)::(~)?\w+\s*\(/) {
140 printPendingEmptyLines(*NEWCPP, $line);
141 print NEWCPP $line;
144 next if isOnlyWhiteSpace($line);
145 next if ($line =~ m/------------/);
146 printPendingEmptyLines(*NEWCPP, $line);
147 applySpacingHeuristicsAndPrint(*NEWCPP, $line);