Start to move vbo objects to use DSA

This commit is contained in:
2023-03-09 13:17:43 +00:00
parent 9f37ed9944
commit f14d9bef60
5 changed files with 24 additions and 21 deletions
+2 -2
View File
@@ -12,7 +12,7 @@ module Shader.Data
-- | Lens functions
, vaoName
, vaoVBO
, vbo
, vboName
, vboPtr
, vboAttribSizes
, vboStride
@@ -53,7 +53,7 @@ a pointer to a location with space that can be written to the buffer,
and a list of attribute pointer sizes.
Vertex attributes are interleaved within the vbo. -}
data VBO = VBO
{ _vbo :: BufferObject
{ _vboName :: GLuint
, _vboPtr :: Ptr Float
, _vboAttribSizes :: [Int] -- ^ It is not clear to me if this is necessary to store or not
, _vboStride :: Int