Thanks Paul, got it. On Mon, Nov 25, 2024, 3:13 AM Paul Richard Thomas < paul.richard.tho...@gmail.com> wrote:
> 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. >> >