error interno del compilador: Violación de segmento /home/lgc/irun/bin/../libexec/gcc/i386-pc-linux-gnu/4.3.0/f951 ../dynamic.f -ffixed-form -quiet -dumpbase dynamic.f -mtune=i386 -auxbase dynamic -O2 -version -ffixed-line-length-132 -I.. -fintrinsic-modules-path /home/lgc/irun/bin/../lib/gcc/i386-pc-linux-gnu/4.3.0/finclude -o dynamic.s GNU F95 version 4.3.0 20070131 (experimental) (i386-pc-linux-gnu) compiled by GNU C version 4.3.0 20070131 (experimental). GGC heurísticas: --param ggc-min-expand=100 --param ggc-min-heapsize=131072 ------- code segment below ------- else kvf(1:3,1:3) = kv(1:3,1:3) endif ---------------------------------- Please I don't want to annoy you but the instructions to file a bug are really hard to follow and lengthy. I haven't been able to produce the "*.i* file, but just the ".s" one. Please mail me if you want me to send you the whole package or else give me other instructions. Thank you.
(In reply to comment #0) > Please I don't want to annoy you but the instructions to file a bug are really > hard to follow and lengthy. I haven't been able to produce the "*.i* file, but > just the ".s" one. Please mail me if you want me to send you the whole package > or else give me other instructions. Those instrunctions are more for C/C++ bug filing. Does the code use modules? If not can you just attach dynamic.f if it is open source?
I could attach the 'dynamic.f' file if you tell me how (or is it just to cut-and-paste it?). The file is NOT open source but is free for academic use. It DOES use modules.
Luis, You can email me the file at sgk@troutmask.apl.washington.edu. I'll extract a testcase if the failure occurs on my systems.
Just a quick note. dynamic.f will compile without optimization. I can reproduce the problem. Now to reduce it to something managable.
Reduced testcase module current integer, save :: ndim real, save :: kv(3,3) end module current subroutine dynamic use current implicit none real :: kvf(3,3) if (ndim .eq. 3) then call kvector3Df(kvf) else kvf(1:3,1:3) = kv(1:3,1:3) end if end subroutine dynamic troutmask:sgk[372] gfc4x -c -O zxc.f90 zxc.f90: In function 'dynamic': zxc.f90:17: internal compiler error: in operand_equal_p, at fold-const.c:2557 Please submit a full bug report, with preprocessed source if appropriate. See <URL:http://gcc.gnu.org/bugs.html> for instructions.
Further reduction is possible. subroutine dynamic(ndim, kv) implicit none integer :: ndim real :: kvf(3,3), kv(3,3) if (ndim .eq. 3) then call kvector3Df(kvf) else kvf(1:3,1:3) = kv(1:3,1:3) end if end subroutine dynamic
*** This bug has been marked as a duplicate of 30391 ***