(bind-func set_polyphonic (lambda (inst:i8*) (stop_running inst) ;; force a stop on all notes before changing poly count (cset! (cast inst [void]*) poly MAXPOLYPHONY i64) void))