examples/archived/multi-service/air-scripts/am_i_owner.clj

17 lines
419 B
Clojure
Raw Permalink Normal View History

2021-03-18 02:03:40 +00:00
(xor
(seq
(seq
(call relay ("op" "identity") [])
(call node (service "am_i_owner") [] result)
)
(seq
(call relay ("op" "identity") [])
(call %init_peer_id% (returnService "run") [result])
)
)
(seq
(call relay ("op" "identity") [])
(call %init_peer_id% (returnService "run") ["XOR FAILED" %last_error%])
)
)