--- Coro/t/02_channel.t	2001/07/21 18:21:45	1.4
+++ Coro/t/02_channel.t	2001/07/23 02:14:20	1.5
@@ -14,7 +14,7 @@
 }
 
 print "ok 1\n";
-yield;
+cede;
 
 for (11..19) {
    my $x = $q->get;