From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from us-smtp-delivery-124.mimecast.com (us-smtp-delivery-124.mimecast.com [170.10.129.124]) by sourceware.org (Postfix) with ESMTPS id C6B923856DD9 for ; Fri, 1 Jul 2022 15:48:44 +0000 (GMT) DMARC-Filter: OpenDMARC Filter v1.4.1 sourceware.org C6B923856DD9 Received: from mimecast-mx02.redhat.com (mimecast-mx02.redhat.com [66.187.233.88]) by relay.mimecast.com with ESMTP with STARTTLS (version=TLSv1.2, cipher=TLS_ECDHE_RSA_WITH_AES_256_GCM_SHA384) id us-mta-531-ZCtMp9qUOgOGY6qwiFlnag-1; Fri, 01 Jul 2022 11:48:41 -0400 X-MC-Unique: ZCtMp9qUOgOGY6qwiFlnag-1 Received: from smtp.corp.redhat.com (int-mx03.intmail.prod.int.rdu2.redhat.com [10.11.54.3]) (using TLSv1.2 with cipher AECDH-AES256-SHA (256/256 bits)) (No client certificate requested) by mimecast-mx02.redhat.com (Postfix) with ESMTPS id 2821D8001EA; Fri, 1 Jul 2022 15:48:41 +0000 (UTC) Received: from tucnak.zalov.cz (unknown [10.39.192.30]) by smtp.corp.redhat.com (Postfix) with ESMTPS id D896B1121314; Fri, 1 Jul 2022 15:48:40 +0000 (UTC) Received: from tucnak.zalov.cz (localhost [127.0.0.1]) by tucnak.zalov.cz (8.17.1/8.17.1) with ESMTPS id 261FmcmJ1652055 (version=TLSv1.3 cipher=TLS_AES_256_GCM_SHA384 bits=256 verify=NOT); Fri, 1 Jul 2022 17:48:38 +0200 Received: (from jakub@localhost) by tucnak.zalov.cz (8.17.1/8.17.1/Submit) id 261Fmbw41652054; Fri, 1 Jul 2022 17:48:37 +0200 Date: Fri, 1 Jul 2022 17:48:37 +0200 From: Jakub Jelinek To: Tobias Burnus Cc: gcc-patches , fortran Subject: Re: [Patch] OpenMP: Handle tofrom with target enter/exit data Message-ID: Reply-To: Jakub Jelinek References: <040a82bc-68df-4743-0002-44a39d5666ff@mentor.com> MIME-Version: 1.0 In-Reply-To: <040a82bc-68df-4743-0002-44a39d5666ff@mentor.com> X-Scanned-By: MIMEDefang 2.78 on 10.11.54.3 X-Mimecast-Spam-Score: 0 X-Mimecast-Originator: redhat.com Content-Type: text/plain; charset=us-ascii Content-Disposition: inline X-Spam-Status: No, score=-4.1 required=5.0 tests=BAYES_00, DKIMWL_WL_HIGH, DKIM_SIGNED, DKIM_VALID, DKIM_VALID_AU, DKIM_VALID_EF, RCVD_IN_DNSWL_LOW, SPF_HELO_NONE, SPF_NONE, TXREP, T_SCC_BODY_TEXT_LINE autolearn=unavailable autolearn_force=no version=3.4.6 X-Spam-Checker-Version: SpamAssassin 3.4.6 (2021-04-09) on server2.sourceware.org X-BeenThere: fortran@gcc.gnu.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: Fortran mailing list List-Unsubscribe: , List-Archive: List-Help: List-Subscribe: , X-List-Received-Date: Fri, 01 Jul 2022 15:48:45 -0000 On Fri, Jul 01, 2022 at 05:41:27PM +0200, Tobias Burnus wrote: > --- a/gcc/fortran/dump-parse-tree.cc > +++ b/gcc/fortran/dump-parse-tree.cc > @@ -1414,6 +1414,11 @@ show_omp_namelist (int list_type, gfc_omp_namelist *n) > case OMP_MAP_TO: fputs ("to:", dumpfile); break; > case OMP_MAP_FROM: fputs ("from:", dumpfile); break; > case OMP_MAP_TOFROM: fputs ("tofrom:", dumpfile); break; > + case OMP_MAP_ALWAYS_TO: fputs ("always,to:", dumpfile); break; > + case OMP_MAP_ALWAYS_FROM: fputs ("always,from:", dumpfile); break; > + case OMP_MAP_ALWAYS_TOFROM: fputs ("always,tofrom:", dumpfile); break; > + case OMP_MAP_DELETE: fputs ("always,tofrom:", dumpfile); break; > + case OMP_MAP_RELEASE: fputs ("always,tofrom:", dumpfile); break; Pasto in the last 2 lines? Other than that LGTM. Jakub