From 0e85e89d730b99472454ca9327c228362dbe136d Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Hugo=20H=C3=B6rnquist?= <hugo@lysator.liu.se>
Date: Sun, 9 Jun 2019 20:48:21 +0200
Subject: render: Add texture color/alpha mod bindings.

* sdl2/bindings.scm (sdl-set-texture-color-mod,
  sdl-get-texture-color-mod, sdl-set-texture-alpha-mod,
  sdl-get-texture-alpha-mood): New procedures.
* sdl2/render.scm (set-texture-color-mod!, set-texture-alpha-mod!,
  get-texture-color-mod, get-texture-alpha-mod): New procedures.
* doc/api.texi: Document new procedures.
---
 doc/api.texi | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

(limited to 'doc')

diff --git a/doc/api.texi b/doc/api.texi
index 67bb1b2..9184ed3 100644
--- a/doc/api.texi
+++ b/doc/api.texi
@@ -1130,6 +1130,22 @@ Convert @var{surface} to a texture suitable for @var{renderer}.
 Free the memory used by @var{texture}.
 @end deffn
 
+@deffn {Procedure} get-texture-color-mod texture
+Get color mod of @var{texture} as a list of the integers.
+@end deffn
+
+@deffn {Procedure} get-texture-alpha-mod texture
+Get alpha mod of @var{texture} as a single integer.
+@end deffn
+
+@deffn {Procedure} set-texture-color-mod! texture r g b
+Set the color mod of @var{texture}.
+@end deffn
+
+@deffn {Procedure} set-texture-alpha-mod! texture a
+Set the alpha mod of @var{texture}.
+@end deffn
+
 @node Images
 @section Images
 
-- 
cgit v1.2.3