Work on cloud/window transparency

2025-11-09 11:00:12 +00:00
parent 7c62479f30
commit e9ffeeaea7
16 changed files with 221 additions and 168 deletions
@@ -6,7 +6,7 @@ import Foreign.Storable
 import Graphics.GL.Core45

 mglCreate :: (GLsizei -> Ptr GLuint -> IO ()) -> IO GLuint
-mglCreate f = do
+mglCreate f =
    alloca $ \nameptr -> do
        f 1 nameptr
        peek nameptr