BadVPN – Blame information for rev 1

Subversion Repositories:
Rev:
Rev Author Line No. Line
1 office 1 process main {
2 var("hello") x;
3 provide("A");
4 depend("A") d;
5 val_equal(d.x, "hello") a;
6 assert(a);
7 d.x->set("world");
8 val_equal(d.x, "world") a;
9 assert(a);
10  
11 var("hello") x;
12 provide("B");
13 val_equal(x, "world") a;
14 assert(a);
15  
16 var("hello") x;
17 provide("C");
18 val_equal(x, "hello") a;
19 assert(a);
20 depend("C_done");
21 val_equal(x, "world") a;
22 assert(a);
23  
24 var("hello") x;
25 blocker() blk;
26 provide("D");
27 val_equal(x, "hello") a;
28 assert(a);
29 blk->up();
30 val_equal(x, "0") a;
31 assert(a);
32 blk->down();
33 blk->up();
34 val_equal(x, "1") a;
35 assert(a);
36  
37 exit("0");
38 }
39  
40 process proc1 {
41 depend("B") dep;
42 dep.x->set("world");
43 }
44  
45 process proc2 {
46 depend("C") dep;
47 sleep("0", "0");
48 dep.x->set("world");
49 provide("C_done");
50 }
51  
52 process proc3 {
53 depend("D") dep;
54 dep.blk->use();
55 provide("E");
56 }
57  
58 process proc4 {
59 var("0") i;
60 depend("E") dep;
61 dep.dep.x->set(i);
62 num_add(i, "1") j;
63 i->set(j);
64 }