From d0ca509dc3cb61b6e437f0787a16bb15789c5ef5 Mon Sep 17 00:00:00 2001 From: Cocoa Date: Sat, 8 Jun 2024 17:56:05 +0000 Subject: [PATCH] added to_pointer in `evision_mat` Signed-off-by: Cocoa --- src/evision_mat.erl | 8 ++++++++ 1 file changed, 8 insertions(+) diff --git a/src/evision_mat.erl b/src/evision_mat.erl index 2a92bebd..818c9f94 100644 --- a/src/evision_mat.erl +++ b/src/evision_mat.erl @@ -19,6 +19,14 @@ '__from_struct__'(#evision_mat{ref=Ref}) -> Ref. +to_pointer(Mat) when is_tuple(Mat), tuple_size(Mat) > 0, element(1, Mat) == evision_mat -> + MatRef = '__from_struct__'(Mat), + evision_nif:mat_at([{img, MatRef}, {mode, local}]). + +to_pointer(Mat, Mode) when is_tuple(Mat), tuple_size(Mat) > 0, element(1, Mat) == evision_mat, is_atom(Mode) -> + MatRef = '__from_struct__'(Mat), + evision_nif:mat_at([{img, MatRef}, {mode, Mode}]). + full(Shape, Number, {T, L}) when is_tuple(Shape) -> ToShape = [element(I, Shape) || I <- lists:seq(1, tuple_size(Shape))], Ret = evision_nif:mat_full([{number, Number}, {t, T}, {l, L}, {shape, ToShape}]),