diff options
author | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-07-22 17:58:10 +0000 |
---|---|---|
committer | bstarynk <bstarynk@138bc75d-0d04-0410-961f-82ee72b054a4> | 2009-07-22 17:58:10 +0000 |
commit | edbab208cf506c660d37346f43c5a2efa8528066 (patch) | |
tree | d003b4617eeb2ffd00a15cd15a40470fa4dee5a9 /gcc/ada/ali-util.adb | |
parent | 581b7a3847963e186af616e9b6a7390d120881d3 (diff) | |
download | gcc-edbab208cf506c660d37346f43c5a2efa8528066.tar.gz |
2009-07-22 Basile Starynkevitch <basile@starynkevitch.net>
MELT branch merged with trunk rev 149945
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/branches/melt-branch@149950 138bc75d-0d04-0410-961f-82ee72b054a4
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 14ccd6707a0..e996611c327 100644 --- a/gcc/ada/ali-util.adb +++ b/gcc/ada/ali-util.adb @@ -6,7 +6,7 @@ -- -- -- B o d y -- -- -- --- Copyright (C) 1992-2008, Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2009, 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- -- @@ -492,7 +492,7 @@ package body ALI.Util is then -- If -dt debug flag set, output time stamp found/expected - if Source.Table (Src).Source_Found and Debug_Flag_T then + if Source.Table (Src).Source_Found and then Debug_Flag_T then Write_Str ("Source: """); Get_Name_String (Sdep.Table (D).Sfile); Write_Str (Name_Buffer (1 .. Name_Len)); |