From f68b22ee64a737b121d5f4eb306175a3a53341bf Mon Sep 17 00:00:00 2001 From: David Thompson Date: Sat, 5 Dec 2020 12:46:30 -0500 Subject: video: Change set-window-size! argument list. --- sdl2/video.scm | 9 +++------ 1 file changed, 3 insertions(+), 6 deletions(-) (limited to 'sdl2') diff --git a/sdl2/video.scm b/sdl2/video.scm index 1c08495..dda917a 100644 --- a/sdl2/video.scm +++ b/sdl2/video.scm @@ -229,12 +229,9 @@ the border." "Set the position of WINDOW to (X, Y)." (ffi:sdl-set-window-position (unwrap-window window) x y)) -(define (set-window-size! window size) - "Set the dimensions of WINDOW to SIZE, a two-element list -of (width,height) coordinates measured in pixels." - (match size - ((width height) - (ffi:sdl-set-window-size (unwrap-window window) width height)))) +(define (set-window-size! window width height) + "Set the dimensions of WINDOW to WIDTH x HEIGHT pixels." + (ffi:sdl-set-window-size (unwrap-window window) width height)) (define (set-window-minimum-size! window width height) "Set the minimum dimensions of WINDOW to WIDTH x HEIGHT pixels." -- cgit v1.2.3