Module Merlin_utils.Std

type json = [
  1. | `Assoc of (string * json) list
  2. | `Bool of bool
  3. | `Float of float
  4. | `Int of int
  5. | `List of json list
  6. | `Null
  7. | `String of string
]
module Json : sig ... end
module Hashtbl : sig ... end
module List : sig ... end
module Option : sig ... end
module Result : sig ... end
module String : sig ... end
val sprintf : ('a, unit, string) format -> 'a
module Format : sig ... end
module Lexing : sig ... end
module Char : sig ... end
module Glob : sig ... end
val fprintf : Format.formatter -> ('a, Format.formatter, unit) format -> 'a
val lazy_eq : 'a Lazy.t -> 'a Lazy.t -> bool
val let_ref : 'a ref -> 'a -> (unit -> 'b) -> 'b
val failwithf : ('a, unit, string, 'b) format4 -> 'a
module Shell : sig ... end
module System : sig ... end
val modules_in_path : ext:string -> string list -> string list
val file_contents : string -> string
val reraise : exn -> 'a
type 'a with_workdir = {
  1. workdir : string;
  2. workval : 'a;
}

Some value that must be interpreted with respect to a specific work directory. (e.g. for resolving relative paths or executing sub-commands

val dump_with_workdir : ('a -> json) -> 'a with_workdir -> json