diff options
author | Loïc Hoguin <[email protected]> | 2014-04-07 21:23:36 +0200 |
---|---|---|
committer | Loïc Hoguin <[email protected]> | 2014-04-07 21:23:36 +0200 |
commit | 581fcdd640b918055c06bb9f96ae8a098cb340f7 (patch) | |
tree | 14d98e2cf7b724afbb98a5de34096c6f23cdb7ce /c_src | |
parent | 333823ed12461420d48ea8c1e47743fe22eaf32f (diff) | |
download | esdl2-581fcdd640b918055c06bb9f96ae8a098cb340f7.tar.gz esdl2-581fcdd640b918055c06bb9f96ae8a098cb340f7.tar.bz2 esdl2-581fcdd640b918055c06bb9f96ae8a098cb340f7.zip |
Add sdl_texture:get_color_mod/1
Diffstat (limited to 'c_src')
-rw-r--r-- | c_src/esdl2.h | 1 | ||||
-rw-r--r-- | c_src/sdl_texture.c | 29 |
2 files changed, 30 insertions, 0 deletions
diff --git a/c_src/esdl2.h b/c_src/esdl2.h index ac5c45c..b9289e5 100644 --- a/c_src/esdl2.h +++ b/c_src/esdl2.h @@ -199,6 +199,7 @@ F(create_texture_from_surface, 2) \ F(get_texture_alpha_mod, 1) \ F(get_texture_blend_mode, 1) \ + F(get_texture_color_mod, 1) \ /* sdl_version */ \ F(get_version, 0) \ F(get_revision, 0) \ diff --git a/c_src/sdl_texture.c b/c_src/sdl_texture.c index 04dc0f8..e421676 100644 --- a/c_src/sdl_texture.c +++ b/c_src/sdl_texture.c @@ -99,3 +99,32 @@ NIF_FUNCTION(get_texture_blend_mode) return nif_thread_call(env, thread_get_texture_blend_mode, 1, NIF_RES_GET(Texture, texture_res)); } + +// get_texture_color_mod + +NIF_CALL_HANDLER(thread_get_texture_color_mod) +{ + Uint8 r, g, b; + + if (SDL_GetTextureColorMod(args[0], &r, &g, &b)) + return sdl_error_tuple(env); + + return enif_make_tuple2(env, + atom_ok, + enif_make_tuple3(env, + enif_make_uint(env, r), + enif_make_uint(env, g), + enif_make_uint(env, b) + ) + ); +} + +NIF_FUNCTION(get_texture_color_mod) +{ + void* texture_res; + + BADARG_IF(!enif_get_resource(env, argv[0], res_Texture, &texture_res)); + + return nif_thread_call(env, thread_get_texture_color_mod, 1, + NIF_RES_GET(Texture, texture_res)); +} |