let
end_pos lexbuf =
let
pos = lexeme_end_p lexbuf
in
pos.
Lexing
.pos_cnum - pos.
Lexing
.pos_bol