summaryrefslogtreecommitdiff
path: root/gcc/ada/atree.ads
diff options
context:
space:
mode:
authorYannick Moy <moy@adacore.com>2021-07-20 13:59:19 +0200
committerPierre-Marie de Rodat <derodat@adacore.com>2021-09-22 15:01:46 +0000
commit8c61547d80c8b4c611284b63e92d10f87c9898b2 (patch)
treeff4b1fa963e22c44430bf79894eb7dea59a7652d /gcc/ada/atree.ads
parent0b7ddfb9f13b3bfb7f4fc9ac23f6adf4f36e7098 (diff)
downloadgcc-8c61547d80c8b4c611284b63e92d10f87c9898b2.tar.gz
[Ada] Fix infinite loop in compilation of illegal code
gcc/ada/ * atree.adb (Rewrite): Fix parent node of shared aspects. * atree.ads (Rewrite): Add ??? comment on incorrect documentation. * einfo-utils.adb (Known_Esize): Fix logic. * sem_ch13.adb (Alignment_Check_For_Size_Change, Analyze_Attribute_Definition_Clause): Protect against unset Size.
Diffstat (limited to 'gcc/ada/atree.ads')
-rw-r--r--gcc/ada/atree.ads1
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/ada/atree.ads b/gcc/ada/atree.ads
index 6fb5aa6c2b6..94e589e70ac 100644
--- a/gcc/ada/atree.ads
+++ b/gcc/ada/atree.ads
@@ -501,6 +501,7 @@ package Atree is
-- the contents of these two nodes fixing up the parent pointers of the
-- replaced node (we do not attempt to preserve parent pointers for the
-- original node). Neither Old_Node nor New_Node can be extended nodes.
+ -- ??? The above explanation is incorrect, instead Copy_Node is called.
--
-- Note: New_Node may not contain references to Old_Node, for example as
-- descendants, since the rewrite would make such references invalid. If