[Bug fortran/19242] [4.0 only] internal compiler error: in gfc_conv_function_call, at fortran/trans-expr.c:1106

["tkoenig at gcc dot gnu dot org" <gcc-bugzilla@gcc.gnu.org>]

------- 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