diff options
author | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-04-08 14:53:51 +0200 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2009-04-08 14:53:51 +0200 |
commit | ecc4ddde87a9d5ddbd115e118db5101bd0249437 (patch) | |
tree | 8230647596da5feaad11e1549aa143b759ab6e08 /gcc/ada/ali-util.adb | |
parent | a29262fd4476d0d0e5144b794d966cc676e9cef3 (diff) | |
download | gcc-ecc4ddde87a9d5ddbd115e118db5101bd0249437.zip gcc-ecc4ddde87a9d5ddbd115e118db5101bd0249437.tar.gz gcc-ecc4ddde87a9d5ddbd115e118db5101bd0249437.tar.bz2 |
[multiple changes]
2009-04-08 Emmanuel Briot <briot@adacore.com>
* prj.ads: Update comment on switches file
* prj-nmsc.adb: Code clean up. Use renaming clauses.
2009-04-08 Robert Dewar <dewar@adacore.com>
* exp_ch4.adb (Expand_Concatenate): Further fixes to bounds handling
2009-04-08 Thomas Quinot <quinot@adacore.com>
* ali-util.adb: Minor comment fix
2009-04-08 Ed Schonberg <schonberg@adacore.com>
* sem_ch8.adb (Analyze_Use_Type): Improve error message when clause
appears in a context clause, and the enclosing package is mentioned in
a limited_with_clause.
(Use_One_Type): Reject clause if type is still incomplete.
From-SVN: r145722
Diffstat (limited to 'gcc/ada/ali-util.adb')
-rw-r--r-- | gcc/ada/ali-util.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/ali-util.adb b/gcc/ada/ali-util.adb index 322ec5c..25a0d7a 100644 --- a/gcc/ada/ali-util.adb +++ b/gcc/ada/ali-util.adb @@ -6,7 +6,7 @@ -- -- -- B o d y -- -- -- --- Copyright (C) 1992-2007, Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2008, 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- -- @@ -490,7 +490,7 @@ package body ALI.Util is if not Source.Table (Src).Source_Found or else Sdep.Table (D).Stamp /= Source.Table (Src).Stamp then - -- If -t debug flag set, output time stamp found/expected + -- If -dt debug flag set, output time stamp found/expected if Source.Table (Src).Source_Found and Debug_Flag_T then Write_Str ("Source: """); |