From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 2479 invoked by alias); 5 Sep 2018 16:55:40 -0000 Mailing-List: contact fortran-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Id: List-Subscribe: List-Post: List-Help: , Sender: fortran-owner@gcc.gnu.org Received: (qmail 2466 invoked by uid 89); 5 Sep 2018 16:55:39 -0000 Authentication-Results: sourceware.org; auth=none X-Spam-SWARE-Status: No, score=-23.4 required=5.0 tests=AWL,BAYES_00,GIT_PATCH_0,GIT_PATCH_1,GIT_PATCH_2,GIT_PATCH_3,KAM_LAZY_DOMAIN_SECURITY autolearn=ham version=3.3.2 spammy= X-HELO: moene.org Received: from moene.org (HELO moene.org) (80.101.130.238) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with ESMTP; Wed, 05 Sep 2018 16:55:38 +0000 Received: from localhost ([127.0.0.1] helo=moene.org) by moene.org with esmtp (Exim 4.91) (envelope-from ) id 1fxb5c-0004gd-Nk for fortran@gcc.gnu.org; Wed, 05 Sep 2018 18:55:36 +0200 Subject: Fwd: [PATCH 17/25] Fix Fortran STOP. References: <3b1ee6252e6bc42be1886f45fd4512efda27bcbd.1536144068.git.ams@codesourcery.com> To: gfortran From: Toon Moene X-Forwarded-Message-Id: <3b1ee6252e6bc42be1886f45fd4512efda27bcbd.1536144068.git.ams@codesourcery.com> Message-ID: Date: Wed, 05 Sep 2018 16:55:00 -0000 User-Agent: Mozilla/5.0 (X11; Linux x86_64; rv:52.0) Gecko/20100101 Thunderbird/52.9.1 MIME-Version: 1.0 In-Reply-To: <3b1ee6252e6bc42be1886f45fd4512efda27bcbd.1536144068.git.ams@codesourcery.com> Content-Type: multipart/mixed; boundary="------------AF105B6AE44838C134C0C1F8" X-IsSubscribed: yes X-SW-Source: 2018-09/txt/msg00053.txt.bz2 This is a multi-part message in MIME format. --------------AF105B6AE44838C134C0C1F8 Content-Type: text/plain; charset=utf-8; format=flowed Content-Transfer-Encoding: 7bit Content-length: 614 -------- Forwarded Message -------- Subject: [PATCH 17/25] Fix Fortran STOP. Date: Wed, 5 Sep 2018 12:51:18 +0100 From: ams@codesourcery.com To: gcc-patches@gcc.gnu.org The minimal libgfortran setup was created for NVPTX, but will also be used by AMD GCN. This patch simply removes an assumption that NVPTX is the only user. Specifically, NVPTX exit is broken, but AMD GCN exit works just fine. 2018-09-05 Andrew Stubbs libgfortran/ * runtime/minimal.c (exit): Only work around nvptx bugs on nvptx. --- libgfortran/runtime/minimal.c | 2 ++ 1 file changed, 2 insertions(+) --------------AF105B6AE44838C134C0C1F8 Content-Type: text/x-patch; name="0017-Fix-Fortran-STOP.patch" Content-Transfer-Encoding: 7bit Content-Disposition: attachment; filename="0017-Fix-Fortran-STOP.patch" Content-length: 555 diff --git a/libgfortran/runtime/minimal.c b/libgfortran/runtime/minimal.c index 0b1efeb..8940f97 100644 --- a/libgfortran/runtime/minimal.c +++ b/libgfortran/runtime/minimal.c @@ -197,10 +197,12 @@ sys_abort (void) #define st_printf printf #undef estr_write #define estr_write printf +#if __nvptx__ /* Map "exit" to "abort"; see PR85463 '[nvptx] "exit" in offloaded region doesn't terminate process'. */ #undef exit #define exit(...) do { abort (); } while (0) +#endif #undef exit_error #define exit_error(...) do { abort (); } while (0) --------------AF105B6AE44838C134C0C1F8--