Browse Source

Add example keybind

master
Macoy Madson 5 months ago
parent
commit
2718012301
  1. 3
      src/SDL.cake

3
src/SDL.cake

@ -291,6 +291,9 @@
(append-to-string-buffer buffer-out buffer-size (addr write-head)
", "))))
;; Example of multiple keys bound:
;; (define-keybind s-help-keybind (array SDL_SCANCODE_F1 keybind-modifier-flags-none)
;; (array SDL_SCANCODE_H keybind-modifier-flags-ctrl))
(defmacro define-keybind (name symbol &rest binds array)
(var buttons-name Token (deref name))
(call-on append (field buttons-name contents) "-buttons")

Loading…
Cancel
Save