(bind-func static retrigger_adsr (lambda (adsr:[SAMPLE,i64,SAMPLE,SAMPLE,SAMPLE,SAMPLE,SAMPLE]*) (cset! adsr retrigger 1 i1) ;; 1 == env_attack void))