···14 "ocamlbuild" {build}
15 "topkg" {build & >= "1.0.3"}]
16depopts: ["cmdliner"]
17-conflicts: ["cmdliner" {< "0.9.8"}]
18build: [["ocaml" "pkg/pkg.ml" "build" "--dev-pkg" "%{dev}%"
19 "--with-cmdliner" "%{cmdliner:installed}%"]]
20description: """
···26Functions are also provided to fold over the characters of UTF encoded
27OCaml string values and to directly encode characters in OCaml
28Buffer.t values. **Note** that since OCaml 4.14, that functionality
29-can be found in the Stdlib and you are encouraged to migrate to.
3031Uutf has no dependency and is distributed under the ISC license.
32
···14 "ocamlbuild" {build}
15 "topkg" {build & >= "1.0.3"}]
16depopts: ["cmdliner"]
17+conflicts: ["cmdliner" {< "1.1.0"}]
18build: [["ocaml" "pkg/pkg.ml" "build" "--dev-pkg" "%{dev}%"
19 "--with-cmdliner" "%{cmdliner:installed}%"]]
20description: """
···26Functions are also provided to fold over the characters of UTF encoded
27OCaml string values and to directly encode characters in OCaml
28Buffer.t values. **Note** that since OCaml 4.14, that functionality
29+can be found in the Stdlib and you are encouraged to migrate to it.
3031Uutf has no dependency and is distributed under the ISC license.
32
+5-5
test/utftrip.ml
···382 See http://erratique.ch/software/uutf for contact
383 information."; ]
384 in
385- Term.(pure do_cmd $ cmd $ file $ sin $ sout $ use_unix $ usize $
386- ienc $ oenc $ nln $ rseed $ rcount),
387- Term.info "utftrip" ~version:"%%VERSION%%" ~doc ~man
388389-let () = match Term.eval cmd with
390-| `Error _ -> exit 1
391| _ -> if !input_malformed then exit 2 else exit 0
392393(*---------------------------------------------------------------------------
···382 See http://erratique.ch/software/uutf for contact
383 information."; ]
384 in
385+ Cmd.v (Cmd.info "utftrip" ~version:"%%VERSION%%" ~doc ~man)
386+ Term.(const do_cmd $ cmd $ file $ sin $ sout $ use_unix $ usize $
387+ ienc $ oenc $ nln $ rseed $ rcount)
388389+let () = match Cmd.eval_value cmd with
390+| Error _ -> exit 1
391| _ -> if !input_malformed then exit 2 else exit 0
392393(*---------------------------------------------------------------------------