28.02.2014 Views

Real-Time Programming Languages - Operating Systems

Real-Time Programming Languages - Operating Systems

Real-Time Programming Languages - Operating Systems

SHOW MORE
SHOW LESS

Create successful ePaper yourself

Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.

Example: Resource with Locking<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 />

protected type Resource is<br />

entry lock;<br />

procedure unlock; Release;<br />

private Locked: Boolean := False;<br />

end Resource;<br />

protected body Resource is<br />

entry lock when not Locked is<br />

begin<br />

Locked := True;<br />

end lock;<br />

procedure unlock is begin Locked := False end unlock;<br />

end Resource;<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 29

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!