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.
Simple Periodic Task With Static Priority<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 />
task A is<br />
pragma Priority(5);<br />
end A;<br />
task body A is<br />
Next_Release: <strong>Real</strong>_<strong>Time</strong>.<strong>Time</strong>;<br />
begin<br />
Next_Release := <strong>Real</strong>_<strong>Time</strong>.Clock;<br />
loop<br />
-- code<br />
Next_Release := Next_Release + <strong>Real</strong>_<strong>Time</strong>.Milliseconds(10);<br />
delay until Next_Release;<br />
end loop<br />
end A;<br />
Burns,<br />
Wellings<br />
Ch. 14.3<br />
Page 345<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 56