| !RUN: %S/test_any.sh %s %t %f18 | |
| ! Tests -fget-definition with COMMON block with same name as variable. | |
| program main | |
| integer :: x | |
| integer :: y | |
| common /x/ y | |
| x = y | |
| end program | |
| ! EXEC: ${F18} -fget-definition 7 3 4 -fparse-only %s | ${FileCheck} %s | |
| ! CHECK:x:.*getdefinition04.f90, 4, 14-15 |