[ViewVC] Diff of: cvs/cvsroot/AnyEvent-MP/MP.pm

Comparing cvsroot/AnyEvent-MP/MP.pm (file contents):
Revision 1.8 by root, Sun Aug 2 14:44:37 2009 UTC vs.
Revision 1.10 by root, Sun Aug 2 18:05:43 2009 UTC

 use AE ();
 use base "Exporter";
-our $VERSION = '0.01';
+our $VERSION = '0.02';
 our @EXPORT = qw(
    NODE $NODE $PORT snd rcv _any_
    create_port create_port_on
    become_slave become_public
 );
             && undef $_;
       }
    };
    $self
+}
+=item $portid = create_miniport { }
+Creates a "mini port", that is, a port without much #TODO
+=cut
+sub create_miniport(&) {
+   my $cb = shift;
+   my $id = "$AnyEvent::MP::Base::UNIQ." . ++$AnyEvent::MP::Base::ID;
+   $AnyEvent::MP::Base::PORT{$id} = sub {
+      &$cb
+         and delete $AnyEvent::MP::Base::PORT{$id};
+   };
+   "$NODE#$id"
 }
 package AnyEvent::MP::Port;
 =back

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines