summaryrefslogtreecommitdiff
path: root/gcc/ada/tree_in.adb
diff options
context:
space:
mode:
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2010-10-11 15:47:23 +0000
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2010-10-11 15:47:23 +0000
commitc8969ba6225fdebe62682ac174c92759b20a9100 (patch)
tree444ab818bb867feee7661eee1e4537161e9429f5 /gcc/ada/tree_in.adb
parenta43a5139521891684fcc17b45d67031f03140b7c (diff)
downloadgcc-c8969ba6225fdebe62682ac174c92759b20a9100.tar.gz
2010-10-11 Robert Dewar <dewar@adacore.com>
* debug.adb: Remove d.A flag to delay address clause (not needed any more). Add d.A flag to enable tree read/write of aspect spec hash table * sem_ch13.adb (Analyze_Aspect_Specifications): Properly delay address clause. (Rep_Item_Too_Late): No need for special processing for delayed rep items (and it caused difficulties in the address case). * tree_gen.adb: Only write aspect spec hash table if -gnatd.A is set * tree_in.adb: Only write aspect spec hash table if -gnatd.A is set 2010-10-11 Pat Rogers <rogers@adacore.com> * gnat_ugn.texi: Minor editing. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@165316 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/tree_in.adb')
-rw-r--r--gcc/ada/tree_in.adb9
1 files changed, 8 insertions, 1 deletions
diff --git a/gcc/ada/tree_in.adb b/gcc/ada/tree_in.adb
index 60f7d45cb4e..200c566fba9 100644
--- a/gcc/ada/tree_in.adb
+++ b/gcc/ada/tree_in.adb
@@ -32,6 +32,7 @@
with Aspects;
with Atree;
with Csets;
+with Debug;
with Elists;
with Fname;
with Lib;
@@ -51,7 +52,13 @@ procedure Tree_In (Desc : File_Descriptor) is
begin
Tree_IO.Tree_Read_Initialize (Desc);
Opt.Tree_Read;
- Aspects.Tree_Read;
+
+ -- For now, only read aspect specifications hash table if -gnatd.A is set
+
+ if Debug.Debug_Flag_Dot_AA then
+ Aspects.Tree_Read;
+ end if;
+
Atree.Tree_Read;
Elists.Tree_Read;
Fname.Tree_Read;