(bind-func xtm_add_poly (lambda (path points:VGfloat* npoints closed) (vguPolygon path points npoints closed)))