]> git.ipfire.org Git - thirdparty/gcc.git/commit
fortran: Restore current interface info on error [PR111291]
authorMikael Morin <mikael@gcc.gnu.org>
Fri, 19 Jan 2024 17:47:36 +0000 (18:47 +0100)
committerMikael Morin <mikael@gcc.gnu.org>
Sat, 20 Jan 2024 15:35:17 +0000 (16:35 +0100)
commit6930e1f1055c39bea170c25f694f7301989e5d1d
tree8f7a6c45168ad4ec1f30a09cf4ecb1d154ef817c
parent8fd992a3dfa8c3e00d4a41846de2061ff6c5652a
fortran: Restore current interface info on error [PR111291]

This change is a followup to the fix for PR48776 (namely
r14-3572-gd58150452976c4ca65ddc811fac78ef956fa96b0 AKA
fortran: Restore interface to its previous state on error [PR48776]),
which cleaned up new changes from interfaces upon error.

Unfortunately, there is one case in that fix that is mishandled, visible
on unexpected_interface.f90 with valgrind or an asan-instrumented gfortran.
when an interface statement is found while parsing an interface body (which
is invalid), the current interface is replaced by the one from the new
statement, and as parsing continues, new procedures are added
to the new interface, which has been rejected and freed, instead of the
original one.

This change restores the current interface pointer to its previous value
on each rejected statement.

PR fortran/48776
PR fortran/111291

gcc/fortran/ChangeLog:

* parse.cc: Restore current interface to its previous value on error.
gcc/fortran/parse.cc