diff options
| author | Mathias Agopian <mathias@google.com> | 2009-05-27 20:38:06 -0700 |
|---|---|---|
| committer | Mathias Agopian <mathias@google.com> | 2009-05-27 20:38:06 -0700 |
| commit | 2820bd4eda4c75457007f11eb9d98da9bff24a27 (patch) | |
| tree | 4b076f3e7ffbe4ebf272b2d9b6733b3ac86f9988 /opengl/libs/tools/glapigen | |
| parent | f5fbc7983a85f42ec891decbae3581185c8428ab (diff) | |
| download | frameworks_base-2820bd4eda4c75457007f11eb9d98da9bff24a27.zip frameworks_base-2820bd4eda4c75457007f11eb9d98da9bff24a27.tar.gz frameworks_base-2820bd4eda4c75457007f11eb9d98da9bff24a27.tar.bz2 | |
Added most of the support needed for GLES 2.x
Diffstat (limited to 'opengl/libs/tools/glapigen')
| -rwxr-xr-x | opengl/libs/tools/glapigen | 15 |
1 files changed, 11 insertions, 4 deletions
diff --git a/opengl/libs/tools/glapigen b/opengl/libs/tools/glapigen index a2c3a7b..bd8dda3 100755 --- a/opengl/libs/tools/glapigen +++ b/opengl/libs/tools/glapigen @@ -16,16 +16,23 @@ use strict; +sub rtrim($) +{ + my $string = shift; + $string =~ s/\s+$//; + return $string; +} + while (my $line = <>) { next if $line =~ /^\//; next if $line =~ /^#/; next if $line =~ /^\s*$/; - if ($line !~ /^GL_API\s+(.+)\s+GL_APIENTRY\s+([\w]+)\s*\(([^\)]+)\);/) { + if ($line !~ /^GL_API(CALL)?\s+(.+)\s+GL_APIENTRY\s+([\w]+)\s*\(([^\)]+)\);/) { next; } - my $type = $1; - my $name = $2; - my $args = $3; + my $type = rtrim($2); + my $name = $3; + my $args = $4; #printf("%s", $line); |