diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-08-03 11:17:28 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-08-03 11:17:28 +0200 |
| commit | c4d67e2d730f6a8e45182a384b5b674f5134bc64 (patch) | |
| tree | 2f36ebbabd6d8f0da8f9326f7c1404ccfd4d24e2 /gcc/ada/prj-err.adb | |
| parent | 3f5a8feea3381fb0311e4d1a264c0661f37432dd (diff) | |
| download | gcc-c4d67e2d730f6a8e45182a384b5b674f5134bc64.zip gcc-c4d67e2d730f6a8e45182a384b5b674f5134bc64.tar.gz gcc-c4d67e2d730f6a8e45182a384b5b674f5134bc64.tar.bz2 | |
[multiple changes]
2011-08-03 Yannick Moy <moy@adacore.com>
* sem_ch6.adb (New_Overloaded_Entity): only issue error for SPARK
restriction on overloaded entity if the entity is not an operator.
2011-08-03 Yannick Moy <moy@adacore.com>
* sem_ch7.adb, sem_res.adb, sem_attr.adb, restrict.adb,
restrict.ads: Rename remaining Check_Formal_Restriction* into
Check_SPARK_Restriction*.
2011-08-03 Emmanuel Briot <briot@adacore.com>
* prj-proc.adb, prj-part.adb, prj.adb, prj.ads, prj-nmsc.adb,
prj-nmsc.ads, prj-err.adb (Project_Data): now discriminated on its
qualifier.
(Project_Empty): removed
(Empty_Project): new parameter Qualifier
This is used to have fields specific to aggregate projects, cleaner
New field to store the list of aggregated projects.
(Check_Aggregate_Project): removed
(Process_Aggregated_Projects, Free): new subprograms.
From-SVN: r177243
Diffstat (limited to 'gcc/ada/prj-err.adb')
| -rw-r--r-- | gcc/ada/prj-err.adb | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/gcc/ada/prj-err.adb b/gcc/ada/prj-err.adb index 4f5aea1..75cf23b 100644 --- a/gcc/ada/prj-err.adb +++ b/gcc/ada/prj-err.adb @@ -6,7 +6,7 @@ -- -- -- B o d y -- -- -- --- Copyright (C) 2002-2010, Free Software Foundation, Inc. -- +-- Copyright (C) 2002-2011, 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- -- @@ -78,7 +78,7 @@ package body Prj.Err is -- triggered) if Current_Verbosity = High then - Write_Line ("ERROR: " & Msg); + Debug_Output ("ERROR: " & Msg); end if; -- If location of error is unknown, use the location of the project @@ -96,7 +96,7 @@ package body Prj.Err is -- access to in any case. if Current_Verbosity = High then - Write_Line ("Error in in-memory project, ignored"); + Debug_Output ("Error in in-memory project, ignored"); end if; return; |