[Bug fortran/36463] gfc_get_default_type(): Bad symbol

[mikael at gcc dot gnu dot org]

------- Comment #21 from mikael at gcc dot gnu dot org  2008-11-28 13:24 -------
(In reply to comment #20)
> I don't see ad hoc whether PR 35810 is the problem; 
With this I get no ICE, and no valgrind error either. :-)

--- pr36463_12.f90      2008-11-28 15:03:07.000000000 +0100
+++ pr36463_12_works.f90        2008-11-28 15:02:15.000000000 +0100
@@ -42,6 +42,7 @@
          do while(message(i) /= C_NULL_CHAR)
             i = i+1
          end do
+         allocate(my_message(i-1))
          my_message = message(int(1,kind(i)):i-1)
          gp = get_funloc(make_mess,aux)
       end function gp


> if you close this PR, can
> you add a note to the PR that one should re-check PR 35971, comment 0 and PR
> 36463, comment 12 before closing? That way we are sure that the test case does
> not get lost, if PR 35810 does not fix the remaining issues.
> 
I will do that. 
We could as well add James' gptr as a test case for a procedure pointer PR
(there is probably one?). Then, I agree we can close this PR.


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=36463