From 880e6752ad94fe0b690fbe39b49e1d6db026db12 Mon Sep 17 00:00:00 2001 From: Ronan Desplanques Date: Fri, 28 Feb 2025 12:19:12 +0100 Subject: [PATCH] ada: Improve readability in Atree.Rewrite body This patch visually packs together the statements that implement the exceptions in Rewrite that a few fields are not actually overwritten, in order to improve the readability of the code. gcc/ada/ChangeLog: * atree.adb (Rewrite): Improve readability. --- gcc/ada/atree.adb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/gcc/ada/atree.adb b/gcc/ada/atree.adb index 8a69a0c224d..3fa55a7fc65 100644 --- a/gcc/ada/atree.adb +++ b/gcc/ada/atree.adb @@ -2271,10 +2271,10 @@ package body Atree is -- Copy substitute node into place, preserving old fields as required Copy_Node (Source => New_Node, Destination => Old_Node); - Set_Error_Posted (Old_Node, Old_Error_Posted); Set_Check_Actuals (Old_Node, Old_CA); Set_Is_Ignored_Ghost_Node (Old_Node, Old_Is_IGN); + Set_Error_Posted (Old_Node, Old_Error_Posted); if Nkind (New_Node) in N_Subexpr then Set_Paren_Count (Old_Node, Old_Paren_Count); -- 2.47.2