Mercurial > projects > ldc
view tango/example/cluster/qlisten.d @ 358:051f5b550d9c trunk
[svn r379] Fix slice assigns of the form T[] = T when T is a typedef.
Fixes run/a/array_initialization_20_B, D, F, H.
author | ChristianK |
---|---|
date | Mon, 14 Jul 2008 12:39:23 +0200 |
parents | 1700239cab2e |
children |
line wrap: on
line source
private import tango.core.Thread; private import tango.util.log.Configurator; private import tango.net.cluster.NetworkQueue; private import tango.net.cluster.tina.Cluster; /******************************************************************************* Illustrates how to setup and use a Queue in asynchronous mode *******************************************************************************/ void main () { void listen (IEvent event) { while (event.get) event.log.info ("received asynch msg on channel " ~ event.channel.name); } // join the cluster auto cluster = (new Cluster).join; // access a queue of the specified name auto queue = new NetworkQueue (cluster, "my.queue.channel"); // listen for messages placed in my queue, via a delegate queue.createConsumer (&listen); // stuff something into the queue queue.log.info ("sending three messages to the queue"); queue.put (queue.EmptyMessage); queue.put (queue.EmptyMessage); queue.put (queue.EmptyMessage); // wait for asynchronous msgs to arrive ... Thread.sleep (1); }