2005-06-14 Jose Ruiz <ruiz@adacore.com>

[pf3gnuchains/gcc-fork.git] / gcc / ada / a-caldel.ads

diff --git a/gcc/ada/a-caldel.ads b/gcc/ada/a-caldel.ads
index 3220bc1..4f17fa2 100644 (file)
--- a/gcc/ada/a-caldel.ads
+++ b/gcc/ada/a-caldel.ads
@@ -1,14 +1,12 @@
 ------------------------------------------------------------------------------
 --                                                                          --
---                GNU ADA RUN-TIME LIBRARY (GNARL) COMPONENTS               --
+--                 GNAT RUN-TIME LIBRARY (GNARL) COMPONENTS                 --
 --                                                                          --
 --                   A D A . C A L E N D A R . D E L A Y S                  --
 --                                                                          --
 --                                  S p e c                                 --
 --                                                                          --
---                             $Revision: 1.16 $                            --
---                                                                          --
---          Copyright (C) 1992-1998, Free Software Foundation, Inc.         --
+--          Copyright (C) 1992-2005, Free Software Foundation, Inc.         --
 --                                                                          --
 -- GNARL is free software; you can  redistribute it  and/or modify it under --
 -- terms of the  GNU General Public License as published  by the Free Soft- --
@@ -28,9 +26,8 @@
 -- however invalidate  any other reasons why  the executable file  might be --
 -- covered by the  GNU Public License.                                      --
 --                                                                          --
--- GNARL was developed by the GNARL team at Florida State University. It is --
--- now maintained by Ada Core Technologies Inc. in cooperation with Florida --
--- State University (http://www.gnat.com).                                  --
+-- GNARL was developed by the GNARL team at Florida State University.       --
+-- Extensive contributions were provided by Ada Core Technologies, Inc.     --
 --                                                                          --
 ------------------------------------------------------------------------------
 
@@ -42,18 +39,17 @@
 package Ada.Calendar.Delays is
 
    procedure Delay_For (D : Duration);
-   --  Delay until an interval of length (at least) D seconds has passed,
-   --  or the task is aborted to at least the current ATC nesting level.
-   --  This is an abort completion point.
-   --  The body of this procedure must perform all the processing
-   --  required for an abortion point.
+   --  Delay until an interval of length (at least) D seconds has passed, or
+   --  the task is aborted to at least the current ATC nesting level. This is
+   --  an abort completion point. The body of this procedure must perform all
+   --  the processing required for an abort point.
 
    procedure Delay_Until (T : Time);
-   --  Delay until Clock has reached (at least) time T,
-   --  or the task is aborted to at least the current ATC nesting level.
-   --  The body of this procedure must perform all the processing
-   --  required for an abortion point.
+   --  Delay until Clock has reached (at least) time T, or the task is aborted
+   --  to at least the current ATC nesting level. The body of this procedure
+   --  must perform all the processing required for an abort point.
 
    function To_Duration (T : Time) return Duration;
+   --  Convert Time to Duration
 
 end Ada.Calendar.Delays;