(bind-func xtm_draw_arc_fill (lambda (path cx:i64 cy:i64 r:i64 deg1:i64 deg2:i64 dir:i32 color:NVGcolor*) (nvgBeginPath path) (xtm_add_arc path cx cy r deg1 deg2 dir) (xtm_fill path color)))