Fix copyright problems reported by Doug Evans.

[pf3gnuchains/gcc-fork.git] / gcc / ada / 5vosinte.ads

diff --git a/gcc/ada/5vosinte.ads b/gcc/ada/5vosinte.ads
index 7ffe78b..7903bb6 100644 (file)
--- a/gcc/ada/5vosinte.ads
+++ b/gcc/ada/5vosinte.ads
@@ -6,8 +6,7 @@
 --                                                                          --
 --                                  S p e c                                 --
 --                                                                          --
---                                                                          --
---           Copyright (C) 1991-2001 Free Software Foundation, Inc.         --
+--           Copyright (C) 1991-2002 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- --
@@ -27,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.      --
 --                                                                          --
 ------------------------------------------------------------------------------
 
@@ -551,7 +549,6 @@ package System.OS_Interface is
    pragma Import (C, pthread_exit, "PTHREAD_EXIT");
 
    function pthread_self return pthread_t;
-   pragma Import (C, pthread_self, "PTHREAD_SELF");
 
    --------------------------
    -- POSIX.1c  Section 17 --
@@ -638,4 +635,6 @@ private
 
    type pthread_key_t is new unsigned;
 
+   pragma Inline (pthread_self);
+
 end System.OS_Interface;