View raw

1 (** Deterministic native history for the local development account. *) 2 3 module Make (R : Repository.S) (_ : Password_hash.S) : sig 4 val seed : R.t -> now:Recovery.timestamp -> unit Lwt.t 5 (** Create [test] with password [test], select the Ideal Routine, and add 6 three months of complete history when the account has no native history. 7 Existing history is left unchanged. *) 8 end 9