From 511cec029c6592ee553d9087d8b2bbf7719cf30d Mon Sep 17 00:00:00 2001 From: Eric Botcazou Date: Fri, 9 Jul 2021 18:30:54 +0200 Subject: [PATCH] Missing piece in earlier change gcc/ada/ * gcc-interface/utils.c (finish_subprog_decl): Remove obsolete line. --- 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);