Commit b6ecde4e authored by hausmann's avatar hausmann
Browse files

Relax the regular expression that tries to find constant declarations in the...

Relax the regular expression that tries to find constant declarations in the IDL source to not require leading whitespace. This makes it work with preprocessors that happen to eliminate leading whitespace.


git-svn-id: http://svn.webkit.org/repository/webkit/trunk@24680 268f45cc-cd09-0410-ab3c-d52691b4dbfc
parent 6841ae32
2007-07-27 Simon Hausmann <hausmann@kde.org>
Done with and reviewed by Lars and Zack.
Relax the regular expression that tries to find constant declarations in the IDL source to not require leading whitespace. This makes it work with preprocessors that happen to eliminate leading whitespace.
* bindings/scripts/IDLParser.pm:
2007-07-27 Simon Hausmann <hausmann@kde.org>
 
Done with and reviewed by Lars and Zack.
......@@ -277,7 +277,7 @@ sub ParseInterface
$setterException =~ s/\s+//g;
@{$newDataNode->getterExceptions} = split(/,/, $getterException);
@{$newDataNode->setterExceptions} = split(/,/, $setterException);
} elsif (($line !~ s/^\s*$//g) and ($line !~ /^\s+const/)) {
} elsif (($line !~ s/^\s*$//g) and ($line !~ /^\s*const/)) {
$line =~ /$IDLStructure::interfaceMethodSelector/ or die "Parsing error!\nSource:\n$line\n)";
my $methodExtendedAttributes = (defined($1) ? $1 : " "); chop($methodExtendedAttributes);
......@@ -326,7 +326,7 @@ sub ParseInterface
my $arrayRef = $dataNode->functions;
push(@$arrayRef, $newDataNode);
} elsif ($line =~ /^\s+const/) {
} elsif ($line =~ /^\s*const/) {
$line =~ /$IDLStructure::constantSelector/;
my $constType = (defined($1) ? $1 : die("Parsing error!\nSource:\n$line\n)"));
my $constName = (defined($2) ? $2 : die("Parsing error!\nSource:\n$line\n)"));
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment