ldc/tango/example/cluster/qrequest.d
Tomas Lindquist Olsen b15b3484c8 [svn r136] MAJOR UNSTABLE UPDATE!!!
Initial commit after moving to Tango instead of Phobos.

Lots of bugfixes...

This build is not suitable for most things.
2008-01-11 17:57:40 +01:00

30 lines
952 B
D

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 synchronous mode
*******************************************************************************/
void main ()
{
// join the cluster
auto cluster = (new Cluster).join;
// access a queue of the specified name
auto queue = new NetworkQueue (cluster, "my.queue.channel");
// 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);
// retreive synchronously
while (queue.get)
queue.log.info ("retrieved msg");
}