Remove warning message "Warning: dropping ignored channel i/o result"

because it can be legitimately triggered by WAIT-FOR-CHANNELS.
This commit is contained in:
sperber 2002-12-11 12:40:29 +00:00
parent a3332290c6
commit 3a1439a16e
1 changed files with 11 additions and 6 deletions

View File

@ -39,12 +39,17 @@
=> (lambda (thread)
(decrement-channel-wait-count!)
(make-ready thread status)))
(else
(debug-message "Warning: dropping ignored channel i/o result {Channel "
(channel-os-index channel)
" "
(channel-id channel)
"}")))
;; The problem with the debug message is that
;; WAIT-FOR-CHANNELS can trigger this warning in a perfectly
;; legimitate situation because of a race I don't know how to
;; avoid. --Mike
; (else
; (debug-message "Warning: dropping ignored channel i/o result {Channel "
; (channel-os-index channel)
; " "
; (channel-id channel)
; "}"))
)
(cond
((and maybe-ready-cell
(cell-ref maybe-ready-cell))