Draw floors using vertex pulling

2025-11-13 22:22:19 +00:00
parent 836c0ba772
commit cffa75c014
8 changed files with 34 additions and 34 deletions
@@ -155,13 +155,9 @@ doDrawing' win pdata u = do
        glNamedFramebufferDrawBuffers (pdata ^. fboBase . _1 . unFBO) 3
    glDepthMask GL_TRUE
    --draw floor onto base buffer
-    glUseProgram (pdata ^. floorShader . shaderUINT)
-    glBindVertexArray $ pdata ^. floorShader . shaderVAO . vaoName
+    glUseProgram (pdata ^. floorShader)
    glStencilFunc GL_EQUAL 0 255
-    glDrawArrays
-        (_unPrimitiveMode $ pdata ^. floorShader . shaderPrimitive)
-        0
-        (fromIntegral nFls)
+    glDrawArrays GL_TRIANGLES 0 (fromIntegral nFls)
    --glDisable GL_STENCIL_TEST
    glDisable GL_CULL_FACE
    glEnable GL_BLEND