Start to separate VAO and VBO data types

This commit is contained in:
2023-03-14 12:38:43 +00:00
parent bfd079ed2a
commit 35f401d8c8
3 changed files with 16 additions and 6 deletions
+5
View File
@@ -12,6 +12,9 @@ module Shader.Data
-- | Lens functions
, vaoName
, vaoVBO
, vaoAttribSizes
, vaoStride
, vboName
, vboPtr
, vboAttribSizes
@@ -45,6 +48,8 @@ data FullShader = FullShader
and its buffer targets. -}
data VAO = VAO
{ _vaoName :: GLuint
, _vaoAttribSizes :: [Int] -- ^ It is not clear to me if this is necessary to store or not
, _vaoStride :: Int
, _vaoVBO :: VBO
}
{- | Vertex buffer object: contains the reference to the object,