diff options
| author | David Thompson <dthompson2@worcester.edu> | 2015-12-21 15:53:58 -0500 |
|---|---|---|
| committer | David Thompson <dthompson2@worcester.edu> | 2015-12-21 15:55:04 -0500 |
| commit | 9bad448e64de9b476718b970f9c03a9f80a0c83e (patch) | |
| tree | a79567fa18fbef668fd2716c0ebc06bbb70bd45f | |
| parent | 984ff2f35e3e34f0ebd64b54f582ceaeaf2624df (diff) | |
events: window: Change vector from pair to list.
This is consistent with representing coordinate pairs as lists
elsewhere in the library.
* sdl2/events.scm (parse-window-event): Change vector from pair to list.
| -rw-r--r-- | sdl2/events.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/sdl2/events.scm b/sdl2/events.scm index f02490b..aa08fff 100644 --- a/sdl2/events.scm +++ b/sdl2/events.scm @@ -247,8 +247,8 @@ int32)) ; data2 (match (parse-c-struct ptr types) - ((_ timestamp id event _ _ _ data1 data2) - (make-window-event timestamp id (type-symbol event) (cons data1 data2))))) + ((_ timestamp id event _ _ _ x y) + (make-window-event timestamp id (type-symbol event) (list x y))))) ;;; |