Re: OpenMP/Fortran: Group handling of 'if' clause without and with modifier

Re: OpenMP/Fortran: Group handling of 'if' clause without and with modifier

[Tobias Burnus]

CC: fortran@ for completeness.

On 24.10.23 10:55, Thomas Schwinge wrote:
> OK to push (after testing) the attached
> "OpenMP/Fortran: Group handling of 'if' clause without and with modifier"?
> That makes an upcoming change a bit lighter.

LGTM.

(The patch just moves some code up (in the same functions) such that
'if(<expr>)' and 'if(<directive-name>:<expr>)' are next to each other.)

Tobias

>  From a6e15fe6b08e2ced98435739506f9fc10db96a63 Mon Sep 17 00:00:00 2001
> From: Thomas Schwinge<thomas@codesourcery.com>
> Date: Tue, 24 Oct 2023 10:43:40 +0200
> Subject: [PATCH] OpenMP/Fortran: Group handling of 'if' clause without and
>   with modifier
>
> The 'if' clause with modifier was introduced in
> commit b4c3a85be96585374bf95c981ba2f602667cf5b7 (Subversion r242037)
> "Partial OpenMP 4.5 fortran support", but -- in some instances -- didn't place
> it next to the existing handling of 'if' clause without modifier.  Unify that;
> no change in behavior.
>
>       gcc/fortran/
>       * dump-parse-tree.cc (show_omp_clauses): Group handling of 'if'
>       clause without and with modifier.
>       * frontend-passes.cc (gfc_code_walker): Likewise.
>       * gfortran.h (gfc_omp_clauses): Likewise.
>       * openmp.cc (gfc_free_omp_clauses): Likewise.
-----------------
Siemens Electronic Design Automation GmbH; Anschrift: Arnulfstraße 201, 80634 München; Gesellschaft mit beschränkter Haftung; Geschäftsführer: Thomas Heurung, Frank Thürauf; Sitz der Gesellschaft: München; Registergericht München, HRB 106955