let get_conv_exn ~file ~exc annot_sexp =
let range = get_range annot_sexp in
let { start_pos = { line; col } } = range in
let loc = sprintf "%s:%d:%d" file line col in
Of_sexp_error (Annot.Conv_exn (loc, exc), get_sexp annot_sexp)