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:
parent
fde563b0d4
commit
74979b0660
|
@ -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];
|
||||||
|
|
Loading…
Reference in New Issue