]> git.ipfire.org Git - thirdparty/gcc.git/commit
ada: Fix internal error on loop parameter specifications
authorPiotr Trojanek <trojanek@adacore.com>
Wed, 20 Nov 2024 15:22:05 +0000 (16:22 +0100)
committerMarc Poulhiès <dkm@gcc.gnu.org>
Thu, 12 Dec 2024 09:57:59 +0000 (10:57 +0100)
commit29fe40e0d145a72f6a8e9c6976c7b80883525cdf
tree7ba0dfd4cb8d74dcc09af57217c99d9b0f98ccc8
parent8999aba832b3c8789d3bfd5680985bfb77a4df87
ada: Fix internal error on loop parameter specifications

Originally loop parameter specification only occurred in loops, but now
it also occurs in quantified expressions. This patch guards against
flagging non-loop nodes as null loop statements. This was causing
internal compiler errors that were only visible with switch -gnatdk,
which happens to be default in GNATprove testsuite.

gcc/ada/ChangeLog:

* sem_ch5.adb (Analyze_Loop_Parameter_Specification): Only set
flag Is_Null_Loop when loop parameter specification comes from
a loop and not from a quantified expression.
gcc/ada/sem_ch5.adb