Cleanup
This commit is contained in:
@@ -1,6 +1,5 @@
|
||||
module Render (
|
||||
createLightMap,
|
||||
renderFoldable,
|
||||
renderLayer,
|
||||
pingPongBetween,
|
||||
bindTO,
|
||||
@@ -351,16 +350,6 @@ pingPongBetween (fb1, to1) (fb2, to2) fs = do
|
||||
glBindTexture GL_TEXTURE_2D (_unTO to2)
|
||||
drawShader fs 4
|
||||
|
||||
renderFoldable ::
|
||||
MV.MVector (PrimState IO) (Shader,VBO) ->
|
||||
Picture ->
|
||||
IO ()
|
||||
renderFoldable shadV struct = do
|
||||
counts <- UMV.replicate 6 0
|
||||
pokeBindFoldable shadV counts struct
|
||||
MV.imapM_ (drawShaderLay 0 counts) shadV
|
||||
|
||||
------------------------------end renderFoldable
|
||||
renderLayer ::
|
||||
Layer ->
|
||||
MV.MVector (PrimState IO) (Shader,VBO) ->
|
||||
|
||||
Reference in New Issue
Block a user