some more logging
This commit is contained in:
@@ -122,10 +122,12 @@
|
|||||||
(loop)]
|
(loop)]
|
||||||
|
|
||||||
[`(close)
|
[`(close)
|
||||||
|
(log! "!!! close received")
|
||||||
(close!)
|
(close!)
|
||||||
(place-channel-put cmd-ch 'closed)]
|
(place-channel-put cmd-ch 'closed)]
|
||||||
|
|
||||||
[`(stop)
|
[`(stop)
|
||||||
|
(log! "!!! stop received")
|
||||||
(close!)
|
(close!)
|
||||||
(place-channel-put cmd-ch 'stopped)
|
(place-channel-put cmd-ch 'stopped)
|
||||||
(loop)]
|
(loop)]
|
||||||
|
|||||||
Reference in New Issue
Block a user