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

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

commit r10-9974-gca094af16ce810b1e553e000354b5d64a9b90a1a
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 63a0ad9461e..abb456216c7 100644
--- a/gcc/ada/gcc-interface/utils.c
+++ b/gcc/ada/gcc-interface/utils.c
@@ -3438,9 +3438,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:33 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:33 [gcc r10-9974] 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).