opengl32: Declare input pointers as const in function prototypes.
This commit is contained in:
parent
6a8ded433b
commit
782e96b910
|
@ -617,7 +617,7 @@ while (my $line = <REGISTRY>) {
|
||||||
} elsif ($line =~ /^\t*category/) {
|
} elsif ($line =~ /^\t*category/) {
|
||||||
($category) = ($line =~ /^\t*category\s*([\w-]*)/);
|
($category) = ($line =~ /^\t*category\s*([\w-]*)/);
|
||||||
} elsif ($line =~ /^\t*param/) {
|
} elsif ($line =~ /^\t*param/) {
|
||||||
my ($name, $base_type, $ext) = ($line =~ /\t*param\s*(\w*)\s*(\w*) (.*)/);
|
my ($name, $base_type, $dir, $ext) = ($line =~ /\t*param\s*(\w*)\s*(\w*) (in|out)\s+(.*)/);
|
||||||
my $ptr = 0;
|
my $ptr = 0;
|
||||||
unless (defined($name)) {
|
unless (defined($name)) {
|
||||||
chomp $line;
|
chomp $line;
|
||||||
|
@ -644,7 +644,8 @@ while (my $line = <REGISTRY>) {
|
||||||
die "Unsupported return type in function $funcname for type $base_type (line $line)\n";
|
die "Unsupported return type in function $funcname for type $base_type (line $line)\n";
|
||||||
}
|
}
|
||||||
if ($ptr) {
|
if ($ptr) {
|
||||||
$type = "$type*";
|
$type .= "*";
|
||||||
|
$type = "const $type" if $dir eq "in";
|
||||||
}
|
}
|
||||||
|
|
||||||
$arg_types{$name} = $type;
|
$arg_types{$name} = $type;
|
||||||
|
|
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
File diff suppressed because it is too large
Load Diff
Loading…
Reference in New Issue