https://gcc.gnu.org/g:42f984411bff7633b01e2d98176be8ce968b2130

commit r16-1938-g42f984411bff7633b01e2d98176be8ce968b2130
Author: Eric Botcazou <ebotca...@adacore.com>
Date:   Thu Jun 5 13:14:33 2025 +0200

    ada: Remove a couple of redundant calls to Set_Etype
    
    The OK_Convert_To function already sets the Etype of its result.
    
    gcc/ada/ChangeLog:
    
            * exp_imgv.adb (Expand_Value_Attribute): Do not call Set_Etype on N
            after rewriting it by means of OK_Convert_To.

Diff:
---
 gcc/ada/exp_imgv.adb | 2 --
 1 file changed, 2 deletions(-)

diff --git a/gcc/ada/exp_imgv.adb b/gcc/ada/exp_imgv.adb
index 6c2b940736ba..3fef6fabe64e 100644
--- a/gcc/ada/exp_imgv.adb
+++ b/gcc/ada/exp_imgv.adb
@@ -1631,7 +1631,6 @@ package body Exp_Imgv is
                Name => New_Occurrence_Of (RTE (Vid), Loc),
                Parameter_Associations => Args)));
 
-         Set_Etype (N, Btyp);
          Analyze_And_Resolve (N, Btyp);
          return;
 
@@ -1675,7 +1674,6 @@ package body Exp_Imgv is
                      Name => New_Occurrence_Of (RTE (Vid), Loc),
                      Parameter_Associations => Args)));
 
-               Set_Etype (N, Btyp);
                Analyze_And_Resolve (N, Btyp);
                return;
             end if;

Reply via email to