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

Files @ cb4c9d11dfe6

Branch filter:

Location: CSY/reowolf/examples/eg_protocols.pdl

cb4c9d11dfe6 348 B text/plain Show Annotation Show as Raw Download as Raw

Add (failing) test for multiple put and get. Preparing to bork old runtime and tests

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

primitive alt_round_merger(in a, in b, out c){
  while(true) {
    sync { put(c, get(a)); }
    sync { put(c, get(b)); }
  }	
}