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

--- ai05s/ai05-0094-1.txt	2008/07/08 03:34:01	1.2
+++ ai05s/ai05-0094-1.txt	2008/10/25 04:53:14	1.3
@@ -1,5 +1,6 @@
-!standard  D.15(15/2)                                      08-07-07  AI05-0094-1/02
+!standard  D.15(15/2)                                      08-10-18  AI05-0094-1/03
 !class binding interpretation 08-05-16
+!status ARG Approved  8-0-0  08-06-21
 !status work item 08-05-16
 !status received 06-03-28
 !priority Medium
@@ -9,7 +10,7 @@
 
 !summary
 
-D.15(15/2) should only require that the handler is executed as soon as
+D.15(15/2) should only require that the handler be executed as soon as
 possible.
 
 !question
@@ -32,14 +33,15 @@
 
 The scenario is:
 
-    T : constant Time_Span := Zilliseconds (10); -- some small amount of time
+    T : constant Time_Span := Zilliseconds (10); -- Some small amount of time
 
     protected body ... is
-        procedure Handler (Event : in out Timing_Event) is
+        procedure The_Handler (Event : in out Timing_Event) is
         begin
-            Set_Handler (Event, At_Time => Clock + T, Handler => Handler'Access);
+            Set_Handler (Event, At_Time => Clock + T,
+                         Handler => The_Handler'Access);
             ...
-        end Handler;
+        end The_Handler;
 
 In this example, we get a flaky deadlock. Perhaps it works most of the time,
 but if some unrelated process steals a little time, such that Clock + T has