Anonymous user
Checkpoint synchronization: Difference between revisions
m
→{{header|Ada}}: whitespace/tidy up
m (→The task: typo) |
m (→{{header|Ada}}: whitespace/tidy up) |
||
Line 12:
=={{header|Ada}}==
<lang Ada>with Ada.Calendar; use Ada.Calendar;▼
▲with Ada.Calendar; use Ada.Calendar;
with Ada.Numerics.Float_Random; use Ada.Numerics.Float_Random;
with Ada.Text_IO; use Ada.Text_IO;
Line 78 ⟶ 77:
begin
null; -- Nothing to do here
end Test_Checkpoint;</lang>
Sample output:
<
A is working
B is working
Line 220 ⟶ 217:
A is ready
</pre>
| |||