--- Coro/t/04_rwlock.t 2001/07/26 03:46:15 1.1 +++ Coro/t/04_rwlock.t 2006/11/25 00:40:26 1.2 @@ -29,13 +29,18 @@ print "ok 7\n"; cede; +cede; +cede; +cede; print "ok 9\n"; $l->unlock; cede; + print "ok 12\n"; $l->rdlock; print "ok 13\n"; cede; +cede; print "ok 15\n";