CSY/reowolf Files · testdata/parser/positive/14.pdl · Centrum Wiskunde & Informatica (CWI)

Files @ 36cc1fe490f7

Branch filter:

Location: CSY/reowolf/testdata/parser/positive/14.pdl

36cc1fe490f7 739 B text/plain Show Annotation Show as Raw Download as Raw

Merge branch 'feat-api-cmds-and-branching'

Implements the programmer-facing API to allow programmatic
specification of a synchronous round. The way in which these put/get
interactions are performed is in an initial shape. Perhaps this will
change in the future.

The second main set of changes is the addion of a 'fork' statement,
which allows explicit forking, and allowing multiple puts/gets over the
same transport link within a single sync round.

#version 100

composite main(out c) {
	channel ao -> ai;
    channel bo -> bi;
	new sync_component(ai, bo);
	new binary_replicator(bi, ao, c);
}

primitive sync(in a, out b) {
    while (true) {
        sync {
            if (fires(a) && fires(b)) {
            	msg x = get(a);
            	put(b, x);
            } else {
                assert !fires(a) && !fires(b);
            }
        }
    }
}

primitive binary_replicator(in b, out a, out c) {
    while (true) {
        sync {
            if (fires(b) && fires(a) && fires(c)) {
                msg x = get(b);
                put(a, x);
                put(c, x);
            } else {
                assert !fires(a) && !fires(b) && !fires(c);
            }
        }
    }
}