this repo has no description

Don't depend on odoc_utils in the driver

This might make the driver incompatible with some versions of Odoc.

authored by

Jules Aguillon and committed by jon.recoil.org c194958a c9cd4fcd

+3 -5
+1 -2
src/driver/dune
··· 14 14 logs 15 15 logs.fmt 16 16 eio_main 17 - sexplib 18 - odoc_utils)) 17 + sexplib))
+2 -3
src/driver/util.ml
··· 1 - open Odoc_utils 2 1 open Bos 2 + 3 + let ( >>= ) = Result.bind 3 4 4 5 module StringSet = Set.Make (String) 5 6 module StringMap = Map.Make (String) ··· 26 27 (** Opens a file for writing and calls [f]. The destination directory is created 27 28 if needed. *) 28 29 let with_out_to filename f = 29 - let open ResultMonad in 30 30 let filename = Fpath.normalize filename in 31 31 OS.Dir.create (Fpath.parent filename) >>= fun _ -> 32 32 OS.File.with_oc filename ··· 35 35 Ok ()) 36 36 () 37 37 |> Result.join 38 - >>= fun () -> Ok () 39 38 40 39 let cp src dst = assert (lines_of_process Cmd.(v "cp" % src % dst) = [])