diff options
| author | Joe Crayne <joe@jerkface.net> | 2019-04-21 05:16:17 -0400 |
|---|---|---|
| committer | Joe Crayne <joe@jerkface.net> | 2019-05-05 18:49:23 -0400 |
| commit | 7a54887c623c9328470a1ba302fa4b1c8373cb75 (patch) | |
| tree | 5e355fe99228bc2fefa5bf1d5831d0eec8598e2c /src/LambdaCube/GL/Util.hs | |
| parent | 3e1f789ed52e20f1ddf6e20ed9c7f61cf7aaedbd (diff) | |
Signatures, comments, dead-code removal.
Diffstat (limited to 'src/LambdaCube/GL/Util.hs')
| -rw-r--r-- | src/LambdaCube/GL/Util.hs | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/src/LambdaCube/GL/Util.hs b/src/LambdaCube/GL/Util.hs index b267c7f..fbc0f50 100644 --- a/src/LambdaCube/GL/Util.hs +++ b/src/LambdaCube/GL/Util.hs | |||
| @@ -260,7 +260,6 @@ fromGLType (t,1) | |||
| 260 | | t == GL_UNSIGNED_INT_SAMPLER_BUFFER = UTextureBuffer | 260 | | t == GL_UNSIGNED_INT_SAMPLER_BUFFER = UTextureBuffer |
| 261 | | t == GL_UNSIGNED_INT_SAMPLER_CUBE = UTextureCube | 261 | | t == GL_UNSIGNED_INT_SAMPLER_CUBE = UTextureCube |
| 262 | | otherwise = error "Failed fromGLType" | 262 | | otherwise = error "Failed fromGLType" |
| 263 | fromGLUniformType _ = error "Failed fromGLType" | ||
| 264 | 263 | ||
| 265 | printShaderLog :: GLuint -> IO String | 264 | printShaderLog :: GLuint -> IO String |
| 266 | printShaderLog o = do | 265 | printShaderLog o = do |