--- Coro/t/00_basic.t	2001/07/10 21:19:47	1.2
+++ Coro/t/00_basic.t	2001/08/11 19:59:20	1.4
@@ -1,23 +1,23 @@
 BEGIN { $| = 1; print "1..6\n"; }
 END {print "not ok 1\n" unless $loaded;}
-use Coro;
+use Coro::State;
 $loaded = 1;
 print "ok 1\n";
 
-my $main = new Coro;
-my $proc = new Coro \&a;
+my $main = new Coro::State;
+my $proc = new Coro::State \&a;
 
 sub a {
    print "ok 3\n";
-   $proc->transfer($main);
+   $proc->transfer($main, 0);
    print "ok 5\n";
-   $proc->transfer($main);
+   $proc->transfer($main, 0);
    die;
 }
 
 print "ok 2\n";
-$main->transfer($proc);
+$main->transfer($proc, 0);
 print "ok 4\n";
-$main->transfer($proc);
+$main->transfer($proc, 0);
 print "ok 6\n";