Real-Time Programming Languages - Operating Systems
Real-Time Programming Languages - Operating Systems
Real-Time Programming Languages - Operating Systems
Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
Example: Operator/Subscriber<br />
01<br />
02<br />
03<br />
04<br />
05<br />
06<br />
07<br />
08<br />
09<br />
10<br />
11<br />
12<br />
13<br />
14<br />
15<br />
16<br />
17<br />
18<br />
19<br />
task type Subscriber;<br />
task body Subscriber is<br />
Stuarts_Number : Number;<br />
begin<br />
loop<br />
--...<br />
select<br />
An_Op.Directory_Enquiry("STUART JONES",<br />
"10 MAIN STREET, YORK", Stuarts_Number);<br />
-- log the cost of a directory enquiry call<br />
or<br />
delay 10.0;<br />
-- phone up his parents and ask them,<br />
-- log the cost of a long distance call<br />
end select;<br />
--...<br />
end loop;<br />
end Subscriber;<br />
Burns,<br />
Wellings<br />
Ch. 6.9<br />
Page 119<br />
WS 2013/14 <strong>Real</strong>-<strong>Time</strong> <strong>Systems</strong>, <strong>Real</strong>-<strong>Time</strong> Prog. <strong>Languages</strong> / Hermann Härtig 55