;; activate plugin
(bind-func lilv_activate
(lambda (instance:LilvInstance*)
(let ((descriptor (tref instance 0))
(handle (tref instance 1))
(activate_fptr (tref descriptor 3)))
(fptrcall activate_fptr handle)
void)))