sig
  module type Type = StringPrep.Type
  module Make :
    functor (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