10 lines
290 B
Plaintext
10 lines
290 B
Plaintext
|
type return = operation list * string
|
||
|
|
|
||
|
|
let main (action, store : string * string) : return =
|
||
|
|
let toto : operation * address = Tezos.create_contract
|
||
|
|
(fun (p, s : nat * string) -> (([] : operation list), "one"))
|
||
|
|
(None: key_hash option)
|
||
|
|
300tz
|
||
|
|
"un"
|
||
|
|
in
|
||
|
|
([toto.0], store)
|