From 1b7cdecf240859baa497f10215f3ebf72ec46963 Mon Sep 17 00:00:00 2001 From: David Thompson Date: Tue, 12 May 2020 16:39:50 -0400 Subject: ttf: Fix bytevector offsets in font-glyph-metrics. -_______________- --- sdl2/ttf.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'sdl2/ttf.scm') diff --git a/sdl2/ttf.scm b/sdl2/ttf.scm index 9d13713..a20ae69 100644 --- a/sdl2/ttf.scm +++ b/sdl2/ttf.scm @@ -81,8 +81,8 @@ the following format: (minx maxx miny maxy advance)" (bytevector->pointer bv) (bytevector->pointer bv 4) (bytevector->pointer bv 8) - (bytevector->pointer bv 16) - (bytevector->pointer bv 32))) + (bytevector->pointer bv 12) + (bytevector->pointer bv 16))) (s32vector->list bv) (sdl-error "font-glyph-metrics" "failed to get glyph metrics")))) -- cgit v1.2.3