let record_only_pairs_expected loc sexp = let msg = loc ^ "_of_sexp: record conversion: only pairs expected, their first element must be an atom" in of_sexp_error msg sexp