Commits

Markus Mottl committed ce7b5e5

Sexplib code generation fix to avoid triggering fragile pattern-match warnings

  • Participants
  • Parent commits 4d40a2e

Comments (0)

Files changed (1)

File base/sexplib/syntax/pa_sexp_conv.ml

               match field_name with
               [ $mc_no_args_fields$ ];
               iter tail }
-        | [sexp :: _] ->
+        | [((Sexplib.Sexp.Atom _ | Sexplib.Sexp.List _) as sexp) :: _] ->
             Sexplib.Conv_error.record_only_pairs_expected _tp_loc sexp
         | [] -> () ]
       in