aboutsummaryrefslogtreecommitdiff
path: root/src/test/run-pass/task-comm-0.rs
blob: 9030340c19b31df559207694333448ae65c693f0 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
// xfail-stage0
impure fn main() -> () {
    test05();
}

impure fn test05_start(chan[int] ch) {
    ch <| 10;
    ch <| 20;
    ch <| 30;
}

impure fn test05() {
    let port[int] po = port();
    let chan[int] ch = chan(po);
    spawn test05_start(chan(po));
    let int value <- po;
    value <- po;
    value <- po;
    check(value == 30);
}