diff options
author | David Thompson <dthompson2@worcester.edu> | 2015-12-12 02:54:04 -0500 |
---|---|---|
committer | David Thompson <dthompson2@worcester.edu> | 2015-12-12 02:54:04 -0500 |
commit | 313e28f1f8aaa1c9b56ae0ddbda979b790237690 (patch) | |
tree | 497447b77bd81fcb70b9bcdb0c403b12306209d2 /sdl2/bindings.scm | |
parent | 254ea1eea9c70620524ec0d3bd238cf0b535321d (diff) |
Add SDL_GetTicks binding.
* sdl2/bindings.scm (sdl-get-ticks): New procedure.
* sdl2.scm (sdl-ticks): New procedure.
Diffstat (limited to 'sdl2/bindings.scm')
-rw-r--r-- | sdl2/bindings.scm | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/sdl2/bindings.scm b/sdl2/bindings.scm index 138d4fc..25b3576 100644 --- a/sdl2/bindings.scm +++ b/sdl2/bindings.scm @@ -192,3 +192,11 @@ RETURN-TYPE and accept arguments of ARG-TYPES." (define-foreign sdl-gl-swap-window void "SDL_GL_SwapWindow" '(*)) + + +;;; +;;; Timer +;;; + +(define-foreign sdl-get-ticks + uint32 "SDL_GetTicks" '()) |