diff options
| author | Bob Duff <duff@adacore.com> | 2023-01-30 11:25:08 -0500 |
|---|---|---|
| committer | Marc Poulhiès <poulhies@adacore.com> | 2023-05-22 10:44:07 +0200 |
| commit | df0ac6e158727064dd089be9051a82c26bd66880 (patch) | |
| tree | 13fdb944281be2a925fef0f464c5d15f4fbdacd0 /gcc/ada/fe.h | |
| parent | 16df2790a58ebbeb949ffb790ebee7f6ed31936d (diff) | |
| download | gcc-df0ac6e158727064dd089be9051a82c26bd66880.zip gcc-df0ac6e158727064dd089be9051a82c26bd66880.tar.gz gcc-df0ac6e158727064dd089be9051a82c26bd66880.tar.bz2 | |
ada: prevent infinite recursion in Collect_Types_In_Hierarchy
In (illegal) mutually-dependent type declarations, it is possible for
Etype (Etype (Typ)) to point back to Typ. This patch stops the recursion
in such cases.
gcc/ada/
* sem_util.adb (Process_Type): Stop the recursion.
* exp_aggr.adb (Build_Record_Aggr_Code): Add assertion.
Diffstat (limited to 'gcc/ada/fe.h')
0 files changed, 0 insertions, 0 deletions