summaryrefslogtreecommitdiff
path: root/sdl2
diff options
context:
space:
mode:
Diffstat (limited to 'sdl2')
-rw-r--r--sdl2/video.scm3
1 files changed, 2 insertions, 1 deletions
diff --git a/sdl2/video.scm b/sdl2/video.scm
index dda917a..a9e44db 100644
--- a/sdl2/video.scm
+++ b/sdl2/video.scm
@@ -160,7 +160,8 @@ returns or otherwise exits."
(proc (unwrap-window window)
(bytevector->pointer bv)
(bytevector->pointer bv (sizeof int)))
- (bytevector->sint-list bv (native-endianness) (sizeof int))))
+ (values (bytevector-sint-ref bv 0 (native-endianness) (sizeof int))
+ (bytevector-sint-ref bv (sizeof int) (native-endianness) (sizeof int)))))
(define (window-size window)
"Return the dimensions of WINDOW."