aboutsummaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
authorPiotr Trojanek <trojanek@adacore.com>2021-04-08 21:19:54 +0200
committerPierre-Marie de Rodat <derodat@adacore.com>2021-06-29 14:23:47 +0000
commitafea7b3dc2c85604167debac55cc736689b994ad (patch)
treebdec4660f0a12b5ac69edb3e4009287478f902a7 /gcc
parentdf3636e013f276a0d1fde5b6da1f504b748696db (diff)
downloadgcc-afea7b3dc2c85604167debac55cc736689b994ad.zip
gcc-afea7b3dc2c85604167debac55cc736689b994ad.tar.gz
gcc-afea7b3dc2c85604167debac55cc736689b994ad.tar.bz2
[Ada] Remove redundant check for empty list
gcc/ada/ * sem_ch3.adb (Analyze_Declarations): Remove explicit check for missing, because a subsequent call to Is_Empty_List will detect them anyway.
Diffstat (limited to 'gcc')
-rw-r--r--gcc/ada/sem_ch3.adb1
1 files changed, 0 insertions, 1 deletions
diff --git a/gcc/ada/sem_ch3.adb b/gcc/ada/sem_ch3.adb
index 70e1dfd..7dfb5c8 100644
--- a/gcc/ada/sem_ch3.adb
+++ b/gcc/ada/sem_ch3.adb
@@ -2758,7 +2758,6 @@ package body Sem_Ch3 is
Resolve_Aspects;
elsif L /= Visible_Declarations (Parent (L))
- or else No (Private_Declarations (Parent (L)))
or else Is_Empty_List (Private_Declarations (Parent (L)))
then
Adjust_Decl;