less creation of tuples.

let x, pos2 = Llio.x_from s pos in 
gets reworked to
let x = Llio.x_from buf in