From patchwork Fri Nov 15 21:44:05 2019 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit X-Patchwork-Submitter: Julian Brown X-Patchwork-Id: 1195871 Return-Path: X-Original-To: incoming@patchwork.ozlabs.org Delivered-To: patchwork-incoming@bilbo.ozlabs.org Authentication-Results: ozlabs.org; spf=pass (sender SPF authorized) smtp.mailfrom=gcc.gnu.org (client-ip=209.132.180.131; helo=sourceware.org; envelope-from=gcc-patches-return-513695-incoming=patchwork.ozlabs.org@gcc.gnu.org; receiver=) Authentication-Results: ozlabs.org; dmarc=none (p=none dis=none) header.from=codesourcery.com Authentication-Results: ozlabs.org; dkim=pass (1024-bit key; unprotected) header.d=gcc.gnu.org header.i=@gcc.gnu.org header.b="fdqiZZbQ"; dkim-atps=neutral Received: from sourceware.org (server1.sourceware.org [209.132.180.131]) (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits)) (No client certificate requested) by ozlabs.org (Postfix) with ESMTPS id 47FBjy1qyYz9sPV for ; Sat, 16 Nov 2019 08:45:58 +1100 (AEDT) DomainKey-Signature: a=rsa-sha1; c=nofws; d=gcc.gnu.org; h=list-id :list-unsubscribe:list-archive:list-post:list-help:sender:from :to:cc:subject:date:message-id:in-reply-to:references :mime-version:content-transfer-encoding:content-type; q=dns; s= default; b=AwdbkJM/WPufZDQXQ3m0WHFwFppiLHo5Jza0ImiOcL/rLWJsZ5ZGy e3RgTCuT2ONp/LF8V1qeQkvHx8C/VZV49z+D0iH6NlPf3MNu53BLrBMEwwueiFdu 1EhqxhbWRAJ8t4tAWIPwGSMTUrsLiFDVfWXcfIgW0hld2jRzvkPdu4= DKIM-Signature: v=1; a=rsa-sha1; c=relaxed; d=gcc.gnu.org; h=list-id :list-unsubscribe:list-archive:list-post:list-help:sender:from :to:cc:subject:date:message-id:in-reply-to:references :mime-version:content-transfer-encoding:content-type; s=default; bh=iYKOYSi7dmKn/H6PTYU9WFamSLU=; b=fdqiZZbQGCpdqbZtsmRfTZ9sXvg3 snS0IuIFU8Cvouh3J+6kKt7Q3jzlsDOE2vtoLtDRO8jGrOKeCaFiVj1sVeKFMfSC FQ5kMk2EZZPT/mj1lfHm7QG1kH0bFNLgxD1hM42CiOuBhH4H1WQ3Gs05BNYWDGCn WPJYZZ+5+9xgF7E= Received: (qmail 57192 invoked by alias); 15 Nov 2019 21:45:22 -0000 Mailing-List: contact gcc-patches-help@gcc.gnu.org; run by ezmlm Precedence: bulk List-Id: List-Unsubscribe: List-Archive: List-Post: List-Help: Sender: gcc-patches-owner@gcc.gnu.org Delivered-To: mailing list gcc-patches@gcc.gnu.org Received: (qmail 56702 invoked by uid 89); 15 Nov 2019 21:45:18 -0000 Authentication-Results: sourceware.org; auth=none X-Spam-SWARE-Status: No, score=-23.7 required=5.0 tests=AWL, BAYES_00, GIT_PATCH_0, GIT_PATCH_1, GIT_PATCH_2, GIT_PATCH_3, SPF_PASS autolearn=ham version=3.3.1 spammy=acc_on_device, HContent-Transfer-Encoding:8bit X-HELO: esa4.mentor.iphmx.com Received: from esa4.mentor.iphmx.com (HELO esa4.mentor.iphmx.com) (68.232.137.252) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with ESMTP; Fri, 15 Nov 2019 21:45:17 +0000 IronPort-SDR: zt6+Z2263N1YaZ6yjOplS6XhuVDTJuVnBmejrVJoQ/sS2GoxXUEx2KVQHwaBvuAg0yemRtNkQa VEmzHPET6sO4eS/3sanQvvyiNCQtrYmyTvfzSK0JOMSalEVI+moujho7odiRmDKd7Ad/mZyQbg 7mfTpOWIiJvCi0CwTGIGNKl30oJs9vppLhK8qM5+2dvL218wROsZx8zwDxHLJwFbxC3x2oAWrS Rk8fz0ZYDut1eSf/7EbA50miknVws/GS1XHwdHtRM94f5cFsY/zNLhvEqNcl8vs6eR2kkDPbI4 Sjs= Received: from orw-gwy-02-in.mentorg.com ([192.94.38.167]) by esa4.mentor.iphmx.com with ESMTP; 15 Nov 2019 13:45:16 -0800 IronPort-SDR: +DcFZzoPwNzot8ElH0tFzCTI8LRttD3pjNclE1Mc4S1c9sfMCEwgmNcGORJ4sWlXBjoK8YijBe kT1v05Gr+o5/iOWN8MgrvbtQJrRct25ahQW6dn2tzLsTS3h6XGMKQYptPbUxe+mub5bfyE9lMM 2Q+2BzpyBPH4YpyegbtzZVchPUhDPl+XcBp4lEif4iGpdWfElrkAy8vuSxGV81ftiM/vWJa+Nw bu9KB9thcMibzGdAUqzUAyRZbFO1EV9tx5vl3rUGzM2PynV5YIKtHEdJ6IxWEUVLYjvEsCAw3h 884= From: Julian Brown To: CC: , , , Andrew Stubbs Subject: [PATCH 12/13] Fix parallel-dims.f90 for AMD GCN Date: Fri, 15 Nov 2019 13:44:05 -0800 Message-ID: <292d1e6f61c251cf8b31320b6ad54c9a08e59748.1573849744.git.julian@codesourcery.com> In-Reply-To: References: MIME-Version: 1.0 X-IsSubscribed: yes This patch provides AMD GCN support for the parallel-dims.f90 test's parallel-dims-aux.c helper. OK? Thanks, Julian ChangeLog libgomp/ * testsuite/libgomp.oacc-fortran/parallel-dims-aux.c: Support AMD GCN. --- .../testsuite/libgomp.oacc-fortran/parallel-dims-aux.c | 9 ++++++--- 1 file changed, 6 insertions(+), 3 deletions(-) diff --git a/libgomp/testsuite/libgomp.oacc-fortran/parallel-dims-aux.c b/libgomp/testsuite/libgomp.oacc-fortran/parallel-dims-aux.c index b5986f4afef..0778081860f 100644 --- a/libgomp/testsuite/libgomp.oacc-fortran/parallel-dims-aux.c +++ b/libgomp/testsuite/libgomp.oacc-fortran/parallel-dims-aux.c @@ -16,7 +16,8 @@ { if (acc_on_device ((int) acc_device_host)) return 0; - else if (acc_on_device ((int) acc_device_nvidia)) + else if (acc_on_device ((int) acc_device_nvidia) + || acc_on_device ((int) acc_device_gcn)) return __builtin_goacc_parlevel_id (GOMP_DIM_GANG); else __builtin_abort (); @@ -27,7 +28,8 @@ { if (acc_on_device ((int) acc_device_host)) return 0; - else if (acc_on_device ((int) acc_device_nvidia)) + else if (acc_on_device ((int) acc_device_nvidia) + || acc_on_device ((int) acc_device_gcn)) return __builtin_goacc_parlevel_id (GOMP_DIM_WORKER); else __builtin_abort (); @@ -38,7 +40,8 @@ { if (acc_on_device ((int) acc_device_host)) return 0; - else if (acc_on_device ((int) acc_device_nvidia)) + else if (acc_on_device ((int) acc_device_nvidia) + || acc_on_device ((int) acc_device_gcn)) return __builtin_goacc_parlevel_id (GOMP_DIM_VECTOR); else __builtin_abort ();