cvs commit: p5ee/App-Context/lib/App Context.pm

cvsuser     06/02/28 19:31:23

  Modified:    App-Context/lib/App Context.pm
  Log:
  comments
  
  Revision  Changes    Path
  1.26      +9 -4      p5ee/App-Context/lib/App/Context.pm
  
  Index: Context.pm
  ===================================================================
  RCS file: /cvs/public/p5ee/App-Context/lib/App/Context.pm,v
  retrieving revision 1.25
  retrieving revision 1.26
  diff -u -r1.25 -r1.26
  --- Context.pm	24 Feb 2006 22:28:40 -0000	1.25
  +++ Context.pm	1 Mar 2006 03:31:23 -0000	1.26
  @@ -1988,9 +1988,14 @@
       &App::sub_exit() if ($App::trace);
   }
   
  -# NOTE: The baseline context doesn't implement asynchronous events.
  -#       Therefore, it simply sends the event, then sends the callback event.
  -#       See Context::Cluster for a context that spawns processes.
  +# NOTE: The baseline context implements the API for asynchronous events
  +#       in a simplistic, sequential way.
  +#       It merely sends the event, then sends the callback event.
  +#       See App::Context::Server for a context that spawns processes which
  +#       execute the event.  When the process exits, the callback_event is fired.
  +#       See App::Context::Cluster for a context that sends a message to an
  +#       available cluster node for executing.  When the node reports back that
  +#       it has completed the task, the callback_event is fired.
   sub send_async_event {
       &App::sub_entry if ($App::trace);
       my ($self, $event, $callback_event) = @_;