Local_state.For_tests
type snapshot_identifier =
| Staking_epoch_snapshot
| Next_epoch_snapshot
val set_snapshot : t -> snapshot_identifier -> Snapshot.t -> unit
val snapshot_of_ledger : Snapshot.Ledger_snapshot.t -> Snapshot.t