lib.adb: Minor reformatting

	* lib.adb: Minor reformatting

	* s-taprop.ads: Minor reformatting

From-SVN: r46651

gcc/ada/ChangeLog

+2001-10-30  Robert Dewar <dewar@gnat.com>
+
+	* lib.adb: Minor reformatting
+
+	* s-taprop.ads: Minor reformatting
+
 2001-10-29  Laurent Guerby  <guerby@acm.org>
 	
 	* init.c:

gcc/ada/lib.adb

@@ -6,7 +6,7 @@
 --                                                                          --
 --                                 B o d y                                  --
 --                                                                          --
---                            $Revision: 1.97 $
+--                            $Revision$
 --                                                                          --
 --          Copyright (C) 1992-2001 Free Software Foundation, Inc.          --
 --                                                                          --
@@ -792,8 +792,8 @@ package body Lib is
    procedure Store_Compilation_Switch (Switch : String) is
    begin
       Compilation_Switches.Increment_Last;
-      Compilation_Switches.Table (Compilation_Switches.Last)
-        := new String'(Switch);
+      Compilation_Switches.Table (Compilation_Switches.Last) :=
+        new String'(Switch);
    end Store_Compilation_Switch;
 
    --------------------------------

gcc/ada/s-taprop.ads

@@ -6,7 +6,7 @@
 --                                                                          --
 --                                  S p e c                                 --
 --                                                                          --
---                             $Revision: 1.1 $
+--                             $Revision$
 --                                                                          --
 --          Copyright (C) 1992-2001, Free Software Foundation, Inc.         --
 --                                                                          --
@@ -449,19 +449,19 @@ package System.Task_Primitives.Operations is
 
    function Suspend_Task
      (T           : ST.Task_ID;
-      Thread_Self : OSI.Thread_Id) return Boolean;
+      Thread_Self : OSI.Thread_Id)
+      return        Boolean;
    --  Suspend a specific task when the underlying thread library provides
-   --  such functionality, unless the thread associated with T is
-   --  Thread_Self.
+   --  such functionality, unless the thread associated with T is Thread_Self.
    --  Such functionality is needed by gdb on some targets (e.g VxWorks)
    --  Return True is the operation is successful
 
    function Resume_Task
      (T           : ST.Task_ID;
-      Thread_Self : OSI.Thread_Id) return Boolean;
+      Thread_Self : OSI.Thread_Id)
+      return        Boolean;
    --  Resume a specific task when the underlying thread library provides
-   --  such functionality, unless the thread associated with T is
-   --  Thread_Self.
+   --  such functionality, unless the thread associated with T is Thread_Self.
    --  Such functionality is needed by gdb on some targets (e.g VxWorks)
    --  Return True is the operation is successful