diff --git a/src/ast_block.ml b/src/ast_block.ml index 3ca545d9..5d4ec38a 100644 --- a/src/ast_block.ml +++ b/src/ast_block.ml @@ -11,16 +11,21 @@ module InlineContent = struct end module List_types = struct + + (** @canonical Omd.list_type *) type list_type = | Ordered of int * char | Bullet of char + (** @canonical Omd.list_spacing *) type list_spacing = | Loose | Tight end module Table_alignments = struct + + (** @canonical Omd.cell_alignment *) type cell_alignment = | Default | Left diff --git a/src/ast_inline.ml b/src/ast_inline.ml index a74c8de9..a5122f7f 100644 --- a/src/ast_inline.ml +++ b/src/ast_inline.ml @@ -5,6 +5,8 @@ those somehow? Or should we include these in the document model, but but with the caveat that most renderings of the document don't support attributes in these nodes? *) + +(** @canonical Omd.inline *) type 'attr inline = | Concat of 'attr * 'attr inline list | Text of 'attr * string