opengl32: Declare input pointers as const in function prototypes.

This commit is contained in:
Alexandre Julliard 2012-07-19 22:17:14 +02:00
parent 6a8ded433b
commit 782e96b910
4 changed files with 1992 additions and 1991 deletions

View File

@ -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