(bind-func xtm_draw_arc_fill (lambda (path cx:float cy:float r:float deg1:float deg2:float dir:i32 paint:NVGpaint*) (nvgBeginPath path) (xtm_add_arc path cx cy r deg1 deg2 dir) (xtm_fill path paint)))