From faba3b60ca4d4e9d4545cb5d8511db02a332855f Mon Sep 17 00:00:00 2001 From: Pierre-Antoine Rouby Date: Wed, 29 May 2019 22:53:44 +0200 Subject: render: Add SDL_RenderDrawLines binding. * sdl2/bindings.scm (sdl-render-draw-lines): New procedure. * sdl2/render.scm (render-draw-lines): New procedure. * doc/api.texi: Document it. --- sdl2/bindings.scm | 3 +++ 1 file changed, 3 insertions(+) (limited to 'sdl2/bindings.scm') diff --git a/sdl2/bindings.scm b/sdl2/bindings.scm index bf8db7a..900b641 100644 --- a/sdl2/bindings.scm +++ b/sdl2/bindings.scm @@ -252,6 +252,9 @@ RETURN-TYPE and accept arguments of ARG-TYPES." (define-foreign sdl-render-draw-line int "SDL_RenderDrawLine" (list '* int int int int)) +(define-foreign sdl-render-draw-lines + int "SDL_RenderDrawLines" (list '* '* int)) + (define-foreign sdl-render-draw-point int "SDL_RenderDrawPoint" (list '* int int)) -- cgit v1.2.3