src/pocket39.c buggy (implementing pitch shift)