http://gcc.gnu.org/bugzilla/show_bug.cgi?id=46917
Summary: ICE Product: gcc Version: 4.6.0 Status: UNCONFIRMED Severity: normal Priority: P3 Component: fortran AssignedTo: unassig...@gcc.gnu.org ReportedBy: vivekr...@yahoo.com For the code module random_integer_mod implicit none contains function vec_block(ivec,block_size) result(jvec) integer, intent(in) :: ivec(:) integer, intent(in) :: block_size integer :: jvec(size(ivec)*block_size) jvec = 1 end function vec_block ! function permute_blocks(nitems,block_size) result(ivec) integer, intent(in) :: block_size,nitems integer :: ivec(nitems) integer :: nblocks integer, allocatable :: jvec(:) nblocks = 1 allocate (jvec(nblocks*block_size)) jvec = vec_block(permutation(nblocks),block_size) ivec = 1 end function permute_blocks ! function permutation(n) result(ivec) integer, intent(in) :: n integer :: ivec(n) ivec = 1 end function permutation end module random_integer_mod Compiling gives gfortran -c -v random_integer_gf_ice.f90 Built by Equation Solution <http://www.Equation.com>. Using built-in specs. COLLECT_GCC=gfortran COLLECT_LTO_WRAPPER=c:/fsf/bin/../libexec/gcc/i686-pc-mingw32/4.6.0/lto-wrapper.exe Target: i686-pc-mingw32 Thread model: win32 gcc version 4.6.0 20101211 (experimental) (GCC) COLLECT_GCC_OPTIONS='-c' '-v' '-mtune=generic' '-march=pentiumpro' c:/fsf/bin/../libexec/gcc/i686-pc-mingw32/4.6.0/f951.exe random_integer_gf_ice.f90 -quiet -dumpbase random_integer_gf_ice.f90 -mtune=generic -march=pentiumpro -auxbase random_integer_gf_ice -version -fintrinsic-modules-path c:/fsf/bin/../lib/gcc/i686-pc-mingw32/4.6.0/finclude -o C:\DOCUME~1\Vivek\LOCALS~1\Temp\ccZNOJh6.s GNU Fortran (GCC) version 4.6.0 20101211 (experimental) (i686-pc-mingw32) compiled by GNU C version 4.6.0 20101211 (experimental), GMP version 5.0.1, MPFR version 3.0.0, MPC version 0.8.2 GGC heuristics: --param ggc-min-expand=30 --param ggc-min-heapsize=4096 GNU Fortran (GCC) version 4.6.0 20101211 (experimental) (i686-pc-mingw32) compiled by GNU C version 4.6.0 20101211 (experimental), GMP version 5.0.1, MPFR version 3.0.0, MPC version 0.8.2 GGC heuristics: --param ggc-min-expand=30 --param ggc-min-heapsize=4096 random_integer_gf_ice.f90: In function 'permute_blocks': random_integer_gf_ice.f90:18:0: internal compiler error: Segmentation fault Please submit a full bug report, with preprocessed source if appropriate. See <http://gcc.gnu.org/bugs.html> for instructions.