src/pocket39.c buggy (implementing length supports 0)