[Ada] Assert failure on pragma Inline in procedure body
commite18e1b5f524507fd7b7d8bd4d674bc63333a5679
authorArnaud Charlet <charlet@adacore.com>
Wed, 20 Jan 2021 09:50:14 +0000 (20 04:50 -0500)
committerPierre-Marie de Rodat <derodat@adacore.com>
Thu, 6 May 2021 07:51:33 +0000 (6 03:51 -0400)
tree64b3ac6dd80d8b4b60500382750faacaaa795b69
parent952da35cc67000445ca18d3ee8213d7c71a4b3a4
[Ada] Assert failure on pragma Inline in procedure body

gcc/ada/

* sem_ch6.adb (Is_Inline_Pragma): Protect against N not being a
list member in both branches.
gcc/ada/sem_ch6.adb