From 546eff6eb7c47cf5102c087517ea5c4be47c6b05 Mon Sep 17 00:00:00 2001 From: Benjamin Canou Date: Sat, 30 Jun 2018 00:08:41 +0200 Subject: [PATCH] Michelson: adjust gaz weights --- src/proto_alpha/lib_protocol/src/gas_limit_repr.ml | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/src/proto_alpha/lib_protocol/src/gas_limit_repr.ml b/src/proto_alpha/lib_protocol/src/gas_limit_repr.ml index 1960c71b8..ce0539394 100644 --- a/src/proto_alpha/lib_protocol/src/gas_limit_repr.ml +++ b/src/proto_alpha/lib_protocol/src/gas_limit_repr.ml @@ -67,12 +67,12 @@ let pp_cost ppf { allocations ; steps ; reads ; writes ; bytes_read ; bytes_writ type error += Block_quota_exceeded (* `Temporary *) type error += Operation_quota_exceeded (* `Temporary *) -let allocation_weight = Z.of_int 2 (* FIXME: placeholder *) -let step_weight = Z.of_int 1 (* FIXME: placeholder *) -let read_base_weight = Z.of_int 10 (* FIXME: placeholder *) -let write_base_weight = Z.of_int 20 (* FIXME: placeholder *) -let byte_read_weight = Z.of_int 10 (* FIXME: placeholder *) -let byte_written_weight = Z.of_int 20 (* FIXME: placeholder *) +let allocation_weight = Z.of_int 2 +let step_weight = Z.of_int 1 +let read_base_weight = Z.of_int 50 +let write_base_weight = Z.of_int 80 +let byte_read_weight = Z.of_int 10 +let byte_written_weight = Z.of_int 15 let consume block_gas operation_gas cost = match operation_gas with | Unaccounted -> ok (block_gas, Unaccounted)