------- Additional Comments From tkoenig at gcc dot gnu dot org 2005-09-18
20:10 -------
Not yet fixed in 4.0:
$ cat gfortran.f95
# 1 "gfortran.F95"
# 1 "<built-in>"
# 1 "<command line>"
# 1 "gfortran.F95"
module gfortrantest
contains
function int2str(i) result(str)
integer, intent(in) :: i
character(len=(int(log10(real(max(abs(i),1))))+2)) :: str
character(len=20) :: frmt
write(frmt, "(A,I10,A)") "(I",(int(log10(real(max(abs(i),1))))+2),")"
write(str, frmt) i
end function
function sgl2str3(x,frmt,n) result(str)
real, intent(in) :: x(:)
integer, intent(in) :: n
character(len=*), intent(in) :: frmt
character(len=n*size(x)) :: str
write(str,"(" // int2str(size(x)) // "(" // frmt // "))") x
end function
end module
$ gfortran gfortran.f95
gfortran.F95: In function 'sgl2str3':
gfortran.F95:5: internal compiler error: in gfc_conv_function_call, at
fortran/trans-expr.c:1108
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.
$ gfortran -v
Using built-in specs.
Target: i686-pc-linux-gnu
Configured with: ../gcc-4.0/configure --prefix=/home/ig25
--enable-languages=c,fortran
Thread model: posix
gcc version 4.0.2 20050917 (prerelease)
--
What |Removed |Added
----------------------------------------------------------------------------
Status|RESOLVED |REOPENED
Known to fail| |4.0.2
Known to work| |4.1.0
Resolution|FIXED |
Summary|internal compiler error: in |[4.0 only] internal compiler
|gfc_conv_function_call, at |error: in
|fortran/trans-expr.c:1106 |gfc_conv_function_call, at
| |fortran/trans-expr.c:1106
Target Milestone|--- |4.0.3
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=19242
