Remove debugging print

2007-11-06 21:04:01 -06:00 · 2007-11-06 21:04:01 -06:00 · 028668cc09
parent e5b4177487
commit 028668cc09
1 changed files with 0 additions and 1 deletions
--- a/extra/concurrency/concurrency.factor
+++ b/extra/concurrency/concurrency.factor
@ -43,7 +43,6 @@ TUPLE: thread timeout continuation continued? ;
 : (mailbox-block-if-empty) ( mailbox timeout -- mailbox2 )
    over mailbox-empty? [
        [ <thread> swap mailbox-threads push stop ] callcc0
-        "(mailbox-block-if-empty)" print flush
        (mailbox-block-if-empty)
    ] [
        drop