------- Comment #8 from dominiq at lps dot ens dot fr 2008-09-06 19:14 ------- Extracted from http://groups.google.com/group/comp.lang.fortran/browse_thread/thread/c553e0034bab977c the following code
module bug1 use ISO_C_BINDING implicit none contains subroutine sub1(x) type(C_PTR) x write(*,'(z16.16)') transfer(x,0_C_INTPTR_T) end subroutine sub1 subroutine sub2(x) type(C_FUNPTR) x write(*,'(z16.16)') transfer(x,0_C_INTPTR_T) end subroutine sub2 end module bug1 program test use bug1 implicit none call sub1(transfer(7_C_INTPTR_T,C_NULL_PTR)) call sub2(transfer(7_C_INTPTR_T,C_NULL_FUNPTR)) end program test gives with trunk and 4.3.2 pr34199_3.f90:7: internal compiler error: Bus error Please submit a full bug report, -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=34199