To openglraw

2023-03-09 21:28:22 +00:00
parent 653de7226e
commit 9989c65d75
5 changed files with 11 additions and 16 deletions
@@ -33,7 +33,7 @@ bindShaderLayers shads counts = MV.imapM_ f shads
    f i shad = do
        let theVBO = _vaoVBO $ _shadVAO' shad
            stride = sum $ _vboAttribSizes theVBO
-        glBindBuffer GL_ARRAY_BUFFER (_vboName $ theVBO)
+        glBindBuffer GL_ARRAY_BUFFER (_vboName theVBO)
        VFSM.mapM_ (g stride theVBO) $ VFSM.enumFromStepN 0 1 6 -- [0..5]
        --S.mapM_ (g stride theVBO) $ S.each [0..5]