implemented bytevector-u1-{ref,set!} procedure