sig type out type m val empty : Xml_sigs.Output.m val concat : Xml_sigs.Output.m -> Xml_sigs.Output.m -> Xml_sigs.Output.m val put : string -> Xml_sigs.Output.m val make : Xml_sigs.Output.m -> Xml_sigs.Output.out end