(bind-func xtm_draw_circle_fill (lambda (path cx:i64 cy:i64 r:i64 color:NVGcolor*) (nvgBeginPath path) (xtm_add_circle path cx cy r) (xtm_fill path color)))