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