blob: 5e2b955bb74da6cffb0591e9eb7e7e2546227cd3 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
|
import concurrent.SyncVar;
import concurrent.jolib._;
class Ref[a](init: a) extends Join {
object get extends Synchr[a](this) { case class C() extends SyncVar[a]; }
object set extends Synchr[unit](this) { case class C(x: a) extends SyncVar[unit]; }
object state extends Asynchr(this) { case class C(x: a); }
rules (
Pair(List(get, state), { case List(g @ get.C(), state.C(x) ) =>
{ g.set(x); state.send(state.C(x)) } }),
Pair(List(set, state), { case List(s @ set.C(x), state.C(y) ) =>
{ s.set(()); state.send(state.C(x)) } })
);
state.send(state.C(init));
def Get: a = get.send(get.C());
def Set(x: a): unit = set.send(set.C(x));
}
object RefTest {
def main(args: Array[String]) = {
System.out.println("Started.");
concurrent.ops.spawn({
val r1 = new Ref(0);
System.out.println("Reference r1 created.");
System.out.println("Value r1 (first time) = " + r1.Get);
r1.Set(42);
System.out.println("Value r1 (second time) = " + r1.Get);
});
concurrent.ops.spawn({
val r2 = new Ref(100);
System.out.println("Reference r2 created.");
System.out.println("Value r2 (first time) = " + r2.Get);
r2.Set(89);
System.out.println("Value r2 (second time) = " + r2.Get);
});
}
}
|
