diff options
| author | David Thompson <dthompson2@worcester.edu> | 2016-01-08 21:38:32 -0500 |
|---|---|---|
| committer | David Thompson <dthompson2@worcester.edu> | 2016-01-08 21:38:32 -0500 |
| commit | 33863df70267b72aaeb94e4b1c0165cb1ec94b74 (patch) | |
| tree | 07e01a9629fdfaa199a04b56a21d5198c7af0302 /sdl2/bindings.scm | |
| parent | 6b2ecade1079c5bef1c066b9f092a8179d78d932 (diff) | |
video: Add SDL_GL_SetSwapInterval binding.
* sdl2/bindings.scm (sdl-gl-set-swap-interval): New procedure.
* sdl2/video.scm (set-gl-swap-interval!): New procedure.
Diffstat (limited to 'sdl2/bindings.scm')
| -rw-r--r-- | sdl2/bindings.scm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/sdl2/bindings.scm b/sdl2/bindings.scm index 6c638ab..b6f9431 100644 --- a/sdl2/bindings.scm +++ b/sdl2/bindings.scm @@ -202,6 +202,9 @@ RETURN-TYPE and accept arguments of ARG-TYPES." (define-foreign sdl-gl-set-attribute int "SDL_GL_SetAttribute" (list int int)) +(define-foreign sdl-gl-set-swap-interval + int "SDL_GL_SetSwapInterval" (list int)) + (define-public SDL_RENDERER_SOFTWARE #x00000001) (define-public SDL_RENDERER_ACCELERATED #x00000002) (define-public SDL_RENDERER_PRESENTVSYNC #x00000004) |