This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/48279] [4.6/4.7 Regression] segfault in gfc_check_vardef_context
- From: "burnus at gcc dot gnu.org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: Tue, 29 Mar 2011 06:27:12 +0000
- Subject: [Bug fortran/48279] [4.6/4.7 Regression] segfault in gfc_check_vardef_context
- Auto-submitted: auto-generated
- References: <bug-48279-4@http.gcc.gnu.org/bugzilla/>
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=48279
--- Comment #8 from Tobias Burnus <burnus at gcc dot gnu.org> 2011-03-29 06:26:50 UTC ---
(In reply to comment #7)
> call set1 (get (h))
> subroutine set1 (a)
> integer, intent(inout) :: a
If one changes the (invalid) INOUT to IN, it compiles.
* * *
Additionally, for the modified program, I think NAG is correct with the
following error - gfortran just compiles it:
Error: GET1 in generic GET is an internal procedure
>From F2008, "12.4.3.4.1 Generic identifiers":
"The PROCEDURE statement lists procedure pointers, external procedures, dummy
procedures, or module procedures that have this generic interface."
(However, g95, pgf95 and crayftn also compile it, thus, I might misread F2008.)