let dump ppf e = fprintf ppf "%a@\n" Dump.entry e