(bind-func ocv_dataPtr (lambda (mat:ocv_Mat* size:i32*) (let ((dat:i8* (alloc))) (Mat_DataPtr (tref mat 0) (ref dat) size) dat)))