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

--- Comment #7 from Salvatore Filippone <sfilippone at uniroma2 dot it> 
2012-01-13 12:48:13 UTC ---
(In reply to comment #6)
And the example that still fails:
--------------
module foo_mod
  type foo_type
    integer, allocatable :: idx(:)
  end type foo_type
end module foo_mod

subroutine bar(data)
  use foo_mod
  use iso_c_binding 
  implicit none
  type(foo_type), intent(inout), target :: data 
  type(c_ptr)          :: cptr

  cptr = c_loc(data%idx)

end subroutine bar
------------------
[sfilippo@donald bug32]$ gfortran -v
Using built-in specs.
COLLECT_GCC=gfortran
COLLECT_LTO_WRAPPER=/usr/local/gnu47/libexec/gcc/x86_64-unknown-linux-gnu/4.7.0/lto-wrapper
Target: x86_64-unknown-linux-gnu
Configured with: ../gcc/configure --prefix=/usr/local/gnu47
--enable-languages=c,c++,fortran --with-gmp=/home/travel/GNUBUILD/gmp
--with-mpfr=/home/travel/GNUBUILD/mpfr --with-mpc=/home/travel/GNUBUILD/mpc
Thread model: posix
gcc version 4.7.0 20120110 (experimental) (GCC) 
[sfilippo@donald bug32]$ gfortran -c bar.f90 
bar.f90: In function 'bar':
bar.f90:14:0: internal compiler error: Errore di segmentazione
Please submit a full bug report,
with preprocessed source if appropriate.
See <http://gcc.gnu.org/bugs.html> for instructions

Reply via email to