aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/gnatls.adb
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2014-11-07 14:59:41 +0100
committerArnaud Charlet <charlet@gcc.gnu.org>2014-11-07 14:59:41 +0100
commit3c756b76327951a6c16d238c0cd0132371b7d9b3 (patch)
tree5922899f31cfff187cacf2e6f7dd4da6e87ec94a /gcc/ada/gnatls.adb
parent102743865182358d96fafb28dcd58aa4ecb1c055 (diff)
downloadgcc-3c756b76327951a6c16d238c0cd0132371b7d9b3.zip
gcc-3c756b76327951a6c16d238c0cd0132371b7d9b3.tar.gz
gcc-3c756b76327951a6c16d238c0cd0132371b7d9b3.tar.bz2
[multiple changes]
2014-11-07 Arnaud Charlet <charlet@adacore.com> * debug.adb, snames.adb-tmpl (Is_Keyword_Name): Consider 'overriding' a keyword in Ada 95 mode when -gnatd.D is used. * gnat_ugn.texi: Document -gnatd.D. 2014-11-07 Vasiliy Fofanov <fofanov@adacore.com> * gnatls.adb: Lower severity of the program's return value in some common cases. 2014-11-07 Ed Schonberg <schonberg@adacore.com> * sem_ch10.adb (Decorate_Type): The limited view of a tagged type has an empty list of primitive operations. 2014-11-07 Hristian Kirtchev <kirtchev@adacore.com> * sem_ch3.adb (Analyze_Object_Declaration): Update references to SPARK RM. (Process_Full_View): Update references to SPARK RM. * sem_ch6.adb (Analyze_Generic_Subprogram_Body): Update references to SPARK RM. (Analyze_Subprogram_Body_Helper): Update references to SPARK RM. * sem_ch7.adb (Analyze_Package_Body_Helper): Update references to SPARK RM. * sem_prag.adb (Check_Ghost_Constituent): Update references to SPARK RM. * sem_res.adb (Check_Ghost_Policy): Update references to SPARK RM. (Resolve_Actuals): Ensure that the actual parameter of a Ghost subprogram whose formal is of mode IN OUT or OUT is Ghost. * sem_util.adb (Check_Ghost_Completion): Update references to SPARK RM. 2014-11-07 Ed Schonberg <schonberg@adacore.com> * exp_ch7.adb (Make_Final_Call): If type of designated object is derived from that of the formal of the Deep_Finalize procedure, add an unchecked conversion to prevent spurious type error. 2014-11-07 Robert Dewar <dewar@adacore.com> * table.adb, inline.adb, einfo.adb, gnat1drv.adb, exp_ch13.adb, exp_fixd.adb, prj-conf.adb, exp_strm.adb, a-cofove.adb, exp_ch3.ads: Minor reformatting. 2014-11-07 Robert Dewar <dewar@adacore.com> * sem_ch12.adb, sem_ch13.adb, prj-tree.adb: Minor reformatting. From-SVN: r217227
Diffstat (limited to 'gcc/ada/gnatls.adb')
-rw-r--r--gcc/ada/gnatls.adb4
1 files changed, 3 insertions, 1 deletions
diff --git a/gcc/ada/gnatls.adb b/gcc/ada/gnatls.adb
index 808b009..80875b5 100644
--- a/gcc/ada/gnatls.adb
+++ b/gcc/ada/gnatls.adb
@@ -1663,6 +1663,7 @@ begin
("Default runtime not available. Use --RTS= with a valid runtime");
Write_Eol;
Write_Eol;
+ Exit_Status := E_Warnings;
end if;
Write_Str ("Source Search Path:");
@@ -1775,10 +1776,11 @@ begin
Usage;
else
Try_Help;
+ Exit_Status := E_Fatal;
end if;
end if;
- Exit_Program (E_Fatal);
+ Exit_Program (Exit_Status);
end if;
Initialize_ALI;