GLFW-b-demo 0.0.2 → 0.0.3

raw patch · 2 files changed

+6/−6 lines, 2 files

Files

GLFW-b-demo.cabal +1/−1
src/Main.hs +5/−5

GLFW-b-demo.cabal view

@@ -1,5 +1,5 @@ name:         GLFW-b-demo-version:      0.0.2+version:      0.0.3  category:     Graphics

src/Main.hs view

@@ -16,12 +16,12 @@  configureDisplay :: IO () configureDisplay = do-    GLFW.initialize+    _ <- GLFW.initialize -    GLFW.openWindow GLFW.defaultDisplayOptions-      { GLFW.displayOptions_numRedBits   = 5-      , GLFW.displayOptions_numGreenBits = 6-      , GLFW.displayOptions_numBlueBits  = 5+    _ <- GLFW.openWindow GLFW.defaultDisplayOptions+      { GLFW.displayOptions_numRedBits   = 8+      , GLFW.displayOptions_numGreenBits = 8+      , GLFW.displayOptions_numBlueBits  = 8       , GLFW.displayOptions_numDepthBits = 1       }