diff options
Diffstat (limited to 'sdl2')
| -rw-r--r-- | sdl2/video.scm | 3 |
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." |