2010-06-22 Arnaud Charlet <charlet@adacore.com>

	* fmap.adb, opt.ads, osint.adb, osint.ads, output.ads, scng.adb,
	sinput-c.adb, switch-m.ads, tree_io.ads: Use simpler form of
	Warnings Off/On.

2010-06-22  Thomas Quinot  <quinot@adacore.com>

	* einfo.ads: Minor reformatting.

2010-06-22  Javier Miranda  <miranda@adacore.com>

	* exp_disp.adb (Expand_Interface_Thunk): Do not generate thunk of
	eliminated primitives.
	(Make_DT): Avoid referencing eliminated primitives.
	(Register_Primitive): Do not register eliminated primitives in the
	dispatch table. Required to add this functionality when the program is
	compiled without static dispatch tables (-gnatd.t)



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

1 files changed, 5 insertions, 4 deletions

diff --git a/gcc/ada/osint.ads b/gcc/ada/osint.ads
index 08d074a406f..4c55a3b5a7c 100644
--- a/gcc/ada/osint.ads
+++ b/gcc/ada/osint.ads
@@ -26,15 +26,16 @@
 --  This package contains the low level, operating system routines used in the
 --  compiler and binder for command line processing and file input output.
 
---  This unit is used by gnatcoll
-pragma Warnings (Off, "*is an internal GNAT unit");
-pragma Warnings (Off, "*use * instead");
-
 with Namet; use Namet;
 with Types; use Types;
 
 with System;                  use System;
+
+pragma Warnings (Off);
+--  This package is used also by gnatcoll
 with System.OS_Lib;           use System.OS_Lib;
+pragma Warnings (On);
+
 with System.Storage_Elements;
 
 pragma Elaborate_All (System.OS_Lib);