diff options
| author | Loïc Hoguin <[email protected]> | 2014-04-03 14:56:29 +0200 |
|---|---|---|
| committer | Loïc Hoguin <[email protected]> | 2014-04-03 14:56:29 +0200 |
| commit | fad5d6798a9a93acd274daa3e378c6c2fbb1b72b (patch) | |
| tree | c54cb1abc48ae0659017f4ee2b8b22556b07fb5e | |
| parent | 02625290044c6c6a50d08261aa4a8e4103be60d8 (diff) | |
| download | esdl2-fad5d6798a9a93acd274daa3e378c6c2fbb1b72b.tar.gz esdl2-fad5d6798a9a93acd274daa3e378c6c2fbb1b72b.tar.bz2 esdl2-fad5d6798a9a93acd274daa3e378c6c2fbb1b72b.zip | |
Add sdl_window:raise/1
| -rw-r--r-- | c_src/esdl2.h | 1 | ||||
| -rw-r--r-- | c_src/sdl_window.c | 17 | ||||
| -rw-r--r-- | src/esdl2.erl | 4 | ||||
| -rw-r--r-- | src/sdl_window.erl | 4 |
4 files changed, 26 insertions, 0 deletions
diff --git a/c_src/esdl2.h b/c_src/esdl2.h index e4edd0e..f5a3012 100644 --- a/c_src/esdl2.h +++ b/c_src/esdl2.h @@ -174,6 +174,7 @@ F(hide_window, 1) \ F(maximize_window, 1) \ F(minimize_window, 1) \ + F(raise_window, 1) \ // Generated declarations for the NIF. diff --git a/c_src/sdl_window.c b/c_src/sdl_window.c index 0654a58..1b30b14 100644 --- a/c_src/sdl_window.c +++ b/c_src/sdl_window.c @@ -394,3 +394,20 @@ NIF_FUNCTION(minimize_window) return nif_thread_cast(env, thread_minimize_window, 1, NIF_RES_GET(Window, window_res)); } + +// raise_window + +NIF_CAST_HANDLER(thread_raise_window) +{ + SDL_RaiseWindow(args[0]); +} + +NIF_FUNCTION(raise_window) +{ + void* window_res; + + BADARG_IF(!enif_get_resource(env, argv[0], res_Window, &window_res)); + + return nif_thread_cast(env, thread_raise_window, 1, + NIF_RES_GET(Window, window_res)); +} diff --git a/src/esdl2.erl b/src/esdl2.erl index b5b7f54..f6c1d57 100644 --- a/src/esdl2.erl +++ b/src/esdl2.erl @@ -86,6 +86,7 @@ -export([hide_window/1]). -export([maximize_window/1]). -export([minimize_window/1]). +-export([raise_window/1]). %% @todo We probably want to accept an env variable or somthing for the location. -on_load(on_load/0). @@ -273,3 +274,6 @@ maximize_window(_) -> minimize_window(_) -> erlang:nif_error({not_loaded, ?MODULE}). + +raise_window(_) -> + erlang:nif_error({not_loaded, ?MODULE}). diff --git a/src/sdl_window.erl b/src/sdl_window.erl index 1cb4d10..faeebe2 100644 --- a/src/sdl_window.erl +++ b/src/sdl_window.erl @@ -29,6 +29,7 @@ -export([hide/1]). -export([maximize/1]). -export([minimize/1]). +-export([raise/1]). create(Title, X, Y, W, H, Flags) -> esdl2:create_window(Title, X, Y, W, H, Flags), @@ -89,3 +90,6 @@ maximize(Window) -> minimize(Window) -> esdl2:minimize_window(Window). + +raise(Window) -> + esdl2:raise_window(Window). |