Iterate correctly over ocaml list

This means that you have to set the pointer one step further at the end
of each loop iteration.