Commit b7a71100 authored by Jakob Botsch Nielsen's avatar Jakob Botsch Nielsen

Get deployed congress address from transaction

parent 56054f6d
Pipeline #12092 passed with stage
in 5 minutes and 27 seconds
......@@ -11,9 +11,6 @@ Import ListNotations.
Section LocalBlockchainTests.
(* Addresses *)
Definition congress_1 : Address :=
BoundedN.of_Z_const AddrSize (Z.of_N ContractAddrBase).
Definition baker : Address :=
BoundedN.of_Z_const AddrSize 10.
......@@ -80,6 +77,12 @@ Section LocalBlockchainTests.
[build_act person_1 deploy_congress]
4 0).
Definition congress_1 : Address :=
match outgoing_txs chain4 person_1 with
| tx :: _ => tx_to tx
| _ => person_1
end.
Compute (contract_deployment chain4 congress_1).
Compute (account_balance chain4 person_1).
Compute (account_balance chain4 baker).
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment