diff options
| author | Ed Schonberg <schonberg@adacore.com> | 2006-02-17 17:06:28 +0100 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2006-02-17 17:06:28 +0100 |
| commit | faad2f7ed698abf82e002d21708979e2b49aac76 (patch) | |
| tree | 229eaa480d5b87e1b9a2b4767f1b114339734c5a /gcc | |
| parent | f82944b75c27789320598c7f2b5f3660480cd5c6 (diff) | |
| download | gcc-faad2f7ed698abf82e002d21708979e2b49aac76.zip gcc-faad2f7ed698abf82e002d21708979e2b49aac76.tar.gz gcc-faad2f7ed698abf82e002d21708979e2b49aac76.tar.bz2 | |
exp_dbug.adb (Debug_Renaming_Declaration): Indicate that the entity must be materialized when...
2006-02-17 Ed Schonberg <schonberg@adacore.com>
* exp_dbug.adb (Debug_Renaming_Declaration): Indicate that the entity
must be materialized when the renamed expression is an explicit
dereference.
From-SVN: r111186
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/exp_dbug.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/ada/exp_dbug.adb b/gcc/ada/exp_dbug.adb index 8281f15..1ad503c 100644 --- a/gcc/ada/exp_dbug.adb +++ b/gcc/ada/exp_dbug.adb @@ -6,7 +6,7 @@ -- -- -- B o d y -- -- -- --- Copyright (C) 1996-2005, Free Software Foundation, Inc. -- +-- Copyright (C) 1996-2006, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -431,6 +431,7 @@ package body Exp_Dbug is Ren := Prefix (Ren); when N_Explicit_Dereference => + Set_Materialize_Entity (Ent); Prepend_String_To_Buffer ("XA"); Ren := Prefix (Ren); |