[Bug fortran/96986] [8/9/10/11 Regression] Explicit interface required: volatile argument for ENTRY subroutine

["kargl at gcc dot gnu.org" <gcc-bugzilla@gcc.gnu.org>]

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

kargl at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |kargl at gcc dot gnu.org
           Priority|P5                          |P4
             Status|WAITING                     |NEW

--- Comment #5 from kargl at gcc dot gnu.org ---
The code is valid.  Gfortran error message is bogus.  The pertinent
part of the Fortran standard is the last sentence here:

   If the ENTRY statement is in a subroutine subprogram, an additional
   subroutine is defined by that subprogram.  The name of the subroutine
   is entry-name. The dummy arguments of the subroutine are those
   specified in the ENTRY statement

The entry statement 'entry func_a()' in question has no dummy arguments.

The portion of the Fortran standard quoted in comment #2 clearly
does not apply.

Also note that the requirement of an explicit interface comes if a
programmer wants to call 'entry func_b(va)'.   Thus, the following
code is also conforming.

subroutine bar(va)
   integer, volatile :: va
   va = 42
end subroutine bar

program foo
   integer n
   interface
      subroutine bar(va)
         integer, volatile :: va
      end subroutine bar
   end interface
   call bar(n)
   print *, n
end program foo