diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2012-03-19 17:29:27 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2012-03-19 17:29:27 +0100 |
| commit | 78c0f016063f856d4d35ba5591fbe825d7ab6544 (patch) | |
| tree | a03face93f0687dec95d67ec03cef5955cc2aca5 /gcc/ada/debug.adb | |
| parent | a49565158271693fa8f994ba9b35f00b9ee25028 (diff) | |
| download | gcc-78c0f016063f856d4d35ba5591fbe825d7ab6544.tar.gz | |
[multiple changes]
2012-03-19 Hristian Kirtchev <kirtchev@adacore.com>
* sem_ch3.adb (Get_Discriminant_Value): Instead of looking
at the immediate correcponsing discriminant, traverse a
potential chain of discriminants produced by type derivations.
(Root_Corresponding_Discriminant): Traverse a chain of inherited
discriminants and return the topmost discriminant.
2012-03-19 Bob Duff <duff@adacore.com>
* debug.adb: Minor comment change.
* gnat_ugn.texi: Update documentation for elaboration regarding
indirect calls.
2012-03-19 Gary Dismukes <dismukes@adacore.com>
* exp_ch3.adb (Expand_N_Object_Declaration): In
the case of an object of a class-wide interface type, where the
declaration is rewritten as a renaming, call Set_Debug_Info_Needed
on the renaming entity so that Materialize_Entity will be
set. Also, change existing call (for other than interface cases)
to call Set_Debug_Info_Needed rather than Set_Needs_Debug_Info
(as specified for that flag).
From-SVN: r185526
Diffstat (limited to 'gcc/ada/debug.adb')
| -rw-r--r-- | gcc/ada/debug.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/ada/debug.adb b/gcc/ada/debug.adb index a4207044297..032ba9dfe1e 100644 --- a/gcc/ada/debug.adb +++ b/gcc/ada/debug.adb @@ -646,7 +646,8 @@ package body Debug is -- elaboration model is conservative, especially regarding indirect -- calls. If you say Proc'Access, it will assume you might call -- Proc. This can cause elaboration cycles at bind time. This flag - -- reverts to the behavior of earlier compilers. + -- reverts to the behavior of earlier compilers, which ignored + -- indirect calls. -- d.W Print out debugging information for Walk_Library_Items, including -- the order in which units are walked. This is primarily for use in |