Hi Jerry,

OK by me.

A small nit: s/too/to/ in the ChangeLog.

Thanks for the patch

Paul


On Mon, 25 Nov 2024 at 02:50, Jerry D <jvdelis...@gmail.com> wrote:

> I would like to commit the attached patch for Steve.
>
> Regression tested on x86-64-linux-gnu.
>
> OK for trunk?
>
> Author: Steve Kargl <kar...@comcast.net>
> Date:   Sun Nov 24 18:26:03 2024 -0800
>
>      Fortran: Check IMPURE in BLOCK inside DO CONCURRENT.
>
>              PR fortran/117765
>
>      gcc/fortran/ChangeLog:
>
>              * resolve.cc (check_pure_function): Check the stack too
>              see if there in a nested BLOCK and, if that block is in
>              a DO_CONCURRENT, issue an error.
>
>      gcc/testsuite/ChangeLog:
>
>              * gfortran.dg/impure_fcn_do_concurrent.f90: New test.
>

Reply via email to