diff options
| author | Piotr Trojanek <trojanek@adacore.com> | 2020-12-31 13:11:00 +0100 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2021-05-03 05:28:25 -0400 |
| commit | 4e54d69b665d434bc3d74c0f8ebb2993a5539ffd (patch) | |
| tree | 1668918fbb3b313d8d26437a835797c6df21b438 /gcc | |
| parent | ef9dd96c920268b679bfde704db2f72ffeef0f9b (diff) | |
| download | gcc-4e54d69b665d434bc3d74c0f8ebb2993a5539ffd.zip gcc-4e54d69b665d434bc3d74c0f8ebb2993a5539ffd.tar.gz gcc-4e54d69b665d434bc3d74c0f8ebb2993a5539ffd.tar.bz2 | |
[Ada] Replace call with a reference to a local constant
gcc/ada/
* sem_ch4.adb (Try_Object_Operation): Reuse local constant.
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/ada/sem_ch4.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/sem_ch4.adb b/gcc/ada/sem_ch4.adb index 77f2812..a96ce9f 100644 --- a/gcc/ada/sem_ch4.adb +++ b/gcc/ada/sem_ch4.adb @@ -10223,7 +10223,7 @@ package body Sem_Ch4 is if Serious_Errors_Detected = 0 then Error_Msg_NE ("cannot resolve prefixed call to primitive operation of&", - N, Entity (Prefix (N))); + N, Entity (Obj)); end if; end if; |