aboutsummaryrefslogtreecommitdiff
path: root/hsm-dummy-poller
diff options
context:
space:
mode:
Diffstat (limited to 'hsm-dummy-poller')
-rw-r--r--hsm-dummy-poller/Main.hs3
1 files changed, 3 insertions, 0 deletions
diff --git a/hsm-dummy-poller/Main.hs b/hsm-dummy-poller/Main.hs
index 7a35230..762d139 100644
--- a/hsm-dummy-poller/Main.hs
+++ b/hsm-dummy-poller/Main.hs
@@ -44,6 +44,9 @@ handle =
$ logInfo_
$ "Received pulse #" <> pack (show p)
+-- Dummy poller service:
+-- Proof of concept. Polls for "pulses" through ZMQ at a set interval and
+-- logs each time one is received.
main :: IO ()
main =
launch @Env "dummy-poller" withoutInputEcho $ \env logger level ->