CVS difference for ai05s/ai05-0168-1.txt

--- ai05s/ai05-0168-1.txt	2010/02/20 04:02:07	1.2
+++ ai05s/ai05-0168-1.txt	2010/02/23 22:11:00	1.3
@@ -1,4 +1,4 @@
-!standard  D.10(5)                                   10-02-18    AI05-0168-1/02
+!standard  D.10(5)                                   10-02-23    AI05-0168-1/03
 !standard  D.10(11)
 !class Amendment 09-10-22
 !status work item 09-10-22
@@ -80,7 +80,36 @@
 
 !example
 
-** TBD **
+A sporadic task that has a relative deadline of 50ms, and uses
+synchronous task control would have the form:
+
+   with Ada.Synchronous_Task_Control;
+   with Ada.Synchronous_Task_Control.EDF;
+   with Ada.Real_Time;
+   ...
+
+   SO : Suspension_Object;
+
+   ...
+
+   task Sporadic;
+
+   task body Sporadic is
+      Interval : Ada.Real_Time.Time_Span := Ada.Real_Time.Milliseconds(50);
+   begin
+      Ada.Synchronous_Task_Control.Set_False(SO);
+      loop
+      
+          Ada.Synchronous_Task_Control.EDF.
+             Suspend_Until_True_And_Set_Deadline(SO, Interval);
+          -- code of the sporadic task
+      end loop;
+   end Sporadic;
+
+the releasing task would call:
+
+   Ada.Synchronous_Task_Control.Set_True(SO);
+
 
 --!corrigendum D.10(4)