------- Comment #1 from tkoenig at gcc dot gnu dot org 2010-02-14 11:49 -------
Reduced test case:
odule m
use iso_c_binding
type, public :: fgsl_file
type(c_ptr) :: gsl_file = c_null_ptr
end type fgsl_file
contains
subroutine sub(aaa,bbb)
type(fgsl_file), intent(out) :: aaa
type(fgsl_file), intent(inout) :: bbb
end subroutine
end module m
program test
use m
implicit none
type(fgsl_file) :: file, noreinit
integer, target :: tgt
call sub(file, noreinit)
end program test
The ICE goes away if the initialization with c_null_pointer is omitted.
This is probably due to the type punning we do with C interop.
--
tkoenig at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |tkoenig at gcc dot gnu dot
| |org
Status|UNCONFIRMED |NEW
Ever Confirmed|0 |1
Last reconfirmed|0000-00-00 00:00:00 |2010-02-14 11:49:36
date| |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=43042
