ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/OpenCL/gengetinfo
(Generate patch)

Comparing OpenCL/gengetinfo (file contents):
Revision 1.9 by root, Thu Apr 19 14:36:46 2012 UTC vs.
Revision 1.10 by root, Sat Apr 21 19:53:29 2012 UTC

… …
87 my @funcs; 87 my @funcs;
88 my %alias; 88 my %alias;
89 89
90 while (<$fh>) { 90 while (<$fh>) {
91 chomp; 91 chomp;
92 my ($class, $name, $ctype) = split /,\s*/, $_, 3; 92 my ($class, $name, $ctype) = split /\s*,\s*/, $_, 3;
93 next unless $class eq "cl_$CLASS\_info"; 93 next unless $class eq "cl_$CLASS\_info";
94 next if $name eq "CL_IMAGE_FORMAT"; # struct 94 next if $name eq "CL_IMAGE_FORMAT"; # struct
95 next if $name eq "CL_PROGRAM_BINARIES"; # needs multiple calls 95 next if $name eq "CL_PROGRAM_BINARIES"; # needs multiple calls
96 96
97 $ctype =~ s/cl:://g; 97 $ctype =~ s/cl:://g;

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines