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

--- Comment #1 from GCC Commits <cvs-commit at gcc dot gnu.org> ---
The master branch has been updated by Jerry DeLisle <[email protected]>:

https://gcc.gnu.org/g:39a6b7de56ebd7091c092a4b07fed3809f10544d

commit r17-4633-g39a6b7de56ebd7091c092a4b07fed3809f10544d
Author: Jerry DeLisle <[email protected]>
Date:   Fri Aug 28 16:40:44 2026 -0700

    libgfortran: [PR127347] caf_shmem: terminate all images on ERROR STOP

    An image executing ERROR STOP exited on its own, and the other images
    blocked forever in their next image control statement.  ERROR STOP
    initiates error termination of all images.

    The image now records that it error stopped before exiting, and the
    supervisor terminates all other images when it reaps it.  Only the
    fork based supervisor does so.

    Assisted-by: Claude Opus 5

            PR libfortran/127347

    libgfortran/ChangeLog:

            * caf/shmem.c (mark_error_stopped): New function.
            (_gfortran_caf_error_stop_str, _gfortran_caf_error_stop): Call it.
            * caf/shmem/supervisor.c (supervisor_main_loop): Terminate all
            images when an image error stopped.
            * caf/shmem/supervisor.h (image_status): Add IMAGE_ERROR_STOP.

    gcc/testsuite/ChangeLog:

            * gfortran.dg/coarray/error_stop_1.f90: New test.

Reply via email to