restore type hack for glGetString.xml typo

* figl/gl/types.scm (const-GLubyte*): Restore this redundant type to
  work around a typo in glGetString.xml.

diff --git a/figl/gl/types.scm b/figl/gl/types.scm
index cb8f3ef..1d14450 100644 (file)
--- a/figl/gl/types.scm
+++ b/figl/gl/types.scm
@@ -64,6 +64,7 @@
             const-GLboolean-*
             const-GLbyte-*
             const-GLubyte-*
+            const-GLubyte*
             const-GLchar-*
             const-GLchar-**
             const-GLshort-*
@@ -159,3 +160,6 @@
 (define-simple-foreign-type GLvoid-** '*)
 (define-simple-foreign-type const-GLchar-** '*)
 (define-simple-foreign-type const-GLvoid-** '*)
+
+;; TODO: Hacked for a typo in glGetString.xml.
+(define-array-foreign-type const-GLubyte* GLubyte)