From 45d746083c3fe3de6f6b3d8ec099d43fec85e1d8 Mon Sep 17 00:00:00 2001 From: David Thompson Date: Sun, 28 Jul 2013 19:44:25 -0400 Subject: Fix figl enum. --- 2d/sprite.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to '2d/sprite.scm') diff --git a/2d/sprite.scm b/2d/sprite.scm index 21e27de..73fc595 100644 --- a/2d/sprite.scm +++ b/2d/sprite.scm @@ -255,7 +255,7 @@ bound." vertices #:stride struct-size #:offset s-offset) - (gl-draw-arrays (primitive-type quads) + (gl-draw-arrays (begin-mode quads) 0 (packed-array-length vertices sprite-vertex))) (gl-disable-client-state (enable-cap texture-coord-array)) @@ -397,7 +397,7 @@ batched texture vertices first." vertices #:stride struct-size #:offset (packed-struct-offset sprite-vertex s)) - (gl-draw-arrays (primitive-type quads) 0 vertex-count))) + (gl-draw-arrays (begin-mode quads) 0 vertex-count))) (gl-disable-client-state (enable-cap texture-coord-array)) (gl-disable-client-state (enable-cap color-array)) (gl-disable-client-state (enable-cap vertex-array)) -- cgit v1.2.3