blob: e1d3eb9543ca770ef8274ea2c48c18ad2bd70a9b (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
type xml = Tag of string * xml list | String of string
val tag : string -> xml list -> xml
val format : Format.formatter -> ('a, Format.formatter, unit) format -> 'a
val format_list :
?pp_sep:(Format.formatter -> unit -> unit) ->
(Format.formatter -> 'a -> unit) ->
Format.formatter ->
'a list ->
unit
val format_xml : Format.formatter -> xml -> unit
|