(bind-func xtm_draw_line (lambda (path x1:i64 y1:i64 x2:i64 y2:i64 color:NVGcolor* width:i64) (nvgBeginPath path) (xtm_add_line path x1 y1 x2 y2) (xtm_stroke path color width)))