Introduction
A demonstration of how the producer-consumer pattern is implemented in Ada.
Syntax
- function Scalar'Image (Argument : Scalar'Base) return String;
- task Task_Name;
- task Task_Name is Entries end;
- task body Task_Name is Declarations begin Code end;
- entry Entry_Name;
- accept Entry_Name;
- exit;
The examples should all ensure proper task termination.