Client: missing error message

This commit is contained in:
Benjamin Canou 2018-06-29 15:31:42 +02:00
parent 3677550e4d
commit c2a143a30a
2 changed files with 13 additions and 1 deletions

View File

@ -212,6 +212,13 @@ assert_storage $contract_dir/exec_concat.tz '"?"' '"test"' '"test_abc"'
# Get current steps to quota
assert_storage $contract_dir/steps_to_quota.tz 111 Unit 399815
# Gas bounds checks
assert_fails $client -l originate contract first_explosion for bootstrap1 \
transferring 0 from bootstrap1 \
running '{parameter unit;\
storage unit;\
code{DROP;PUSH nat 0;DUP;PAIR;DUP;PAIR;DUP;PAIR;DUP;PAIR;DUP;PAIR;DUP;PAIR;DUP;PAIR;DUP;PAIR;}}' -G 8000
# Get the current balance of the contract
assert_storage $contract_dir/balance.tz '111' Unit '4000000000000'

View File

@ -189,7 +189,12 @@ let report_errors ~details ~show_source ?parsed ppf errs =
print_trace locations rest
| Alpha_environment.Ecoproto_error Cannot_serialize_error :: rest ->
Format.fprintf ppf
"Error too big to serialize using the provided gas bounds." ;
"Error too big to serialize within the provided gas bounds." ;
if rest <> [] then Format.fprintf ppf "@," ;
print_trace locations rest
| Alpha_environment.Ecoproto_error Cannot_serialize_storage :: rest ->
Format.fprintf ppf
"Cannot serialize the resulting storage value within the provided gas bounds." ;
if rest <> [] then Format.fprintf ppf "@," ;
print_trace locations rest
| Alpha_environment.Ecoproto_error (Missing_field prim) :: rest ->