Index: webkit/port/bindings/scripts/IDLParser.pm |
=================================================================== |
--- webkit/port/bindings/scripts/IDLParser.pm (revision 2436) |
+++ webkit/port/bindings/scripts/IDLParser.pm (working copy) |
@@ -41,6 +41,8 @@ |
my $beQuiet; # Should not display anything on STDOUT? |
my $document = 0; # Will hold the resulting 'idlDocument' |
+my $directive = ""; |
+ |
# Default Constructor |
sub new |
{ |
@@ -54,6 +56,18 @@ |
return $reference; |
} |
+ |
+sub ParseInheritance |
Mads Ager (chromium)
2008/09/23 06:45:09
Add a one line comment stating what the return val
|
+{ |
+ my $object = shift; |
+ my $fileName = shift; |
+ my $defines = shift; |
+ my $preprocessor = shift; |
+ |
+ $directive = "inheritance"; |
+ return $object->ParseImpl($fileName, $defines, $preprocessor); |
+} |
+ |
# Returns the parsed 'idlDocument' |
sub Parse |
{ |
@@ -62,6 +76,17 @@ |
my $defines = shift; |
my $preprocessor = shift; |
+ $directive = ""; |
+ return $object->ParseImpl($fileName, $defines, $preprocessor); |
+} |
+ |
+sub ParseImpl |
+{ |
+ my $object = shift; |
+ my $fileName = shift; |
+ my $defines = shift; |
+ my $preprocessor = shift; |
+ |
if (!$preprocessor) { |
$preprocessor = "/usr/bin/gcc -E -P -x c++"; |
} |
@@ -238,6 +263,8 @@ |
push(@$arrayRef, $line); |
} |
+ return if ($directive eq "inheritance"); |
+ |
$interfaceData =~ s/[\n\r]/ /g; |
my @interfaceMethods = split(/;/, $interfaceData); |