Draw chasms using vertex pulling

2025-11-13 21:58:40 +00:00
parent ec1216e7eb
commit 836c0ba772
6 changed files with 25 additions and 22 deletions
@@ -145,16 +145,12 @@ doDrawing' win pdata u = do
    glUseProgram fs
    glDrawArrays GL_TRIANGLES 0 (fromIntegral nIndices)
    -- draw chasm shader blocking floor
-    glUseProgram (pdata ^. chasmShader . shaderUINT)
-    glBindVertexArray $ pdata ^. chasmShader . shaderVAO . vaoName
+    glUseProgram (pdata ^. chasmShader)
    glDepthMask GL_FALSE
    glDrawBuffer GL_NONE
    glStencilOp GL_KEEP GL_KEEP GL_INCR
    with 0 $ glClearNamedFramebufferiv (pdata ^. fboBase . _1 . unFBO) GL_STENCIL 0
-    glDrawArrays
-        (_unPrimitiveMode $ pdata ^. chasmShader . shaderPrimitive)
-        0
-        (fromIntegral nchs)
+    glDrawArrays GL_TRIANGLES 0 (fromIntegral nchs)
    withArray [GL_COLOR_ATTACHMENT0, GL_COLOR_ATTACHMENT1, GL_COLOR_ATTACHMENT2] $
        glNamedFramebufferDrawBuffers (pdata ^. fboBase . _1 . unFBO) 3
    glDepthMask GL_TRUE