24 lines
274 B
Plaintext
24 lines
274 B
Plaintext
process id_uint8(?uint8: in, !uint8: out)
|
|
{
|
|
while (true)
|
|
{
|
|
uint8: c;
|
|
in ? c;
|
|
out ! c;
|
|
}
|
|
}
|
|
|
|
process main (?uint8: in, !uint8: out, !uint8: err)
|
|
{
|
|
channel uint8: x;
|
|
|
|
par
|
|
{
|
|
run id_uint8(?x,out);
|
|
seqeach (ch : "hello")
|
|
{
|
|
x ! ch;
|
|
}
|
|
}
|
|
}
|