Ada Programming/Delimiters/=>
Contexts
editAda.Float_Text_IO.Put (Speed, Fore => 3, Aft => 1); -- see RM A.10.9(22,32)
Ada.Numerics.Elementary_Functions.Arctan (X => 0.0, Y => -1.0) -- see RM A.5.1(6, 9/1)
procedure
Exchangeis
new
Swap (Element_T => Character);
Point'(X => 10.0, Y => -1.0) -- see RM 3.9(32)
begin
...exception
when
Constraint_Error => ...end
;
- In case statements.
case
Validis
when
False => ...when
True => ...end
case
;