From f7e5de964d82c036f029a458de14864eaca9e290 Mon Sep 17 00:00:00 2001 From: David Thompson Date: Wed, 4 Jan 2023 21:47:06 -0500 Subject: render: Change fill-rect to render-fill-rect. This is to avoid a name collision with fill-rect in the (sdl2 surface) module. Rename fill-rects to render-fill-rects, too, for consistency. --- sdl2/render.scm | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'sdl2') diff --git a/sdl2/render.scm b/sdl2/render.scm index d5d345a..dc39bf6 100644 --- a/sdl2/render.scm +++ b/sdl2/render.scm @@ -57,8 +57,8 @@ draw-points draw-rect draw-rects - fill-rect - fill-rects + render-fill-rect + render-fill-rects texture-color-mod texture-alpha-mod @@ -284,7 +284,7 @@ disable it." (bytevector->pointer bv) (length rects))))) -(define (fill-rect renderer rect) +(define (render-fill-rect renderer rect) "Fill RECT on RENDERER." (ffi:sdl-render-fill-rect (unwrap-renderer renderer) @@ -292,7 +292,7 @@ disable it." ((@@ (sdl2 rect) unwrap-rect) rect) %null-pointer))) -(define (fill-rects renderer rects) +(define (render-fill-rects renderer rects) "Fill RECTS on RENDERER." (if (bytevector? rects) (ffi:sdl-render-fill-rects (unwrap-renderer renderer) -- cgit v1.2.3