Cleanup
This commit is contained in:
@@ -192,12 +192,7 @@ resizeFBOTO ::
|
|||||||
GLenum ->
|
GLenum ->
|
||||||
(FBO, TO) ->
|
(FBO, TO) ->
|
||||||
IO (FBO, TO)
|
IO (FBO, TO)
|
||||||
resizeFBOTO wsize minfilt magfilt form (fbo, oldto) = do
|
resizeFBOTO wsize = resizeFBOTO' wsize 1
|
||||||
glBindFramebuffer GL_FRAMEBUFFER (_unFBO fbo)
|
|
||||||
mglDelete glDeleteTextures $ _unTO oldto
|
|
||||||
to1 <- initializeTexture2D fbo GL_COLOR_ATTACHMENT0 wsize 1 minfilt magfilt form
|
|
||||||
checkFBO fbo
|
|
||||||
return (fbo, TO to1)
|
|
||||||
|
|
||||||
resizeFBOTO' ::
|
resizeFBOTO' ::
|
||||||
V2 Int ->
|
V2 Int ->
|
||||||
|
|||||||
Reference in New Issue
Block a user