mirror of
https://github.com/fluencelabs/aquavm
synced 2025-04-24 14:52:15 +00:00
23 lines
446 B
Cheetah
23 lines
446 B
Cheetah
(new %map
|
|
(seq
|
|
(seq
|
|
(call "init_peer_id" ("" "init") [] data) ; ok = [{data}]
|
|
(seq
|
|
(canon "other_peer_id" %map #%switch_node1)
|
|
(fold data key
|
|
(seq
|
|
(fold data value
|
|
(seq
|
|
(ap (key value) %map)
|
|
(next value)
|
|
)
|
|
)
|
|
(next key)
|
|
)
|
|
)
|
|
)
|
|
)
|
|
(call "init_peer_id" ("" "complete") [])
|
|
)
|
|
)
|