diff options
author | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-02-25 16:15:44 +0100 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-02-25 16:15:44 +0100 |
commit | 0355e3ebbe09450408118b4651a9545da577eeee (patch) | |
tree | 53d894665af58760d272194c441ac6778a0f756d /gcc/ada/back_end.adb | |
parent | e917e3b8153397295b80192e4521c27bd876546c (diff) | |
download | gcc-0355e3ebbe09450408118b4651a9545da577eeee.tar.gz |
lib.ads, [...]: Implement pragma Compiler_Unit_Warning...
2014-02-25 Robert Dewar <dewar@adacore.com>
* lib.ads, s-bitops.adb, s-bitops.ads, s-conca5.adb, gnat_rm.texi,
s-conca5.ads, s-conca7.adb, s-conca7.ads, s-crc32.adb, s-crc32.ads,
s-conca9.adb, s-conca9.ads, g-dyntab.adb, s-crtl.ads, g-dyntab.ads,
s-excdeb.adb, s-addope.adb, s-addope.ads, s-carun8.adb, s-carun8.ads,
g-htable.adb, g-htable.ads, g-hesora.adb, g-hesora.ads, s-conca2.adb,
s-conca2.ads, a-comlin.adb, a-chlat1.ads, a-comlin.ads, errout.ads,
a-except.adb, s-conca4.adb, a-except.ads, s-conca4.ads, s-conca6.adb,
s-conca6.ads, g-spchge.adb, g-spchge.ads, g-u3spch.adb, g-u3spch.ads,
a-strhas.ads, restrict.adb, aspects.adb, aspects.ads, s-conca8.adb,
s-conca8.ads, back_end.adb, par-prag.adb, g-byorma.adb, g-byorma.ads,
a-elchha.adb, a-elchha.ads, g-speche.adb, g-speche.ads, s-casuti.adb,
s-assert.adb, s-casuti.ads, s-assert.ads, a-clrefi.adb, a-clrefi.ads,
s-conca3.adb, s-conca3.ads, a-ioexce.ads: Implement pragma
Compiler_Unit_Warning, change Compiler_Unit everywhere to
Compiler_Unit_Warning.
2014-02-25 Sergey Rybin <rybin@adacore.com frybin>
* sem_prag.adb (Analyze_Depends_In_Decl_Part): Do not normalize
in ASIS mode aggregates that are used as aspect definitions.
From-SVN: r208137
Diffstat (limited to 'gcc/ada/back_end.adb')
-rw-r--r-- | gcc/ada/back_end.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/back_end.adb b/gcc/ada/back_end.adb index a466686527e..bb442ad5e53 100644 --- a/gcc/ada/back_end.adb +++ b/gcc/ada/back_end.adb @@ -283,7 +283,7 @@ package body Back_End is Next_Arg := 1; while Next_Arg <= Args'Last loop Look_At_Arg : declare - Argv : constant String := Args (Next_Arg).all; + Argv : constant String := Args (Next_Arg).all; begin -- If the previous switch has set the Output_File_Name_Present |