diff options
| author | Harald Anlauf <anlauf@gmx.de> | 2024-05-10 21:18:03 +0200 |
|---|---|---|
| committer | Harald Anlauf <anlauf@gmx.de> | 2024-05-11 19:40:21 +0200 |
| commit | d4974fd22730014e337fd7ec2471945ba8afb00e (patch) | |
| tree | 007134bce290e96e425a99e31c587d5039ba22df /gcc/fortran | |
| parent | 1da83fece2963cfe0df57ac5e85dd1f92427ca70 (diff) | |
| download | gcc-d4974fd22730014e337fd7ec2471945ba8afb00e.zip gcc-d4974fd22730014e337fd7ec2471945ba8afb00e.tar.gz gcc-d4974fd22730014e337fd7ec2471945ba8afb00e.tar.bz2 | |
Fortran: fix dependency checks for inquiry refs [PR115039]
gcc/fortran/ChangeLog:
PR fortran/115039
* expr.cc (gfc_traverse_expr): An inquiry ref does not constitute
a dependency and cannot collide with a symbol.
gcc/testsuite/ChangeLog:
PR fortran/115039
* gfortran.dg/statement_function_5.f90: New test.
Diffstat (limited to 'gcc/fortran')
| -rw-r--r-- | gcc/fortran/expr.cc | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/fortran/expr.cc b/gcc/fortran/expr.cc index 66edad5..c883966 100644 --- a/gcc/fortran/expr.cc +++ b/gcc/fortran/expr.cc @@ -5500,7 +5500,7 @@ gfc_traverse_expr (gfc_expr *expr, gfc_symbol *sym, break; case REF_INQUIRY: - return true; + return false; default: gcc_unreachable (); |