This commit is contained in:
2023-03-09 09:55:57 +00:00
parent 2b118777b5
commit 18fa216dff
2 changed files with 2 additions and 26 deletions
+1 -5
View File
@@ -1,6 +1,5 @@
module Shader
( freeShaderPointers
, freeShaderPointers'
( freeShaderPointers'
, drawShaderLay
, shadVBOptr
, shadVBOptr'
@@ -57,9 +56,6 @@ drawShader fs i = do
0
(fromIntegral i)
freeShaderPointers :: FullShader -> IO ()
freeShaderPointers = free . _vboPtr . _vaoVBO . _shadVAO
freeShaderPointers' :: FullShader' -> IO ()
freeShaderPointers' = free . _vboPtr . _vaoVBO . _shadVAO'