stringSet.ml 76 Bytes
Newer Older
1 2 3 4 5
include Set.Make (String)

let of_list xs =
  List.fold_right add xs empty