My_unix (ocamlbuild.Ocamlbuild_pack.My

type file_kind =

| FK_dir
| FK_file
| FK_link
| FK_other

type stats = {

stat_file_kind : file_kind;
stat_key : string;

}

val is_link : string -> bool

val run_and_open : string -> (in_channel -> 'a) -> 'a

val readlink : string -> string

val run_and_read : string -> string

val execute_many : 
  ?max_jobs:int ->
  ?ticker:(unit -> unit) ->
  ?period:float ->
  ?display:((out_channel -> unit) -> unit) ->
  (unit -> string) list list ->
  (bool list * exn) option

val report_error : Format.formatter -> exn -> unit

val at_exit_once : (unit -> unit) -> unit

val gettimeofday : unit -> float

val stdout_isatty : unit -> bool

val stat : string -> stats

val lstat : string -> stats