(bind-func ocv_cvtColor "Convert color " (lambda (img:ocv_Mat* code:i32) (let ((out (Mat_New))) (zone_cleanup (Mat_Close out)) (CvtColor (tref img 0) out code) (ocv_Mat out))))