some more logging

This commit is contained in:
2026-05-12 15:12:03 +02:00
parent 734aeef222
commit d298b411a5
+2
View File
@@ -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)]