[gcc r16-1208] ada: Remove useless calls

[Marc Poulhies via Gcc-cvs]

https://gcc.gnu.org/g:d5b0410adf21e24177150ac3a209770f46299494

commit r16-1208-gd5b0410adf21e24177150ac3a209770f46299494
Author: Ronan Desplanques <desplanq...@adacore.com>
Date:   Wed Feb 12 10:34:06 2025 +0100

    ada: Remove useless calls
    
    The subprogram calls this patch removes were useless because they were
    already made in New_Standard_Entity.
    
    gcc/ada/ChangeLog:
    
            * cstand.adb (Create_Standard): Remove useless calls.

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

diff --git a/gcc/ada/cstand.adb b/gcc/ada/cstand.adb
index 5ba88b9ae1c9..41b0fec157fc 100644
--- a/gcc/ada/cstand.adb
+++ b/gcc/ada/cstand.adb
@@ -629,8 +629,6 @@ package body CStand is
             Decl := New_Node (N_Full_Type_Declaration, Stloc);
          end if;
 
-         Set_Is_Frozen (Standard_Entity (S));
-         Set_Is_Public (Standard_Entity (S));
          Set_Defining_Identifier (Decl, Standard_Entity (S));
          Append (Decl, Decl_S);
       end loop;