(bind-func get_pitch_env (lambda (inst:i8*) (let ((note (cref (cast inst [void]*) note_kernel [void]*))) (cref note pitch_env |2,float|))))