[Ada] Fix premature freezing of artificial array subtype
authorEric Botcazou <ebotcazou@adacore.com>
Tue, 7 Apr 2020 07:39:06 +0000 (09:39 +0200)
committerPierre-Marie de Rodat <derodat@adacore.com>
Tue, 16 Jun 2020 13:07:15 +0000 (09:07 -0400)
commit7e7cb6eee494e3ec59ae1faf679fe2c3a578a95e
tree15a78d2451af5a90b8fac7910f6363408ccb3304
parent158b52c9616a3bc0b1c2622e3627a544318fd329
[Ada] Fix premature freezing of artificial array subtype

2020-06-16  Eric Botcazou  <ebotcazou@adacore.com>

gcc/ada/

* freeze.adb (Freeze_Expression): Stop climbing the parent chain
at a N_{Case,If}_Expression node for a type or an entity that
does not come from source.
gcc/ada/freeze.adb