Tweak rendering
This commit is contained in:
@@ -32,15 +32,17 @@ resizeSpareFBO xsize ysize xfull yfull pdata = do
|
||||
bindRenderbuffer Renderbuffer $= fboRBO
|
||||
renderbufferStorage Renderbuffer Depth24Stencil8 (RenderbufferSize xsize' ysize')
|
||||
framebufferRenderbuffer Framebuffer DepthStencilAttachment Renderbuffer fboRBO
|
||||
|
||||
fboStatus <- framebufferStatus Framebuffer
|
||||
putStrLn $ "after resize, framebuffer status:" ++ show fboStatus
|
||||
|
||||
resizeTextureFBO (_fbo2 rdata) xfull yfull
|
||||
resizeTextureFBO (_fbo3 rdata) xfull yfull
|
||||
|
||||
resizeRBO (snd $ _fbos rdata) xfull yfull
|
||||
mapM_ (\p -> resizeFBOTO p xfull yfull) (fst $ _fbos rdata)
|
||||
resizeRBO (_rboBaseBloom rdata) xfull yfull
|
||||
resizeFBOTO (_fboBase rdata) xfull yfull
|
||||
resizeFBOTO (_fboBloom rdata) xfull yfull
|
||||
resizeRBO (_rboLighting rdata) xsize ysize
|
||||
resizeFBOTO (_fboLighting rdata) xsize ysize
|
||||
|
||||
return pdata
|
||||
|
||||
|
||||
Reference in New Issue
Block a user