]> git.ipfire.org Git - thirdparty/gcc.git/commit
ada: Fix crash on real literal in declare expression of expression function
authorEric Botcazou <ebotcazou@adacore.com>
Mon, 20 May 2024 12:33:14 +0000 (14:33 +0200)
committerMarc Poulhiès <poulhies@adacore.com>
Thu, 20 Jun 2024 08:50:55 +0000 (10:50 +0200)
commit9cf95147c04c64344466f6e41ce5be32fbde96e0
treeff445c6b70c453878df5dca612d1ed797368b7b5
parentce59982c28e19b2c478e12e4afc7b03e8793498b
ada: Fix crash on real literal in declare expression of expression function

The problem is that the freeze node of the type to which the real literal
is resolved is placed inside the expression function instead of outside.

gcc/ada/

* freeze.adb (Freeze_Expression): Also attach pending freeze nodes
to the parent in the case of an internal block in a spec expression.
gcc/ada/freeze.adb