]> git.ipfire.org Git - thirdparty/gcc.git/commit
ada: Bug box for expression function with list comprehension
authorBob Duff <duff@adacore.com>
Tue, 18 Jun 2024 16:53:46 +0000 (12:53 -0400)
committerMarc Poulhiès <dkm@gcc.gnu.org>
Tue, 2 Jul 2024 13:20:35 +0000 (15:20 +0200)
commitd33104429a6662f33e05b9fcae65c87a87005749
treebbeac5ed71c20d49b1d7a6fc5ba28358b2c21512
parent772fcf4769a4d4e5546039c0174662df1bc86fa4
ada: Bug box for expression function with list comprehension

GNAT crashes on an iterator with a filter inside an expression function
that is the completion of an earlier spec.

gcc/ada/

* freeze.adb (Freeze_Type_Refs): If Node is in N_Has_Etype,
check that it has had its Etype set, because this can be
called early for expression functions that are completions.
gcc/ada/freeze.adb