* [Ada] Remove excessive guards against inserting empty lists of actions
@ 2022-09-05 7:25 Marc Poulhiès
0 siblings, 0 replies; only message in thread
From: Marc Poulhiès @ 2022-09-05 7:25 UTC (permalink / raw)
To: gcc-patches; +Cc: Piotr Trojanek
[-- Attachment #1: Type: text/plain, Size: 320 bytes --]
Call to Insert_Actions with empty list does nothing, so there is no need to
guard against such calls. Code cleanup; behavior is unaffected.
Tested on x86_64-pc-linux-gnu, committed on trunk
gcc/ada/
* freeze.adb (Freeze_Itype): Remove excessive guard.
* sem_ch5.adb (Analyze_Loop_Parameter_Specification): Likewise.
[-- Attachment #2: patch.diff --]
[-- Type: text/x-diff, Size: 827 bytes --]
diff --git a/gcc/ada/freeze.adb b/gcc/ada/freeze.adb
--- a/gcc/ada/freeze.adb
+++ b/gcc/ada/freeze.adb
@@ -9653,9 +9653,7 @@ package body Freeze is
Set_Has_Delayed_Freeze (T);
L := Freeze_Entity (T, N);
- if Is_Non_Empty_List (L) then
- Insert_Actions (N, L);
- end if;
+ Insert_Actions (N, L);
end Freeze_Itype;
--------------------------
diff --git a/gcc/ada/sem_ch5.adb b/gcc/ada/sem_ch5.adb
--- a/gcc/ada/sem_ch5.adb
+++ b/gcc/ada/sem_ch5.adb
@@ -3365,9 +3365,7 @@ package body Sem_Ch5 is
declare
Flist : constant List_Id := Freeze_Entity (Id, N);
begin
- if Is_Non_Empty_List (Flist) then
- Insert_Actions (N, Flist);
- end if;
+ Insert_Actions (N, Flist);
end;
end if;
^ permalink raw reply [flat|nested] only message in thread
only message in thread, other threads:[~2022-09-05 7:25 UTC | newest]
Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2022-09-05 7:25 [Ada] Remove excessive guards against inserting empty lists of actions Marc Poulhiès
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).