diff options
author | Robert Dewar <dewar@adacore.com> | 2011-11-04 13:46:55 +0000 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2011-11-04 14:46:55 +0100 |
commit | 37765e95f1b10191c37f6d185a3621cfd7ccdfd9 (patch) | |
tree | 981081bd83de9b66927ef6c8b2c8d4568590f30f /gcc/ada/atree.ads | |
parent | 8c18a165e2ebb82121a0cae15e50c0ac74bd33c3 (diff) | |
download | gcc-37765e95f1b10191c37f6d185a3621cfd7ccdfd9.zip gcc-37765e95f1b10191c37f6d185a3621cfd7ccdfd9.tar.gz gcc-37765e95f1b10191c37f6d185a3621cfd7ccdfd9.tar.bz2 |
sem_prag.adb, [...]: Minor reformatting.
2011-11-04 Robert Dewar <dewar@adacore.com>
* sem_prag.adb, atree.ads, prj-env.adb, prj-env.ads: Minor reformatting.
From-SVN: r180949
Diffstat (limited to 'gcc/ada/atree.ads')
-rw-r--r-- | gcc/ada/atree.ads | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/gcc/ada/atree.ads b/gcc/ada/atree.ads index b5bbff4..736f5ca 100644 --- a/gcc/ada/atree.ads +++ b/gcc/ada/atree.ads @@ -763,6 +763,11 @@ package Atree is procedure Set_Original_Node (N : Node_Id; Val : Node_Id); pragma Inline (Set_Original_Node); + -- Note that this routine is used only in very peculiar cases. In normal + -- cases, the Original_Node link is set by calls to Rewrite. We currently + -- use it in ASIS mode to manually set the link from pragma expressions + -- to their aspect original source expressions, so that the original source + -- expressions accessed by ASIS are also semantically analyzed. ------------------------------ -- Entity Update Procedures -- |