From 160c50657b368002eddc1f77b45d824f3066848c Mon Sep 17 00:00:00 2001 From: Robert Dewar Date: Thu, 13 Sep 2007 12:52:18 +0000 Subject: Implement pragma Compiler_Unit and adds it to relevant library units. From-SVN: r128461 --- gcc/ada/ChangeLog | 2 +- gcc/ada/a-elchha.adb | 6 +++++- 2 files changed, 6 insertions(+), 2 deletions(-) (limited to 'gcc') diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index a0bf512..65eeced 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -16,7 +16,7 @@ s-sopco3.adb, s-sopco4.adb, s-sopco5.adb, s-stache.adb, s-stalib.adb, s-stoele.adb, s-strcom.adb, s-strops.adb, s-traceb.adb, s-traent.adb, s-wchcnv.adb, s-wchcon.adb, s-wchjis.adb, s-addope.adb, s-except.adb, - s-os_lib.adb, s-string.adb, s-utf_32.adb, + s-os_lib.adb, s-string.adb, s-utf_32.adb, a-elchha.adb, a-chlat1.ads, a-elchha.ads, a-except.ads, g-hesora.ads, g-htable.ads, g-speche.ads, par-prag.adb, restrict.adb, restrict.ads, s-assert.ads, s-carun8.ads, s-casuti.ads, s-crc32.ads, sem_ch11.adb, sem_prag.adb, diff --git a/gcc/ada/a-elchha.adb b/gcc/ada/a-elchha.adb index fabd3ff..41ca1f5 100644 --- a/gcc/ada/a-elchha.adb +++ b/gcc/ada/a-elchha.adb @@ -6,7 +6,7 @@ -- -- -- B o d y -- -- -- --- Copyright (C) 2003-2006, Free Software Foundation, Inc. -- +-- Copyright (C) 2003-2007, Free Software Foundation, Inc. -- -- -- -- GNAT 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- -- @@ -33,6 +33,10 @@ -- Default version for most targets +pragma Warnings (Off); +pragma Compiler_Unit; +pragma Warnings (On); + with System.Standard_Library; use System.Standard_Library; -- Used for Adafinal -- cgit v1.1