diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2014-07-17 06:12:09 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2014-07-17 06:12:09 +0000 |
| commit | c1efebf99e1d1fc1f196fbe3b3222ac3cc19c262 (patch) | |
| tree | dbf1a3f04bae9a8d171e9ca2a7b1aaec91d67569 /gcc/ada/make.adb | |
| parent | 5005fc53898b92435c6065c2f62a071ac71f2951 (diff) | |
| download | gcc-c1efebf99e1d1fc1f196fbe3b3222ac3cc19c262.tar.gz | |
2014-07-17 Robert Dewar <dewar@adacore.com>
* exp_ch7.adb, exp_ch7.ads, sinfo.ads: Minor reformatting.
2014-07-17 Ed Schonberg <schonberg@adacore.com>
* sem_case.adb (Check_Choice_Set): If the case expression is the
expression in a predicate, do not recheck coverage against itself,
to prevent spurious errors.
* sem_ch13.adb (Check_Aspect_At_End_Of_Declarations): Indicate that
expression comes from an aspect specification, to prevent spurious
errors when expression is a case expression in a predicate.
2014-07-17 Pascal Obry <obry@adacore.com>
* adaint.c, adaint.h (__gnat_set_executable): Add mode parameter.
* s-os_lib.ads, s-os_lib.adb (Set_Executable): Add Mode parameter.
2014-07-17 Vincent Celier <celier@adacore.com>
* gnatchop.adb, make.adb, gnatbind.adb, clean.adb, gprep.adb,
gnatxref.adb, gnatls.adb, gnatfind.adb, gnatname.adb: Do not output
the usage for an erroneous invocation of a gnat tool.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@212716 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/make.adb')
| -rw-r--r-- | gcc/ada/make.adb | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/gcc/ada/make.adb b/gcc/ada/make.adb index ebd2bfd9a52..15b63301429 100644 --- a/gcc/ada/make.adb +++ b/gcc/ada/make.adb @@ -5856,9 +5856,14 @@ package body Make is Targparm.Get_Target_Parameters; - -- Output usage information if no files to compile + -- Output usage information if no argument on the command line + + if Argument_Count = 0 then + Usage; + else + Write_Line ("type ""gnatmake --help"" for help"); + end if; - Usage; Finish_Program (Project_Tree, E_Success); end if; end if; |