ligo/src/test/contracts/expected/michelson_pair_tree.religo
2020-06-04 21:36:12 +02:00

14 lines
329 B
Plaintext

type inner_storage = michelson_pair(int, "one", nat, "two");
type storage = michelson_pair
(int, "three", inner_storage, "four");
type return = (list(operation), storage);
let main =
((action, store): (unit, storage)): return =>
{
let foo = (3, (1, 2n));
(([] : list(operation)), (foo : storage))
};