Alpha: remove unused storage key.

This commit is contained in:
Benjamin Canou 2017-03-28 14:36:47 +02:00
parent 31bc331063
commit 66cb6a8567

View File

@ -60,7 +60,6 @@ module Key = struct
let store_root tail = version :: "store" :: tail let store_root tail = version :: "store" :: tail
let current_level = store_root ["level"] let current_level = store_root ["level"]
let current_fitness = store_root ["fitness"]
let global_counter = store_root ["global_counter"] let global_counter = store_root ["global_counter"]
@ -144,14 +143,6 @@ module Current_level =
let encoding = Raw_level_repr.encoding let encoding = Raw_level_repr.encoding
end) end)
module Current_fitness =
Make_single_data_storage(struct
type value = int64
let name = "fitness"
let key = Key.current_fitness
let encoding = Data_encoding.int64
end)
(** Rolls *) (** Rolls *)
module Roll = struct module Roll = struct