`sig module type Type = sig type text exception Prohibited of CamomileLibrary.UChar.t exception Bad_bidi type profile = [ `Iscsi | `Mib | `Nameprep | `Nodeprep | `Resourceprep | `Saslprep | `Trace ] val stringprep : CamomileLibrary.StringPrep.Type.profile -> CamomileLibrary.StringPrep.Type.text -> CamomileLibrary.StringPrep.Type.text end module Make : functor (Config : ConfigInt.Type) (Text : UnicodeString.Type) -> sig type text = Text.t exception Prohibited of UChar.t exception Bad_bidi type profile = [ `Iscsi | `Mib | `Nameprep | `Nodeprep | `Resourceprep | `Saslprep | `Trace ] val stringprep : profile -> text -> text end end`