Note re presence glitch problem. See also journal entry.

2012-06-23 07:54:05 -04:00 · 2012-06-23 07:54:05 -04:00 · 83cae7075e
parent ba5c639814
commit 83cae7075e
1 changed files with 4 additions and 0 deletions
--- a/os2-tcp.rkt
+++ b/os2-tcp.rkt
@ -132,6 +132,10 @@
 	     (topic-publisher (tcp-channel any-remote local-addr (wild)) #:virtual? #t))
      #:state state
      #:topic t
+      ;; Hey, what if the presence we need went away between our
+      ;; manager spawning us, and us getting to this point? Presence
+      ;; being "edge-" rather than "level-triggered" means we'll hang
+      ;; around sadly forever, accepting connections to nowhere. TODO
      #:on-absence (match t
 		     [(or (topic 'publisher (tcp-channel (== local-addr) remote-addr _) _)
 			  (topic 'subscriber (tcp-channel remote-addr (== local-addr) _) _))