[Bug fortran/122787] [caf_shmem] Intermittent failure of coarray\lock_1.f90 when running testsuite

[jvdelisle at gcc dot gnu.org]

https://gcc.gnu.org/bugzilla/show_bug.cgi?id=122787

Jerry DeLisle <jvdelisle at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|NEW                         |RESOLVED
         Resolution|---                         |FIXED

--- Comment #6 from Jerry DeLisle <jvdelisle at gcc dot gnu.org> ---
Fixed, the coarray/lock_1.f90 test was adjusted to properly handle a
non-blocking.

commit be90cfa22cb4e3cea7ffb4ca429829381369a8d2
Author: Jerry DeLisle <jvdelisle@gcc.gnu.org>
Date:   Sat Feb 14 15:46:44 2026 -0800

    Fortran: Adjust test to work with multiple images.

    The testcase would fail occasionally with multiple images because the
    use of acquired_lock is a non-blocking LOCK. Only UNLOCK this if the
    LOCK was acquired. Keep track of the loop count and bail out if the
    limit is reached.

    During testing it was observed that the loop count could go as high as
    33 times depending on system conditions, running the test outside the
    testsuite 1000's of times.

            PR fortran/121429

    gcc/testsuite/ChangeLog:

            * gfortran.dg/coarray/lock_1.f90: Updated.