diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-09-02 09:10:07 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-09-02 09:10:07 +0200 |
| commit | bd0bc43e58edb507c01ecabdfdf0e7717a825324 (patch) | |
| tree | 912a34c00bd350df63b1b3b2de596bb767cf8687 /gcc/ada/g-comlin.adb | |
| parent | 9fdb5d2171b7104581e0e80bfb8f527d37d93fcd (diff) | |
| download | gcc-bd0bc43e58edb507c01ecabdfdf0e7717a825324.zip gcc-bd0bc43e58edb507c01ecabdfdf0e7717a825324.tar.gz gcc-bd0bc43e58edb507c01ecabdfdf0e7717a825324.tar.bz2 | |
[multiple changes]
2011-09-02 Ed Schonberg <schonberg@adacore.com>
* sem_ch10.adb (Analyze_With_Clause): If the library unit
is the generated subprogram declaration for a child unit body
that acts as spec, use the original body in the with_clause,
to prevent binding errors.
2011-09-02 Vincent Celier <celier@adacore.com>
* gnat_ugn.texi: Adapt documentation of -gnateInnn to new VMS
qualifier /MULTI_UNIT_INDEX=
2011-09-02 Johannes Kanig <kanig@adacore.com>
* g-comlin.adb (Getopt): Return when switch is dealt with automatically,
instead of calling the callback function
From-SVN: r178435
Diffstat (limited to 'gcc/ada/g-comlin.adb')
| -rw-r--r-- | gcc/ada/g-comlin.adb | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/gcc/ada/g-comlin.adb b/gcc/ada/g-comlin.adb index 5f5855f..43a6524 100644 --- a/gcc/ada/g-comlin.adb +++ b/gcc/ada/g-comlin.adb @@ -3290,11 +3290,14 @@ package body GNAT.Command_Line is with "Expected integer parameter for '" & Switch & "'"; end; + return; when Switch_String => Free (Config.Switches (Index).String_Output.all); Config.Switches (Index).String_Output.all := new String'(Parameter); + return; + end case; end if; |