diff options
author | David Thompson <dthompson2@worcester.edu> | 2021-05-13 08:50:50 -0400 |
---|---|---|
committer | David Thompson <dthompson2@worcester.edu> | 2021-05-13 08:50:50 -0400 |
commit | 4e821211403cf6c1b144f66df3a8204d4c5bc60d (patch) | |
tree | 55f3e9adffd277107c91767bb1b22ae73c908bd1 /sdl2/bindings.scm | |
parent | b83ae58aa8920367cda3a7a992b594e8162c63d0 (diff) |
bindings: Add SDL_MOUSEWHEEL_* constants.
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 05d31fb..4deb900 100644 --- a/sdl2/bindings.scm +++ b/sdl2/bindings.scm @@ -987,6 +987,9 @@ RETURN-TYPE and accept arguments of ARG-TYPES." (define-public SDL_BUTTON_X1 4) (define-public SDL_BUTTON_X2 5) +(define-public SDL_MOUSEWHEEL_NORMAL 0) +(define-public SDL_MOUSEWHEEL_FLIPPED 1) + (define (button-mask n) (ash 1 (1- n))) |