--- Coro/eg/prodcons2	2001/07/03 03:52:48	1.1
+++ Coro/eg/prodcons2	2001/07/15 02:35:52	1.4
@@ -6,10 +6,9 @@
 # consumed the item.
 
 use Coro;
-use Coro::Process;
 use Coro::Semaphore;
 
-my $produced = new Coro::Semaphore;
+my $produced = new Coro::Semaphore 0;
 my $finished = new Coro::Semaphore 0;
 
 async {
@@ -21,7 +20,6 @@
    }
    print "work done\n";
    $finished->up;
-   $idle;
 };
 
 async {