ocaml-extlib/test1.ml

   1 module StringMap = Map.Make (String)
   2
   3 let () =
   4   let map = StringMap.empty in
   5   let map = StringMap.add "foo" "bar" map in
   6   let map = StringMap.add "bar" "baz" map in
   7   let map = StringMap.add "baz" "bil" map in
   8   let map = StringMap.add "bil" "biz" map in
   9   print_endline (Std.dump map)
  10