CSY/reowolf Files · examples/eg_protocols.pdl · Centrum Wiskunde & Informatica (CWI)

Files @ a3c92705eeee

Branch filter:

Location: CSY/reowolf/examples/eg_protocols.pdl

a3c92705eeee 235 B text/plain Show Annotation Show as Raw Download as Raw

Christopher Esterhuyse

bugfix: native component branch forks that clash are MERGED rather than overwritten. Avoids race condition where (1) branch x ends and submits a solution, (2) branch y is created, has same predicate as x and overwrites it, but has a subset of its messages, (3) round ends in success but branch x is gone, so no suitable native branch is found

primitive pres_2(in i, out o) {
  synchronous {
    //put(o, get(i));
  }
}
primitive together(in ia, in ib, out oa, out ob){
  while(true) synchronous {
    if(fires(ia)) {
      put(oa, get(ia));
      put(ob, get(ib));
    }
  }	
}