From dcc5bc6b1aaa5a5bbee88db9758b619704d850bc Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Gr=C3=A9goire=20Henry?= Date: Thu, 22 Feb 2018 16:45:56 -0500 Subject: [PATCH] Alpha: remove warning --- src/proto_alpha/lib_protocol/src/storage_functors.ml | 1 - 1 file changed, 1 deletion(-) diff --git a/src/proto_alpha/lib_protocol/src/storage_functors.ml b/src/proto_alpha/lib_protocol/src/storage_functors.ml index 4c41e97db..58285de31 100644 --- a/src/proto_alpha/lib_protocol/src/storage_functors.ml +++ b/src/proto_alpha/lib_protocol/src/storage_functors.ml @@ -264,7 +264,6 @@ module Make_indexed_data_snapshotable_storage (C : Raw_context.T) let data_name = ["current"] let snapshot_name = ["snapshot"] - let snapshot_name_length = List.length snapshot_name module C_data = Make_subcontext(C)(struct let name = data_name end) module C_snapshot = Make_subcontext(C)(struct let name = snapshot_name end)