Alpha: remove some rebasing artefact that should be removed

This commit is contained in:
Pierre Chambart 2018-06-29 13:21:24 +02:00 committed by Benjamin Canou
parent 820fb9ab18
commit 32c5f47593

View File

@ -389,7 +389,6 @@ module Make_indexed_carbonated_data_storage
| None -> remove s i
| Some v -> init_set s i v
let data_name = "TODO remove" (* This is some rebasing artefact and should be removed *)
let fold_keys_unaccounted s ~init ~f =
let rec dig i path acc =
if Compare.Int.(i <= 1) then