sig
  type inline = [ `Code of string | `Text of string ]
  type block = [ `Paragraph of Ag_doc.inline list | `Pre of string ]
  type doc = [ `Text of Ag_doc.block list ]
  val get_doc : Atd_ast.loc -> Atd_ast.annot -> Ag_doc.doc option
end