diff options
| author | 3gg <3gg@shellblade.net> | 2024-08-14 19:19:36 -0700 |
|---|---|---|
| committer | 3gg <3gg@shellblade.net> | 2024-08-14 19:19:36 -0700 |
| commit | 515581cd9a620ef797a85c2bb1b83cf2cf7af362 (patch) | |
| tree | 19e67224326985819b6ccf7e5dede0b6460a353d | |
| parent | 69a71a5cd2bd2cffc55402305c14a39db3eed23e (diff) | |
Enable vsync
| -rw-r--r-- | Spear/Window.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/Spear/Window.hs b/Spear/Window.hs index 453f67d..20d7acc 100644 --- a/Spear/Window.hs +++ b/Spear/Window.hs | |||
| @@ -127,6 +127,8 @@ setup (w, h) windowTitle = do | |||
| 127 | 127 | ||
| 128 | GLFW.makeContextCurrent maybeWindow | 128 | GLFW.makeContextCurrent maybeWindow |
| 129 | 129 | ||
| 130 | GLFW.swapInterval 1 -- Enable vsync. | ||
| 131 | |||
| 130 | GLFW.setWindowCloseCallback window . Just $ onWindowClose closeRequest | 132 | GLFW.setWindowCloseCallback window . Just $ onWindowClose closeRequest |
| 131 | GLFW.setWindowSizeCallback window . Just $ onResize windowEvents | 133 | GLFW.setWindowSizeCallback window . Just $ onResize windowEvents |
| 132 | GLFW.setKeyCallback window . Just $ onKey inputEvents | 134 | GLFW.setKeyCallback window . Just $ onKey inputEvents |