Use DSA for renderbuffers

This commit is contained in:
2023-03-09 14:58:38 +00:00
parent 0b698e5f5d
commit 76a8b05433
11 changed files with 81 additions and 74 deletions
+3 -3
View File
@@ -6,7 +6,7 @@ module Shader.Data
, VBO (..)
, EBO (..)
-- , FullShader (..)
, FullShader' (..)
, FullShader (..)
, ShaderTexture (..)
, EPrimitiveMode (..)
-- | Lens functions
@@ -35,7 +35,7 @@ import Graphics.GL.Core43
import Foreign
import Control.Lens
{- | Datatype containing the necessary information for a single shader. -}
data FullShader' = FullShader'
data FullShader = FullShader
{ _shadProg' :: GLuint -- should be shaderID
, _shadVAO' :: VAO
, _shadPrim' :: EPrimitiveMode
@@ -87,5 +87,5 @@ geom' = GL_GEOMETRY_SHADER
frag' = GL_FRAGMENT_SHADER
makeLenses ''VAO
makeLenses ''VBO
makeLenses ''FullShader'
makeLenses ''FullShader
makeLenses ''EBO