--- cvsroot/Coro/eg/bench	2001/07/03 05:05:45	1.1
+++ cvsroot/Coro/eg/bench	2001/07/10 01:43:21	1.2
@@ -28,9 +28,8 @@
 
 $main = $Coro::main;
 
-sub transfer {
-   Coro::_transfer($_[0], $_[1]);
-}
+#*transfer = \&Coro::_transfer;
+sub transfer { Coro::_transfer($_[0], $_[1]) }
 
 $c = Coro::_newprocess {
    while() {