ReceiveTempSMS
/
Sweden-Number
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

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
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
dlls/opencl/make_opencl
View File

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