| commit | cbf64a8037904b0b4bba99e16e5913ba225e7180 | |
| author | Eric Botcazou <ebotcazou@adacore.com> | |
| Wed, 25 Jan 2023 14:55:34 +0000 (25 15:55 +0100) | ||
| committer | Marc Poulhiès <poulhies@adacore.com> | |
| Tue, 16 May 2023 08:30:57 +0000 (16 10:30 +0200) | ||
| tree | 69613804082cd8958f99c4a1115f8e12c9ea40ed | treesnapshot (tar.gz zip) |
| parent | b54fd57a1b3429542286c3bea7c38cce931064f7 | commitdiff |
ada: Follow-up improvement to implementation of storage models
It avoids to recreate an actual subtype for an explicit dereference.
gcc/ada/
* sem_util.adb (Get_Actual_Subtype): For an explicit dereference,
return the Actual_Designated_Subtype if it is present.
(Get_Actual_Subtype_If_Available): Likewise.
It avoids to recreate an actual subtype for an explicit dereference.
gcc/ada/
* sem_util.adb (Get_Actual_Subtype): For an explicit dereference,
return the Actual_Designated_Subtype if it is present.
(Get_Actual_Subtype_If_Available): Likewise.
| gcc/ada/sem_util.adb | diffblobblamehistory |