2011-07-12 17:27:17 -05:00
|
|
|
use std;
|
|
|
|
import std::task;
|
2011-08-06 12:07:39 -05:00
|
|
|
import std::comm;
|
2011-08-25 13:20:43 -05:00
|
|
|
import comm::chan;
|
|
|
|
import comm::recv;
|
|
|
|
import comm::port;
|
2011-07-12 17:27:17 -05:00
|
|
|
|
2011-07-27 07:19:39 -05:00
|
|
|
fn main() { test00(); }
|
2010-07-28 18:58:17 -05:00
|
|
|
|
2011-08-25 13:20:43 -05:00
|
|
|
fn test00_start(c: comm::chan<int>, start: int, number_of_messages: int) {
|
2011-07-27 07:19:39 -05:00
|
|
|
let i: int = 0;
|
2011-08-12 19:36:52 -05:00
|
|
|
while i < number_of_messages { comm::send(c, start + i); i += 1; }
|
2010-07-28 18:58:17 -05:00
|
|
|
}
|
|
|
|
|
2011-04-19 15:35:49 -05:00
|
|
|
fn test00() {
|
2011-07-27 07:19:39 -05:00
|
|
|
let r: int = 0;
|
|
|
|
let sum: int = 0;
|
2011-08-25 13:20:43 -05:00
|
|
|
let p = port();
|
2011-07-27 07:19:39 -05:00
|
|
|
let number_of_messages: int = 10;
|
|
|
|
|
2011-08-12 19:36:52 -05:00
|
|
|
let t0 =
|
2011-08-25 13:20:43 -05:00
|
|
|
task::spawn_joinable(bind test00_start(chan(p),
|
|
|
|
number_of_messages * 0,
|
|
|
|
number_of_messages));
|
2011-08-12 19:36:52 -05:00
|
|
|
let t1 =
|
2011-08-25 13:20:43 -05:00
|
|
|
task::spawn_joinable(bind test00_start(chan(p),
|
|
|
|
number_of_messages * 1,
|
|
|
|
number_of_messages));
|
2011-08-12 19:36:52 -05:00
|
|
|
let t2 =
|
2011-08-25 13:20:43 -05:00
|
|
|
task::spawn_joinable(bind test00_start(chan(p),
|
|
|
|
number_of_messages * 2,
|
|
|
|
number_of_messages));
|
2011-08-12 19:36:52 -05:00
|
|
|
let t3 =
|
2011-08-25 13:20:43 -05:00
|
|
|
task::spawn_joinable(bind test00_start(chan(p),
|
|
|
|
number_of_messages * 3,
|
|
|
|
number_of_messages));
|
2011-07-27 07:19:39 -05:00
|
|
|
|
|
|
|
let i: int = 0;
|
|
|
|
while i < number_of_messages {
|
2011-08-25 13:20:43 -05:00
|
|
|
r = recv(p);
|
2011-07-27 07:19:39 -05:00
|
|
|
sum += r;
|
2011-08-25 13:20:43 -05:00
|
|
|
r = recv(p);
|
2011-07-27 07:19:39 -05:00
|
|
|
sum += r;
|
2011-08-25 13:20:43 -05:00
|
|
|
r = recv(p);
|
2011-07-27 07:19:39 -05:00
|
|
|
sum += r;
|
2011-08-25 13:20:43 -05:00
|
|
|
r = recv(p);
|
2011-07-27 07:19:39 -05:00
|
|
|
sum += r;
|
2010-07-28 18:58:17 -05:00
|
|
|
i += 1;
|
|
|
|
}
|
2011-07-13 17:44:09 -05:00
|
|
|
|
2011-08-25 13:20:43 -05:00
|
|
|
task::join(t0);
|
|
|
|
task::join(t1);
|
|
|
|
task::join(t2);
|
|
|
|
task::join(t3);
|
2011-07-13 17:44:09 -05:00
|
|
|
|
2011-07-27 07:19:39 -05:00
|
|
|
assert (sum == number_of_messages * 4 * (number_of_messages * 4 - 1) / 2);
|
2011-08-10 11:27:22 -05:00
|
|
|
}
|