package ocaml-webworker

  1. Overview
  2. Docs
exception Fatal_error of string * Printexc.raw_backtrace
val fatal_error : string -> 'a
val try_finally : (unit -> 'a) -> (unit -> 'b) -> 'a
type ref_and_value =
  1. | R : 'a Pervasives.ref * 'a -> ref_and_value
val protect_refs : ref_and_value list -> (unit -> 'a) -> 'a
val map_end : ('a -> 'b) -> 'a list -> 'b list -> 'b list
val map_left_right : ('a -> 'b) -> 'a list -> 'b list
val for_all2 : ('a -> 'b -> bool) -> 'a list -> 'b list -> bool
val replicate_list : 'a -> int -> 'a list
val list_remove : 'a -> 'a list -> 'a list
val split_last : 'a list -> 'a list * 'a
val samelist : ('a -> 'b -> bool) -> 'a list -> 'b list -> bool
val may : ('a -> unit) -> 'a option -> unit
val may_map : ('a -> 'b) -> 'a option -> 'b option
val remove_file : string -> unit
val split_path : string -> string list -> string list
val fs_exact_case : 'a -> 'a
module File_exists : sig ... end
val exact_file_exists : string -> bool
val canonicalize_filename : ?cwd:string -> string -> string
val expand_glob : ?filter:(string -> bool) -> string -> string list -> string list
val find_in_path : string list -> string -> string
val find_in_path_rel : string list -> string -> string
val find_in_path_uncap : ?fallback:string -> string list -> string -> string
val expand_directory : string -> string -> string
val create_hashtable : int -> ('a * 'b) list -> ('a, 'b) Std.Hashtbl.t
val copy_file_chunk : Pervasives.in_channel -> Pervasives.out_channel -> int -> unit
val string_of_file : Pervasives.in_channel -> string
val input_bytes : Pervasives.in_channel -> int -> bytes
val log2 : int -> int
val align : int -> int -> int
val no_overflow_add : int -> int -> bool
val no_overflow_sub : int -> int -> bool
val no_overflow_mul : int -> int -> bool
val no_overflow_lsl : int -> int -> bool
module Int_literal_converter : sig ... end
val chop_extension_if_any : string -> string
val chop_extensions : string -> string
val search_substring : string -> string -> int -> int
val replace_substring : before:string -> after:string -> string -> string
val rev_split_string : (char -> bool) -> string -> string list
val rev_split_words : string -> string list
val rev_string_split : on:char -> string -> string list
val get_ref : 'a list Pervasives.ref -> 'a list
val fst3 : ('a * 'b * 'c) -> 'a
val snd3 : ('a * 'b * 'c) -> 'b
val thd3 : ('a * 'b * 'c) -> 'c
val fst4 : ('a * 'b * 'c * 'd) -> 'a
val snd4 : ('a * 'b * 'c * 'd) -> 'b
val thd4 : ('a * 'b * 'c * 'd) -> 'c
val fth4 : ('a * 'b * 'c * 'd) -> 'd
module LongString : sig ... end
val (~:) : 'a -> 'a Lazy.t
val file_contents : string -> string
val edit_distance : string -> string -> int -> int option
val spellcheck : string list -> string -> string list
val did_you_mean : Std.Format.formatter -> (unit -> string list) -> unit
val split : string -> char -> string list
val cut_at : string -> char -> string * string
val time_spent : unit -> float
module StringSet : sig ... end
module StringMap : sig ... end
val normalise_eol : string -> string
val unitname : string -> string
val modules_in_path : ext:string -> string list -> string list
type hook_info = {
  1. sourcefile : string;
}
type hook_exn_wrapper = {
  1. error : exn;
  2. hook_name : string;
  3. hook_info : hook_info;
}
exception HookExnWrapper of hook_exn_wrapper
exception HookExn of exn
val raise_direct_hook_exn : exn -> 'a
val fold_hooks : (string * (hook_info -> 'a -> 'a)) list -> hook_info -> 'a -> 'a
module type HookSig = sig ... end
module MakeHooks (M : sig ... end) : HookSig with type t = M.t