diff options
-rw-r--r-- | doc/api.texi | 4 | ||||
-rw-r--r-- | sdl2/render.scm | 8 |
2 files changed, 6 insertions, 6 deletions
diff --git a/doc/api.texi b/doc/api.texi index edd111c..96f5623 100644 --- a/doc/api.texi +++ b/doc/api.texi @@ -1249,11 +1249,11 @@ instead be a bytevector packed with signed 32 bit integers, 4 per rect (x, y, width, height). @end deffn -@deffn {Procedure} fill-rect renderer rectangle +@deffn {Procedure} render-fill-rect renderer rectangle Fill @var{rectangle} onto @var{renderer}. @end deffn -@deffn {Procedure} fill-rects renderer rects +@deffn {Procedure} render-fill-rects renderer rects Fill the list @var{rects} onto @var{renderer}. Optionally, for best performance, @var{rects} may instead be a bytevector packed with signed 32 bit integers, 4 per rect (x, y, width, height). 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) |