]> git.ipfire.org Git - thirdparty/gcc.git/commit
Fortran: Fix caf_stop_numeric and reporting exceptions from caf [PR57598]
authorAndre Vehreschild <vehre@gcc.gnu.org>
Wed, 18 Dec 2024 11:43:39 +0000 (12:43 +0100)
committerAndre Vehreschild <vehre@gcc.gnu.org>
Fri, 20 Dec 2024 06:55:24 +0000 (07:55 +0100)
commita25cc26884663244c3b936af785854abee8949dd
tree3c99b9bf3fe193b545c33b176dff47302b7811dd
parent71732eafedbd30355e752bf873d355fbcd0e076f
Fortran: Fix caf_stop_numeric and reporting exceptions from caf [PR57598]

Caf_stop_numeric always exited with code 0, which is wrong.  It shall
behave like regular stop.  Add reporting exceptions to caf's stop
handlers.  For this the existing library routine had to be exported.

libgfortran/ChangeLog:

PR fortran/57598

* caf/single.c (_gfortran_caf_stop_numeric): Report exceptions
on stop. And fix send_by_ref.
(_gfortran_caf_stop_str): Same.
(_gfortran_caf_error_stop_str): Same.
(_gfortran_caf_error_stop): Same.
* gfortran.map: Add report_exception for export.
* libgfortran.h (report_exception): Add to internal export.
* runtime/stop.c (report_exception): Same.
libgfortran/caf/single.c
libgfortran/gfortran.map
libgfortran/libgfortran.h
libgfortran/runtime/stop.c