You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
8 lines
299 B
8 lines
299 B
6 years ago
|
type BType is union Empty | Full end
|
||
|
|
|
||
|
|
process Pre(&Stored, &Delayed : FailureType, S : BType, &env : Flows) is
|
||
|
|
states s0
|
||
|
|
from s0 select
|
||
|
|
on (Stored != env.I and S = Empty); wait [0,0]; Stored := I; ...
|
||
|
|
[] on (S = Full); wait [a,b]; Delayed := Stored; S := Empty; ...
|
||
|
|
end
|