Cleanup matrices

2021-06-24 18:49:10 +02:00
parent d4795749e3
commit bae8a4ed94
7 changed files with 35 additions and 141 deletions
@@ -18,9 +18,11 @@ import Foreign

 preloadRender :: IO RenderData
 preloadRender = do
+
+    -- set up uniform buffer object
    theUBO <- genObjectName
    bindBuffer UniformBuffer $= Just theUBO
-    bufferData UniformBuffer $= (64, nullPtr, StaticDraw)
+    bufferData UniformBuffer $= (64, nullPtr, DynamicDraw)
    bindBufferBase IndexedUniformBuffer 0 $= Just theUBO

 -- lighting shaders