(bind-func ocv_Mat:[ocv_Mat*,ocv_MatT]* (lambda (in) (let ((obj (alloc))) (tfill! obj in OCV_XTM_Mat_T) obj)))