DSA glClear

src/Preload/Render.hs

@@ -211,9 +211,6 @@ preloadRender = do
     -- reset to default framebuffer, ready for drawing direct to screen
     glBindFramebuffer GL_FRAMEBUFFER 0
 
-    -- set the clearColor to have 1 alpha
-    glClearColor 0 0 0 1
-
     shadV <- MV.new 6
     zipWithM_
         (MV.write shadV)