18 lines
382 B
Plaintext
18 lines
382 B
Plaintext
// Test more advanced chain interactions
|
|
|
|
contract ChainTest =
|
|
|
|
record state = { last_bf : address
|
|
, nw_id : string }
|
|
|
|
function init() : state =
|
|
{last_bf = Contract.address}
|
|
|
|
function miner() = Chain.coinbase
|
|
|
|
function save_coinbase() =
|
|
put(state{last_bf = Chain.coinbase})
|
|
|
|
function save_network_id() =
|
|
put(state{nw_id = Chain.network_id})
|