Move toward implementing chasms

2025-07-30 00:01:07 +01:00
parent fa377171a4
commit 210171fbc9
10 changed files with 327 additions and 317 deletions
@@ -120,10 +120,10 @@ setupVBOStatic vertexsize = do
    -- Allocate space
    glNamedBufferData
        vboname
-        (fromIntegral $ floatSize * numDrawableVertices * vertexsize)
+        (fromIntegral $ numDrawableVertices * vertexsize)
        nullPtr
        GL_STATIC_DRAW
-    return VBO{_vboName = vboname, _vboPtr = thePtr, _vboVertexBytes = floatSize * vertexsize}
+    return VBO{_vboName = vboname, _vboPtr = thePtr, _vboVertexBytes = vertexsize}

 makeByteStringShaderUsingVAO ::
    -- | (Arbitrary) name of the shader