BadVPN – Blame information for rev 1
?pathlinks?
| Rev | Author | Line No. | Line |
|---|---|---|---|
| 1 | office | 1 | process main { |
| 2 | var("0") x; |
||
| 3 | process_manager() mgr; |
||
| 4 | |||
| 5 | var("false") backtrack_check; |
||
| 6 | backtrack_point() point; |
||
| 7 | If (backtrack_check) { |
||
| 8 | val_equal(x, "2") a; # must not have rebound temporarily to A during backtracking |
||
| 9 | assert(a); |
||
| 10 | exit("0"); |
||
| 11 | }; |
||
| 12 | |||
| 13 | multiprovide("A"); |
||
| 14 | mgr->start("t1", "t1", {}); |
||
| 15 | val_equal(x, "1") a; # must have bound to A immediately |
||
| 16 | assert(a); |
||
| 17 | |||
| 18 | multiprovide("B") mgr; |
||
| 19 | val_equal(x, "2") a; # must have rebound to B immediately |
||
| 20 | assert(a); |
||
| 21 | |||
| 22 | backtrack_check->set("true"); |
||
| 23 | point->go(); |
||
| 24 | } |
||
| 25 | |||
| 26 | template t1 { |
||
| 27 | multidepend({"B", "A"}) dep; |
||
| 28 | num_add(dep.x, "1") new_x; |
||
| 29 | dep.x->set(new_x); |
||
| 30 | } |