mirror of
https://github.com/fluencelabs/examples
synced 2024-12-13 23:05:40 +00:00
16 lines
441 B
Clojure
16 lines
441 B
Clojure
|
(xor
|
||
|
|
(seq
|
||
|
|
(seq
|
||
|
|
(call relay ("op" "identity") [])
|
||
|
|
(call node_1 (service "hex_to_int") [hex_string] hex_result)
|
||
|
|
)
|
||
|
|
(seq
|
||
|
|
(call relay ("op" "identity") [])
|
||
|
|
(call %init_peer_id% (returnService "run") [hex_result])
|
||
|
|
)
|
||
|
|
)
|
||
|
|
(seq
|
||
|
|
(call relay ("op" "identity") [])
|
||
|
|
(call %init_peer_id% (returnService "run") ["XOR FAILED" %last_error%])
|
||
|
|
)
|
||
|
|
)
|