diff options
| author | Piotr Trojanek <trojanek@adacore.com> | 2020-03-16 22:54:13 +0100 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2020-06-11 05:53:40 -0400 |
| commit | 6dc5653584ca84f7d396dd2aa8b65070a1c1f7e1 (patch) | |
| tree | fd3a48bfa8116c657c3b3527d28a373adf7aa912 /gcc | |
| parent | 08380342a4c4b9c50083b0baf6d4f66997817e72 (diff) | |
| download | gcc-6dc5653584ca84f7d396dd2aa8b65070a1c1f7e1.zip gcc-6dc5653584ca84f7d396dd2aa8b65070a1c1f7e1.tar.gz gcc-6dc5653584ca84f7d396dd2aa8b65070a1c1f7e1.tar.bz2 | |
[Ada] Make Object Specific Dispatch tables constant
2020-06-11 Piotr Trojanek <trojanek@adacore.com>
gcc/ada/
* exp_disp.adb (Make_Secondary_DT): Internally generated OSD
tables are now constant.
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/exp_disp.adb | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/gcc/ada/exp_disp.adb b/gcc/ada/exp_disp.adb index c897574..617cb1b 100644 --- a/gcc/ada/exp_disp.adb +++ b/gcc/ada/exp_disp.adb @@ -4310,6 +4310,7 @@ package body Exp_Disp is Append_To (Result, Make_Object_Declaration (Loc, Defining_Identifier => OSD, + Constant_Present => True, Object_Definition => Make_Subtype_Indication (Loc, Subtype_Mark => |