diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-10-11 15:47:23 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-10-11 15:47:23 +0000 |
commit | c8969ba6225fdebe62682ac174c92759b20a9100 (patch) | |
tree | 444ab818bb867feee7661eee1e4537161e9429f5 /gcc/ada/tree_in.adb | |
parent | a43a5139521891684fcc17b45d67031f03140b7c (diff) | |
download | gcc-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.adb | 9 |
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; |