aboutsummaryrefslogtreecommitdiff
path: root/Demos/Pong
diff options
context:
space:
mode:
Diffstat (limited to 'Demos/Pong')
-rw-r--r--Demos/Pong/Main.hs1
1 files changed, 0 insertions, 1 deletions
diff --git a/Demos/Pong/Main.hs b/Demos/Pong/Main.hs
index 0237a26..26ceefa 100644
--- a/Demos/Pong/Main.hs
+++ b/Demos/Pong/Main.hs
@@ -98,7 +98,6 @@ renderGO go = do
98 ,vec2 xmax ymax 98 ,vec2 xmax ymax
99 ,vec2 xmin ymax)] 99 ,vec2 xmin ymax)]
100 100
101-- TODO: Fix the resize hang.
102resize :: WindowEvent -> Game GameState () 101resize :: WindowEvent -> Game GameState ()
103resize (ResizeEvent w h) = 102resize (ResizeEvent w h) =
104 let r = fromIntegral w / fromIntegral h 103 let r = fromIntegral w / fromIntegral h