diff options
| -rw-r--r-- | chickadee/window.scm | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/chickadee/window.scm b/chickadee/window.scm index 8d51fa1..7f138c1 100644 --- a/chickadee/window.scm +++ b/chickadee/window.scm @@ -58,7 +58,13 @@ #:fullscreen? fullscreen?)) (gl-context (sdl2:make-gl-context sdl-window)) (window (make-window sdl-window gl-context))) - (sdl2:set-gl-swap-interval! 'vsync) + ;; Some systems do not support setting the OpenGL swap interval. + (catch #t + (lambda () + (sdl2:set-gl-swap-interval! 'vsync)) + (lambda args + (display "warning: could not enable vsync\n" + (current-error-port)))) window)) (define (close-window! window) |