From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: by sourceware.org (Postfix, from userid 2140) id F24EB3857006; Thu, 8 Jun 2023 10:42:47 +0000 (GMT) DKIM-Filter: OpenDKIM Filter v2.11.0 sourceware.org F24EB3857006 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gcc.gnu.org; s=default; t=1686220967; bh=4tCzy9uTKGOGfSbSvRFwfRmxnWppn/P+KVwSbGBmYSM=; h=From:To:Subject:Date:From; b=T/C28ZKUmAIm1xLgG4NLnZhShL0Jg3WxEV9S48MnYKmwmsxwpnPxrzSRe9XTJwf5y 4b5KoLkc5FB4LtAXLWI3CXGOlqKiOJEcG+QAXjzz+ONC9wGLQwLya0NRazT9fp+hPI E+NNSsrgJJVk+i8wlF2HubbIhfFKIEzDz9e39NGw= Content-Type: text/plain; charset="us-ascii" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit From: Alexandre Oliva To: gcc-cvs@gcc.gnu.org Subject: [gcc(refs/users/aoliva/heads/testme)] hardcfr: mark throw-expected functions [ada/gcc-interface] X-Act-Checkin: gcc X-Git-Author: Alexandre Oliva X-Git-Refname: refs/users/aoliva/heads/testme X-Git-Oldrev: abc12dfe9a1291511701627ba195de35f4c85fb2 X-Git-Newrev: 5e592380beb755d6d48c40d6e9ac1c3c85b245d4 Message-Id: <20230608104247.F24EB3857006@sourceware.org> Date: Thu, 8 Jun 2023 10:42:47 +0000 (GMT) List-Id: https://gcc.gnu.org/g:5e592380beb755d6d48c40d6e9ac1c3c85b245d4 commit 5e592380beb755d6d48c40d6e9ac1c3c85b245d4 Author: Alexandre Oliva Date: Thu Jun 8 01:35:05 2023 -0300 hardcfr: mark throw-expected functions [ada/gcc-interface] Mark exception-(re)raising builtin declarations with ECF_THROW. for gcc/ada/gcc-interface/ChangeLog * trans.cc (gigi): Mark __gnat_reraise_zcx with ECF_THROW. (build_raise_check): Likewise for all rcheck subprograms. Diff: --- gcc/ada/gcc-interface/trans.cc | 2 ++ 1 file changed, 2 insertions(+) diff --git a/gcc/ada/gcc-interface/trans.cc b/gcc/ada/gcc-interface/trans.cc index ddc7b6dde1e..965565ad2da 100644 --- a/gcc/ada/gcc-interface/trans.cc +++ b/gcc/ada/gcc-interface/trans.cc @@ -519,6 +519,7 @@ gigi (Node_Id gnat_root, ftype, NULL_TREE, is_default, true, true, true, false, false, NULL, Empty); + set_call_expr_flags (reraise_zcx_decl, ECF_NORETURN | ECF_THROW); /* Dummy objects to materialize "others" and "all others" in the exception tables. These are exported by a-exexpr-gcc.adb, so see this unit for @@ -721,6 +722,7 @@ build_raise_check (int check, enum exception_info_kind kind) = create_subprog_decl (get_identifier (Name_Buffer), NULL_TREE, ftype, NULL_TREE, is_default, true, true, true, false, false, NULL, Empty); + set_call_expr_flags (result, ECF_NORETURN | ECF_THROW); return result; }