opencl: Rename cl_{enums,types} to header_{enums,types}.

Signed-off-by: Zebediah Figura <zfigura@codeweavers.com>
Signed-off-by: Alexandre Julliard <julliard@winehq.org>
This commit is contained in:
Zebediah Figura 2022-02-03 15:08:14 -06:00 committed by Alexandre Julliard
parent d6ea38f32d
commit 2a35d9a4c5
1 changed files with 9 additions and 9 deletions

View File

@ -297,8 +297,8 @@ sub generate_spec_entry($$)
}
my %core_functions;
my %cl_enums;
my (%cl_types, @cl_types); # also use an array to preserve declaration order
my %header_enums;
my (%header_types, @header_types); # also use an array to preserve declaration order
# some functions need a hand-written wrapper
sub needs_pe_wrapper($)
@ -440,13 +440,13 @@ sub parse_file($)
}
foreach my $enum ($feature->findnodes("./require/enum"))
{
$cl_enums{$enum->{name}} = $enums{$enum->{name}};
$header_enums{$enum->{name}} = $enums{$enum->{name}};
}
foreach my $type ($feature->findnodes("./require/type"))
{
next unless $types{$type->{name}};
push @cl_types, $type->{name} unless $cl_types{$type->{name}};
$cl_types{$type->{name}} = $types{$type->{name}};
push @header_types, $type->{name} unless $header_types{$type->{name}};
$header_types{$type->{name}} = $types{$type->{name}};
}
}
@ -588,9 +588,9 @@ typedef uint64_t DECLSPEC_ALIGN(8) cl_ulong;
END
;
foreach (@cl_types)
foreach (@header_types)
{
my $type = $cl_types{$_};
my $type = $header_types{$_};
if ($type->{category} eq "define")
{
print TYPES $type->textContent() . "\n";
@ -603,9 +603,9 @@ foreach (@cl_types)
print TYPES "\n";
foreach (sort keys %cl_enums)
foreach (sort keys %header_enums)
{
printf TYPES "#define %s %s\n", $_, $cl_enums{$_};
printf TYPES "#define %s %s\n", $_, $header_enums{$_};
}
close(TYPES);