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

--- Comment #20 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:489423763d3c8b84d3409f4b200fb6b19ad96db3

commit r16-6459-g489423763d3c8b84d3409f4b200fb6b19ad96db3
Author: Jerry DeLisle <[email protected]>
Date:   Tue Dec 30 14:46:35 2025 -0800

    Fortran: Generate a runtime error on recursive I/O

            PR libfortran/119136

    gcc/fortran/ChangeLog:

            * libgfortran.h: Add enum for new LIBERROR_RECURSIVE_IO.

    libgfortran/ChangeLog:

            * io/io.h: Delete prototype for unused stash_internal_unit.
            (check_for_recursive): Add prototype for this new function.
            * io/transfer.c (data_transfer_init): Add call to new
            check_for_recursive.
            * io/unit.c (delete_unit): Fix comment.
            (check_for_recursive): Add new function.
            * runtime/error.c (translate_error): Add translation for
            "Recursive I/O not allowed runtime error message.

    gcc/testsuite/ChangeLog:

            * gfortran.dg/pr119136.f90: New test.

Reply via email to