From f5ecbb3b0282637423b236b2532d3e312cb8b291 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Lo=C3=AFc=20Hoguin?= Date: Mon, 7 Apr 2014 21:57:22 +0200 Subject: Add sdl_texture:set_color_mod/4 --- c_src/sdl_texture.c | 24 ++++++++++++++++++++++++ 1 file changed, 24 insertions(+) (limited to 'c_src/sdl_texture.c') diff --git a/c_src/sdl_texture.c b/c_src/sdl_texture.c index b9ec140..2179a09 100644 --- a/c_src/sdl_texture.c +++ b/c_src/sdl_texture.c @@ -172,3 +172,27 @@ NIF_FUNCTION(set_texture_blend_mode) return nif_thread_call(env, thread_set_texture_blend_mode, 2, NIF_RES_GET(Texture, texture_res), mode); } + +// set_texture_color_mod + +NIF_CALL_HANDLER(thread_set_texture_color_mod) +{ + if (SDL_SetTextureColorMod(args[0], (long)args[1], (long)args[2], (long)args[3])) + return sdl_error_tuple(env); + + return atom_ok; +} + +NIF_FUNCTION(set_texture_color_mod) +{ + void* texture_res; + int r, g, b; + + BADARG_IF(!enif_get_resource(env, argv[0], res_Texture, &texture_res)); + BADARG_IF(!enif_get_int(env, argv[1], &r)); + BADARG_IF(!enif_get_int(env, argv[2], &g)); + BADARG_IF(!enif_get_int(env, argv[3], &b)); + + return nif_thread_call(env, thread_set_texture_color_mod, 4, + NIF_RES_GET(Texture, texture_res), r, g, b); +} -- cgit v1.2.3