diff options
| -rw-r--r-- | c_src/esdl2.h | 1 | ||||
| -rw-r--r-- | c_src/sdl_renderer.c | 23 | ||||
| -rw-r--r-- | src/esdl2.erl | 4 | ||||
| -rw-r--r-- | src/sdl_renderer.erl | 9 |
4 files changed, 37 insertions, 0 deletions
diff --git a/c_src/esdl2.h b/c_src/esdl2.h index 74e6115..f9c99f0 100644 --- a/c_src/esdl2.h +++ b/c_src/esdl2.h @@ -175,6 +175,7 @@ F(render_copy_ex, 7) \ F(render_draw_line, 5) \ F(render_draw_lines, 2) \ + F(render_draw_point, 3) \ F(render_present, 1) \ F(render_set_logical_size, 3) \ F(set_render_draw_color, 5) \ diff --git a/c_src/sdl_renderer.c b/c_src/sdl_renderer.c index 7229d21..f856e03 100644 --- a/c_src/sdl_renderer.c +++ b/c_src/sdl_renderer.c @@ -429,6 +429,29 @@ NIF_FUNCTION(render_draw_lines) NIF_RES_GET(Renderer, renderer_res), points, len); } +// render_draw_point + +NIF_CALL_HANDLER(thread_render_draw_point) +{ + if (SDL_RenderDrawPoint(args[0], (long)args[1], (long)args[2])) + return sdl_error_tuple(env); + + return atom_ok; +} + +NIF_FUNCTION(render_draw_point) +{ + void* renderer_res; + int x, y; + + BADARG_IF(!enif_get_resource(env, argv[0], res_Renderer, &renderer_res)); + BADARG_IF(!enif_get_int(env, argv[1], &x)); + BADARG_IF(!enif_get_int(env, argv[2], &y)); + + return nif_thread_call(env, thread_render_draw_point, 3, + NIF_RES_GET(Renderer, renderer_res), x, y); +} + // render_present NIF_CAST_HANDLER(thread_render_present) diff --git a/src/esdl2.erl b/src/esdl2.erl index 0a1b421..ba9a1a1 100644 --- a/src/esdl2.erl +++ b/src/esdl2.erl @@ -63,6 +63,7 @@ -export([render_copy_ex/7]). -export([render_draw_line/5]). -export([render_draw_lines/2]). +-export([render_draw_point/3]). -export([render_present/1]). -export([render_set_logical_size/3]). -export([set_render_draw_color/5]). @@ -241,6 +242,9 @@ render_draw_line(_, _, _, _, _) -> render_draw_lines(_, _) -> erlang:nif_error({not_loaded, ?MODULE}). +render_draw_point(_, _, _) -> + erlang:nif_error({not_loaded, ?MODULE}). + render_present(_) -> erlang:nif_error({not_loaded, ?MODULE}). diff --git a/src/sdl_renderer.erl b/src/sdl_renderer.erl index 45aa159..b9f333e 100644 --- a/src/sdl_renderer.erl +++ b/src/sdl_renderer.erl @@ -26,6 +26,8 @@ -export([draw_line/3]). -export([draw_line/5]). -export([draw_lines/2]). +-export([draw_point/2]). +-export([draw_point/3]). -export([present/1]). -export([set_draw_color/5]). -export([set_logical_size/3]). @@ -86,6 +88,13 @@ draw_lines(Renderer, Points) -> esdl2:render_draw_lines(Renderer, Points), receive {'_nif_thread_ret_', Ret} -> Ret end. +draw_point(Renderer, #{x:=X, y:=Y}) -> + draw_point(Renderer, X, Y). + +draw_point(Renderer, X, Y) -> + esdl2:render_draw_point(Renderer, X, Y), + receive {'_nif_thread_ret_', Ret} -> Ret end. + present(Renderer) -> esdl2:render_present(Renderer). |