diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2012-12-05 10:26:14 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2012-12-05 10:26:14 +0000 |
commit | 2c786073443f4bc8f339eec69f300ff184e24d38 (patch) | |
tree | 3bb2de03bc779a3bcc8eaade0320f8e265d7c26d /gcc/ada/gnatbind.adb | |
parent | af25d38ddd93585bdea6e52ddc49e6310c82b527 (diff) | |
download | gcc-2c786073443f4bc8f339eec69f300ff184e24d38.tar.gz |
2012-12-05 Eric Botcazou <ebotcazou@adacore.com>
* gnat_rm.texi (Interfacing to C++): Document new restrictions.
2012-12-05 Ben Brosgol <brosgol@adacore.com>
* gnat_ugn.texi: Fix typo.
2012-12-05 Robert Dewar <dewar@adacore.com>
* gnatbind.adb: Minor reformatting.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@194195 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/gnatbind.adb')
-rw-r--r-- | gcc/ada/gnatbind.adb | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/gcc/ada/gnatbind.adb b/gcc/ada/gnatbind.adb index afe74ec229d..c53d67ecf5c 100644 --- a/gcc/ada/gnatbind.adb +++ b/gcc/ada/gnatbind.adb @@ -545,9 +545,7 @@ begin -- Test for trailing -o switch - if Opt.Output_File_Name_Present - and then not Output_File_Name_Seen - then + if Opt.Output_File_Name_Present and then not Output_File_Name_Seen then Fail ("output file name missing after -o"); end if; @@ -559,9 +557,7 @@ begin -- Check that the binder file specified has extension .adb - if Opt.Output_File_Name_Present - and then Output_File_Name_Seen - then + if Opt.Output_File_Name_Present and then Output_File_Name_Seen then Check_Extensions : declare Length : constant Natural := Output_File_Name'Length; Last : constant Natural := Output_File_Name'Last; |