sig
  exception Invalid_ldap_url of int * string
  val of_string : string -> Ldap_types.ldap_url
end