From 9bad448e64de9b476718b970f9c03a9f80a0c83e Mon Sep 17 00:00:00 2001 From: David Thompson Date: Mon, 21 Dec 2015 15:53:58 -0500 Subject: 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. --- sdl2/events.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'sdl2') 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))))) ;;; -- cgit v1.2.3