Ast.StructuredSourcetype program = {macros : (Func.t, Term.t) Macro.t list;kinds : (unit, unit) Type.t list;types : (tattribute, functionality) Type.t list;type_abbrevs : (Func.t, functionality TypeExpression.t) TypeAbbreviation.t list;modes : (tattribute, functionality) Type.t list;body : block list;}and ('func, 'term) block_constraint = {clique : 'func list;ctx_filter : 'func list;rules : (cattribute, 'term) Chr.t list;}val pp_program :
Ppx_deriving_runtime.Format.formatter ->
program ->
Ppx_deriving_runtime.unitval pp_block_constraint :
(Ppx_deriving_runtime.Format.formatter -> 'func -> Ppx_deriving_runtime.unit) ->
(Ppx_deriving_runtime.Format.formatter -> 'term -> Ppx_deriving_runtime.unit) ->
Ppx_deriving_runtime.Format.formatter ->
('func, 'term) block_constraint ->
Ppx_deriving_runtime.unitval show_block_constraint :
(Ppx_deriving_runtime.Format.formatter -> 'func -> Ppx_deriving_runtime.unit) ->
(Ppx_deriving_runtime.Format.formatter -> 'term -> Ppx_deriving_runtime.unit) ->
('func, 'term) block_constraint ->
Ppx_deriving_runtime.stringval pp_attribute :
Ppx_deriving_runtime.Format.formatter ->
attribute ->
Ppx_deriving_runtime.unitval pp_insertion :
Ppx_deriving_runtime.Format.formatter ->
insertion ->
Ppx_deriving_runtime.unitval pp_insertion_place :
Ppx_deriving_runtime.Format.formatter ->
insertion_place ->
Ppx_deriving_runtime.unitval pp_cattribute :
Ppx_deriving_runtime.Format.formatter ->
cattribute ->
Ppx_deriving_runtime.unitval pp_tattribute :
Ppx_deriving_runtime.Format.formatter ->
tattribute ->
Ppx_deriving_runtime.unitval pp_shorthand :
(Ppx_deriving_runtime.Format.formatter -> 'a -> Ppx_deriving_runtime.unit) ->
Ppx_deriving_runtime.Format.formatter ->
'a shorthand ->
Ppx_deriving_runtime.unitval show_shorthand :
(Ppx_deriving_runtime.Format.formatter -> 'a -> Ppx_deriving_runtime.unit) ->
'a shorthand ->
Ppx_deriving_runtime.stringval pp_functionality :
Ppx_deriving_runtime.Format.formatter ->
functionality ->
Ppx_deriving_runtime.unitval pp_variadic :
Ppx_deriving_runtime.Format.formatter ->
variadic ->
Ppx_deriving_runtime.unitval compare_block_constraint :
('func -> 'func -> Ppx_deriving_runtime.int) ->
('term -> 'term -> Ppx_deriving_runtime.int) ->
('func, 'term) block_constraint ->
('func, 'term) block_constraint ->
Ppx_deriving_runtime.intval compare_shorthand :
('a -> 'a -> Ppx_deriving_runtime.int) ->
'a shorthand ->
'a shorthand ->
Ppx_deriving_runtime.int