From 1d28f3556a957b4099f12abd4d4645f17f1df3e8 Mon Sep 17 00:00:00 2001 From: Gene Pasquet Date: Sun, 21 Dec 2025 19:45:14 +0000 Subject: Build input-state map --- src/inputmap.scm | 14 ++++++++++++++ 1 file changed, 14 insertions(+) create mode 100644 src/inputmap.scm (limited to 'src/inputmap.scm') diff --git a/src/inputmap.scm b/src/inputmap.scm new file mode 100644 index 0000000..5328e35 --- /dev/null +++ b/src/inputmap.scm @@ -0,0 +1,14 @@ +(module inputmap +* +(import scheme + defstruct + (prefix sdl2 "sdl2:")) + +(define-syntax defkeymap + (syntax-rules () + ((defkeymap name + (state (key ...)) ...) + (define name )))) + + +) -- cgit v1.2.3