Mercurial > projects > ldc
view tango/example/cluster/qclient.d @ 132:1700239cab2e trunk
[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.
author | lindquist |
---|---|
date | Fri, 11 Jan 2008 17:57:40 +0100 |
parents | |
children |
line wrap: on
line source
/******************************************************************************* *******************************************************************************/ import tango.io.Stdout; import tango.time.StopWatch; import tango.util.log.Configurator; import tango.net.cluster.NetworkQueue; import tango.net.cluster.tina.Cluster; /******************************************************************************* *******************************************************************************/ void main (char[][] args) { StopWatch w; auto cluster = (new Cluster).join; auto queue = new NetworkQueue (cluster, "my.queue.channel"); while (true) { w.start; for (int i=10000; i--;) queue.put (queue.EmptyMessage); Stdout.formatln ("{} put/s", 10000/w.stop); uint count; w.start; while (queue.get !is null) ++count; Stdout.formatln ("{} get/s", count/w.stop); } }