[Bug fortran/95037] gfortran fails to compile a simple subroutine, issues an opaque message

[tkoenig at gcc dot gnu.org]

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

Thomas Koenig <tkoenig at gcc dot gnu.org> changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|NEW                         |ASSIGNED
           Assignee|unassigned at gcc dot gnu.org      |tkoenig at gcc dot gnu.org

--- Comment #2 from Thomas Koenig <tkoenig at gcc dot gnu.org> ---
(In reply to kargl from comment #1)
> Do not dereference a NULL pointer.  Patch against svn r280157.

This patch leads to the error message being in the wrong place:

a.f90:1:28:

    1 | subroutine my_random_seed_v (size, put, get)
      |                            1
Fehler: Size of »put« argument of »random_seed« intrinsic at (1) too small
(1/8)
a.f90:1:28:

    1 | subroutine my_random_seed_v (size, put, get)
      |                            1
Fehler: Size of »get« argument of »random_seed« intrinsic at (1) too small
(1/8)

However, this is the right place, and the fix is obvious
and simple.