From 9f5a52118886ef807b51eac80a06e8aada35cc6f Mon Sep 17 00:00:00 2001 From: Vincent Botbol Date: Tue, 28 Aug 2018 17:46:48 +0200 Subject: [PATCH] Shell: preapply should hash instead of commit --- src/lib_shell/prevalidation.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/lib_shell/prevalidation.ml b/src/lib_shell/prevalidation.ml index aa359041a..8457845d5 100644 --- a/src/lib_shell/prevalidation.ml +++ b/src/lib_shell/prevalidation.ml @@ -241,7 +241,7 @@ let preapply ~predecessor ~timestamp ~protocol_data ~sort_operations:sort ops = NewProto.init context shell_header >>=? fun { context ; message ; _ } -> return (context, message) end >>=? fun (context, message) -> - Context.commit ?message ~time:timestamp context >>= fun context -> + Context.hash ?message ~time:timestamp context >>= fun context -> return ({ shell_header with context }, rs) let notify_operation (State { proto = (module Proto) ; new_operation_input ; }) result =