From 277d1638bea8ed7b171cd65568962cd476686c9f Mon Sep 17 00:00:00 2001 From: Pierre-Antoine Rouby Date: Sun, 26 May 2019 13:45:00 +0200 Subject: render: Add SDL_DestroyTexture binding. * sdl2/bindings.scm (sdl-destroy-texture): New procedure. * sdl2/render.scm (delete-texture!): New procedure. * doc/api.texi (Renderer): 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 e81abf7..c382a45 100644 --- a/sdl2/bindings.scm +++ b/sdl2/bindings.scm @@ -243,6 +243,9 @@ RETURN-TYPE and accept arguments of ARG-TYPES." (define-foreign sdl-create-texture-from-surface '* "SDL_CreateTextureFromSurface" '(* *)) +(define-foreign sdl-destroy-texture + void "SDL_DestroyTexture" '(*)) + (define-foreign sdl-set-render-draw-color int "SDL_SetRenderDrawColor" (list '* uint8 uint8 uint8 uint8)) -- cgit v1.2.3