Client: fix error message

This commit is contained in:
Benjamin Canou 2018-06-25 23:33:37 +02:00
parent 67f95ff156
commit fad851561b

View File

@ -225,7 +225,7 @@ let report_errors ~details ~show_source ?parsed ppf errs =
print_trace locations rest print_trace locations rest
| Alpha_environment.Ecoproto_error Gas.Gas_limit_too_high :: rest -> | Alpha_environment.Ecoproto_error Gas.Gas_limit_too_high :: rest ->
Format.fprintf ppf Format.fprintf ppf
"Gas limit for the block is out of the protocol hard bounds." ; "Gas limit for the operation is out of the protocol hard bounds." ;
if rest <> [] then Format.fprintf ppf "@," ; if rest <> [] then Format.fprintf ppf "@," ;
print_trace locations rest print_trace locations rest
| Alpha_environment.Ecoproto_error Gas.Block_quota_exceeded :: rest -> | Alpha_environment.Ecoproto_error Gas.Block_quota_exceeded :: rest ->