tools: Fix spelling of a variable name.

Signed-off-by: Francois Gouget <fgouget@free.fr>
Signed-off-by: Alexandre Julliard <julliard@winehq.org>
This commit is contained in:
Francois Gouget 2016-04-13 19:20:52 +02:00 committed by Alexandre Julliard
parent fde563b0d4
commit 74979b0660
1 changed files with 2 additions and 2 deletions

View File

@ -320,14 +320,14 @@ sub _check_statements($$$) {
if($first_debug_message && $called_name =~ /^(?:FIXME|TRACE)$/) { if($first_debug_message && $called_name =~ /^(?:FIXME|TRACE)$/) {
$first_debug_message = 0; $first_debug_message = 0;
if($called_arguments =~ /^\"\((.*?)\)(.*?)\"\s*,\s*(.*?)$/) { if($called_arguments =~ /^\"\((.*?)\)(.*?)\"\s*,\s*(.*?)$/) {
my $formating = $1; my $formatting = $1;
my $extra = $2; my $extra = $2;
my $arguments = $3; my $arguments = $3;
my $format; my $format;
my $argument; my $argument;
my $n = 0; my $n = 0;
while($formating && ($formating =~ s/^([^,]*),?//, $format = $1, $format =~ s/^\s*(.*?)\s*$/$1/) && while($formatting && ($formatting =~ s/^([^,]*),?//, $format = $1, $format =~ s/^\s*(.*?)\s*$/$1/) &&
$arguments && ($arguments =~ s/^([^,]*),?//, $argument = $1, $argument =~ s/^\s*(.*?)\s*$/$1/)) $arguments && ($arguments =~ s/^([^,]*),?//, $argument = $1, $argument =~ s/^\s*(.*?)\s*$/$1/))
{ {
my $type = @{$function->argument_types}[$n]; my $type = @{$function->argument_types}[$n];