[Bug fortran/89981] [8/9 Regression] gfortran -pedantic rejects code in 8.3.1 that is accepted with 8.3.0

[tkoenig at gcc dot gnu.org]

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

--- Comment #3 from Thomas Koenig <tkoenig at gcc dot gnu.org> ---
Reduced test case:

program main
  call bar(i)
end program main
subroutine foo
  entry bar(i)
end subroutine foo