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