1 (** Parsing commit messages and Conventional Commits metadata. *) 2 3 type t = { summary : string; body : string } 4 5 val parse : string option -> t 6 (** Extract the summary line and body from a raw commit message. *) 7 8 val parse_conventional : string -> string option * string 9 (** Split a Conventional Commits subject into [(Some type, title)] or 10 [(None, original)] when the prefix is unrecognised. *) 11