2007-12-07 Ludovic Brenta <ludovic@ludovic-brenta.org>

    gcc/ada/
	PR ada/34261
	* mlib-tgt.adb, mlib-tgt.ads: Fix comments at the top to reflect
	the new implementation of target-specific calls.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@130695 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 49f226f..08eeab3 100644 (file)
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,9 @@
+2007-12-07  Ludovic Brenta  <ludovic@ludovic-brenta.org>
+
+       PR ada/34261
+       * mlib-tgt.adb, mlib-tgt.ads: Fix comments at the top to reflect
+       the new implementation of target-specific calls.
+
 2007-12-07  Olivier Hainque  <hainque@adacore.com>
 
        * decl.c (gnat_to_gnu_entity) <case E_Access_Type>: When computing

diff --git a/gcc/ada/mlib-tgt.adb b/gcc/ada/mlib-tgt.adb
index 9d75838..e7cee9e 100644 (file)
--- a/gcc/ada/mlib-tgt.adb
+++ b/gcc/ada/mlib-tgt.adb
@@ -23,10 +23,6 @@
 --                                                                          --
 ------------------------------------------------------------------------------
 
---  This is the default version which does not support libraries.
---  All subprograms are dummies, because they are never called,
---  except Support_For_Libraries which returns None.
-
 with MLib.Fil;
 with Prj.Com;
 

diff --git a/gcc/ada/mlib-tgt.ads b/gcc/ada/mlib-tgt.ads
index e80f166..ad31788 100644 (file)
--- a/gcc/ada/mlib-tgt.ads
+++ b/gcc/ada/mlib-tgt.ads
@@ -24,12 +24,10 @@
 ------------------------------------------------------------------------------
 
 --  This package provides a set of target dependent routines to build
---  static, dynamic and shared libraries.
-
---  There are several versions for the body of this package
-
---  In the default version, libraries are not supported, so function
---  Support_For_Libraries return None.
+--  static, dynamic and shared libraries.  There are several packages
+--  providing the actual routines; this package calls them indirectly
+--  by means of access-to-subprogram values; each target-dependent
+--  package initializes these values in its elaboration block.
 
 with Prj; use Prj;