functor (Config : ConfigInt.Type->
  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