;; destroy system (bind-func psystem_destroy (lambda (psys:psystem*) ;; should destroy vbo also!! (free (tref psys 2)) (free psys) void))