commit | 076a6d13d1e07a72fb964579316920225829777c | [log] [tgz] |
---|---|---|
author | Piotr Trojanek <trojanek@adacore.com> | Wed Jun 08 16:58:18 2022 +0200 |
committer | Pierre-Marie de Rodat <derodat@adacore.com> | Tue Jul 05 08:28:20 2022 +0000 |
tree | 77592e603295aaa3437d7b203759ec6f3f55eedc | |
parent | 5709fac357bb922a9eeecf42adbedd532c00fde6 [diff] |
[Ada] Remove redundant protection against empty lists Calls to First on No_List intentionally return Empty node, so explicit guards against No_List are unnecessary. Code cleanup; semantics is unaffected. gcc/ada/ * exp_code.adb (Setup_Asm_IO_Args): Remove guard against No_List. * par_sco.adb (Process_Decisions): Likewise. * sem_ch13.adb (Check_Component_List): Likewise. * sem_ch6.adb (FCL): Likewise.