From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <gcc-bugs-return-158746-listarch-gcc-bugs=gcc.gnu.org@gcc.gnu.org>
Received: (qmail 15404 invoked by alias); 18 Sep 2005 20:10:52 -0000
Mailing-List: contact gcc-bugs-help@gcc.gnu.org; run by ezmlm
Precedence: bulk
List-Archive: <http://gcc.gnu.org/ml/gcc-bugs/>
List-Post: <mailto:gcc-bugs@gcc.gnu.org>
List-Help: <mailto:gcc-bugs-help@gcc.gnu.org>
Sender: gcc-bugs-owner@gcc.gnu.org
Received: (qmail 15315 invoked by uid 48); 18 Sep 2005 20:10:48 -0000
Date: Sun, 18 Sep 2005 20:10:00 -0000
Message-ID: <20050918201048.15314.qmail@sourceware.org>
From: "tkoenig at gcc dot gnu dot org" <gcc-bugzilla@gcc.gnu.org>
To: gcc-bugs@gcc.gnu.org
In-Reply-To: <20050103182528.19242.zeekec@mad.scientist.com>
References: <20050103182528.19242.zeekec@mad.scientist.com>
Reply-To: gcc-bugzilla@gcc.gnu.org
Subject: [Bug fortran/19242] [4.0 only] internal compiler error: in gfc_conv_function_call, at fortran/trans-expr.c:1106
X-Bugzilla-Reason: CC
X-SW-Source: 2005-09/txt/msg02339.txt.bz2
List-Id: <gcc-bugs.sourceware.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