diff options
| author | Loïc Hoguin <[email protected]> | 2014-04-03 14:40:16 +0200 |
|---|---|---|
| committer | Loïc Hoguin <[email protected]> | 2014-04-03 14:40:16 +0200 |
| commit | 02625290044c6c6a50d08261aa4a8e4103be60d8 (patch) | |
| tree | a5faa89b05fac466cf60eac4e812f7fd68b67a8e | |
| parent | 5da468c3d6f55027247d913294f4202860efd0fc (diff) | |
| download | esdl2-02625290044c6c6a50d08261aa4a8e4103be60d8.tar.gz esdl2-02625290044c6c6a50d08261aa4a8e4103be60d8.tar.bz2 esdl2-02625290044c6c6a50d08261aa4a8e4103be60d8.zip | |
Add sdl_window:minimize/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 ee8fc6d..e4edd0e 100644 --- a/c_src/esdl2.h +++ b/c_src/esdl2.h @@ -173,6 +173,7 @@ F(get_window_title, 1) \ F(hide_window, 1) \ F(maximize_window, 1) \ + F(minimize_window, 1) \ // Generated declarations for the NIF. diff --git a/c_src/sdl_window.c b/c_src/sdl_window.c index e09f0ae..0654a58 100644 --- a/c_src/sdl_window.c +++ b/c_src/sdl_window.c @@ -377,3 +377,20 @@ NIF_FUNCTION(maximize_window) return nif_thread_cast(env, thread_maximize_window, 1, NIF_RES_GET(Window, window_res)); } + +// minimize_window + +NIF_CAST_HANDLER(thread_minimize_window) +{ + SDL_MinimizeWindow(args[0]); +} + +NIF_FUNCTION(minimize_window) +{ + void* window_res; + + BADARG_IF(!enif_get_resource(env, argv[0], res_Window, &window_res)); + + return nif_thread_cast(env, thread_minimize_window, 1, + NIF_RES_GET(Window, window_res)); +} diff --git a/src/esdl2.erl b/src/esdl2.erl index b536d9f..b5b7f54 100644 --- a/src/esdl2.erl +++ b/src/esdl2.erl @@ -85,6 +85,7 @@ -export([get_window_title/1]). -export([hide_window/1]). -export([maximize_window/1]). +-export([minimize_window/1]). %% @todo We probably want to accept an env variable or somthing for the location. -on_load(on_load/0). @@ -269,3 +270,6 @@ hide_window(_) -> maximize_window(_) -> erlang:nif_error({not_loaded, ?MODULE}). + +minimize_window(_) -> + erlang:nif_error({not_loaded, ?MODULE}). diff --git a/src/sdl_window.erl b/src/sdl_window.erl index 8f10690..1cb4d10 100644 --- a/src/sdl_window.erl +++ b/src/sdl_window.erl @@ -28,6 +28,7 @@ -export([get_title/1]). -export([hide/1]). -export([maximize/1]). +-export([minimize/1]). create(Title, X, Y, W, H, Flags) -> esdl2:create_window(Title, X, Y, W, H, Flags), @@ -85,3 +86,6 @@ hide(Window) -> maximize(Window) -> esdl2:maximize_window(Window). + +minimize(Window) -> + esdl2:minimize_window(Window). |