maxTextureUnit bug

Csaba Hruska <[email protected]> Wed, 9 Sep 2009 08:35:43 +0200

Newsgroups	gmane.comp.lang.haskell.hopengl
Message-ID	<[email protected]>

Hi!

I've found a bug in gl binding.
The unmarshal function is wrong, because in this case there is no
gl_TEXTURE0 offset.

            maxTextureUnit :: GettableStateVar TextureUnit
            maxTextureUnit =
               makeGettableStateVar (getEnum1 unmarshalTextureUnit
GetMaxTextureUnits)

            unmarshalTextureUnit :: GLenum -> TextureUnit
            unmarshalTextureUnit x = TextureUnit (fromIntegral (x -
gl_TEXTURE0))

Cheers,
Csaba Hruska

_______________________________________________
HOpenGL mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/hopengl