LTerm_history

`sig
type t
val create :
?max_size:int -> ?max_entries:int -> Zed_utf8.t list -> LTerm_history.t
val add :
LTerm_history.t ->
?skip_empty:bool -> ?skip_dup:bool -> Zed_utf8.t -> unit
val contents : LTerm_history.t -> Zed_utf8.t list
val size : LTerm_history.t -> int
val length : LTerm_history.t -> int
val old_count : LTerm_history.t -> int
val set_old_count : LTerm_history.t -> int -> unit
val max_size : LTerm_history.t -> int
val set_max_size : LTerm_history.t -> int -> unit
val max_entries : LTerm_history.t -> int
val set_max_entries : LTerm_history.t -> int -> unit
val load :
LTerm_history.t ->
?log:(int -> string -> unit) ->
?skip_empty:bool -> ?skip_dup:bool -> string -> unit Lwt.t
val save :
LTerm_history.t ->
?max_size:int ->
?max_entries:int ->
?skip_empty:bool ->
?skip_dup:bool -> ?append:bool -> ?perm:int -> string -> unit Lwt.t
val entry_size : Zed_utf8.t -> int
end`