ligo/src/test/contracts/address.mligo
Christian Rinderknecht 93682629b4 Updating contracts.
2020-02-27 17:51:29 +01:00

4 lines
102 B
Plaintext

let main (p : key_hash) =
let c : unit contract = Current.implicit_account p
in Current.address c