public inbox for gcc-cvs@sourceware.org
help / color / mirror / Atom feed
* [gcc r12-2224] Missing piece in earlier change
@ 2021-07-09 16:32 Eric Botcazou
  0 siblings, 0 replies; only message in thread
From: Eric Botcazou @ 2021-07-09 16:32 UTC (permalink / raw)
  To: gcc-cvs

https://gcc.gnu.org/g:511cec029c6592ee553d9087d8b2bbf7719cf30d

commit r12-2224-g511cec029c6592ee553d9087d8b2bbf7719cf30d
Author: Eric Botcazou <ebotcazou@adacore.com>
Date:   Fri Jul 9 18:30:54 2021 +0200

    Missing piece in earlier change
    
    gcc/ada/
            * gcc-interface/utils.c (finish_subprog_decl): Remove obsolete line.

Diff:
---
 gcc/ada/gcc-interface/utils.c | 3 ---
 1 file changed, 3 deletions(-)

diff --git a/gcc/ada/gcc-interface/utils.c b/gcc/ada/gcc-interface/utils.c
index 982274c6d77..535f4ca7fba 100644
--- a/gcc/ada/gcc-interface/utils.c
+++ b/gcc/ada/gcc-interface/utils.c
@@ -3543,9 +3543,6 @@ finish_subprog_decl (tree decl, tree asm_name, tree type)
   DECL_BY_REFERENCE (result_decl) = TREE_ADDRESSABLE (type);
   DECL_RESULT (decl) = result_decl;
 
-  /* Propagate the "const" property.  */
-  TREE_READONLY (decl) = TYPE_READONLY (type);
-
   /* Propagate the "pure" property.  */
   DECL_PURE_P (decl) = TYPE_RESTRICT (type);


^ permalink raw reply	[flat|nested] only message in thread
only message in thread, other threads:[~2021-07-09 16:32 UTC | newest]

Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2021-07-09 16:32 [gcc r12-2224] Missing piece in earlier change Eric Botcazou

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).