ping on all 3
On 9/15/26 8:49 AM, Jerry D wrote:
See attached patch 1 of 3. This patch series resolves some gaps in the handling
of ERROR STOP and syncing of images and TEAMs.
The patches should be applied in order.
Regression tested on x86_64.
OK for mainline?
Regards,
Jerry
---
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.
---
