diff --git a/src/proto_alpha/lib_protocol/src/qty_repr.ml b/src/proto_alpha/lib_protocol/src/qty_repr.ml index acf2bc8cc..6d7f23b2e 100644 --- a/src/proto_alpha/lib_protocol/src/qty_repr.ml +++ b/src/proto_alpha/lib_protocol/src/qty_repr.ml @@ -223,7 +223,7 @@ module Make (T: QTY) : S = struct let encoding = let open Data_encoding in - (conv to_int64 (Json.wrap_error of_mutez_exn) int64) + (check_size 10 (conv Z.of_int64 (Json.wrap_error Z.to_int64) n)) let () = let open Data_encoding in