(bind-func ocv_Mat (lambda (rows:i32 cols:i32 type:i32) (let ((mat (Mat_NewWithSize rows cols type))) (zone_cleanup (Mat_Close mat)) (ocv_Mat:[ocv_Mat*,ocv_MatT]* mat))))