(bind-func xtm_draw_quad_stroke (lambda (path x1:float y1:float cx:float cy:float x2:float y2:float color:NVGcolor* width:float) (nvgBeginPath path) (xtm_add_quad path x1 y1 cx cy x2 y2) (xtm_stroke path color width)))