package drom_lib

  1. Overview
  2. Docs
type header_sep = {
  1. sep_name : string;
  2. sep_regexp : Str.regexp;
  3. sep_add_line : int;
  4. mutable sep_headers : header list;
}
and header = {
  1. header_id : string;
  2. header_lines : string list;
  3. header_sep : header_sep;
  4. mutable header_files : (int * file) list;
}
and file = {
  1. file_name : string;
  2. file_headers : (int * header) list;
}
type config = {
  1. ignore_headers : EzCompat.StringSet.t;
  2. ignore_files : EzCompat.StringSet.t;
  3. ignore_extensions : EzCompat.StringSet.t;
}
type env = {
  1. config : config;
  2. headers : (string, header) Hashtbl.t;
  3. mutable files : (string, file) Hashtbl.t;
  4. mutable save_to_ignore : EzCompat.StringSet.t;
}
val ignore_files_filename : string
val ignore_files_more_filename : string
val ignore_headers_filename : string
val homedir : string
val config_dir : string
val max_header_lines : int ref
val min_char_repetition : int ref
val stars : string
val spaces : string
val new_header_sep : ?sep_add_line:int -> string -> string -> header_sep
val ml_header : header_sep
val cc_header : header_sep
val sh_header : header_sep
val reset_headers : env -> unit
val is_header_sep : string -> header_sep -> bool
val new_header_id : string -> string
val new_header : env -> header_sep -> 'a -> string list -> ('b * header) list
val read_headers : env -> string list -> header_sep -> (int * header) list
val record_header : ?config:bool -> env -> string -> header_sep -> unit
val list_ignore_files : config -> EzCompat.StringSet.elt list -> config
val list_ignore_headers : config -> EzCompat.StringSet.elt list -> config
val add_default_ignored : config -> config
val scan_dir : env -> string -> unit
val check_file : env -> EzCompat.StringSet.elt -> string -> unit
val scan_dirs : env -> string list -> unit
val fprintf_loc : out_channel -> string -> int -> unit
val print_headers : EzCompat.StringSet.t -> header_sep -> string -> unit
val save_ignored : env -> unit
val remove_empty_lines : string list -> string list
val replace_header : header -> header -> int -> file -> bool
val add_default_header : header -> file -> bool
type args = {
  1. mutable arg_add_default : string list;
  2. mutable arg_dirs : string list;
  3. mutable arg_replace : string list;
  4. mutable arg_replace_by : string option;
  5. mutable arg_skip_headers : EzCompat.StringSet.t;
}
val undo_oc : out_channel option ref
val get_undo_oc : unit -> out_channel
val init_action : args -> env -> unit
val do_actions : args -> env -> unit
val new_args : unit -> args
val action : args -> unit
val cmd_name : string
OCaml

Innovation. Community. Security.

GitHub Discord Twitter Peertube RSS
About
Changelog Releases Industrial Users Academic Users Why OCaml
Ecosystem
Packages Community Events OCaml Planet Jobs
Resources
Install OCaml Get Started Platform Tools Language Manual Standard Library API Books Exercises Papers OCaml Playground Logo
Policies
Carbon Footprint Governance Privacy Code of Conduct