diff options
| author | Loïc Hoguin <[email protected]> | 2014-04-07 21:13:08 +0200 |
|---|---|---|
| committer | Loïc Hoguin <[email protected]> | 2014-04-07 21:13:08 +0200 |
| commit | 872301b55c4df71d704e1b2e2e8947e040045b8e (patch) | |
| tree | c1ee1c03ae79d3a8d4f134957acc9e281985e2dc /src | |
| parent | 01a9d5eeb3e1e77239b5daef9895719f25bd9b9f (diff) | |
| download | esdl2-872301b55c4df71d704e1b2e2e8947e040045b8e.tar.gz esdl2-872301b55c4df71d704e1b2e2e8947e040045b8e.tar.bz2 esdl2-872301b55c4df71d704e1b2e2e8947e040045b8e.zip | |
Add sdl_texture:get_alpha_mod/1
Diffstat (limited to 'src')
| -rw-r--r-- | src/esdl2.erl | 4 | ||||
| -rw-r--r-- | src/sdl_texture.erl | 8 |
2 files changed, 12 insertions, 0 deletions
diff --git a/src/esdl2.erl b/src/esdl2.erl index 5631512..44f7eb5 100644 --- a/src/esdl2.erl +++ b/src/esdl2.erl @@ -87,6 +87,7 @@ %% sdl_texture -export([create_texture_from_surface/2]). +-export([get_texture_alpha_mod/1]). %% sdl_version -export([get_version/0]). @@ -320,6 +321,9 @@ img_load(_) -> create_texture_from_surface(_, _) -> erlang:nif_error({not_loaded, ?MODULE}). +get_texture_alpha_mod(_) -> + erlang:nif_error({not_loaded, ?MODULE}). + %% sdl_version get_version() -> diff --git a/src/sdl_texture.erl b/src/sdl_texture.erl index 29c3018..276dce1 100644 --- a/src/sdl_texture.erl +++ b/src/sdl_texture.erl @@ -16,6 +16,7 @@ -export([create_from_file/2]). -export([create_from_surface/2]). +-export([get_alpha_mod/1]). create_from_file(Renderer, Filename) -> {ok, Surface} = sdl_surface:load(Filename), @@ -24,3 +25,10 @@ create_from_file(Renderer, Filename) -> create_from_surface(Renderer, Surface) -> esdl2:create_texture_from_surface(Renderer, Surface), receive {'_nif_thread_ret_', Ret} -> Ret end. + +get_alpha_mod(Texture) -> + esdl2:get_texture_alpha_mod(Texture), + receive {'_nif_thread_ret_', Ret} -> + {ok, Alpha} = Ret, + Alpha + end. |