let column p =
  p.pos_cnum - p.pos_bol