From mboxrd@z Thu Jan  1 00:00:00 1970
Return-Path: <gcc-bugs-return-96943-listarch-gcc-bugs=gcc.gnu.org@gcc.gnu.org>
Received: (qmail 4918 invoked by alias); 26 May 2004 19:46:58 -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 4910 invoked by uid 48); 26 May 2004 19:46:57 -0000
Date: Thu, 27 May 2004 11:51:00 -0000
From: "dtucker at arlut dot utexas dot edu" <gcc-bugzilla@gcc.gnu.org>
To: gcc-bugs@gcc.gnu.org
Message-ID: <20040526194654.15665.dtucker@arlut.utexas.edu>
Reply-To: gcc-bugzilla@gcc.gnu.org
Subject: [Bug fortran/15665] New: unable to compile file w/ reference to GETARG/IARGC
X-Bugzilla-Reason: CC
X-SW-Source: 2004-05/txt/msg03114.txt.bz2
List-Id: <gcc-bugs.sourceware.org>

[dtucker@mordy mpe]$ /usr/bin/gfortran-ssa -v
Reading specs from /lib/ssa/gcc/i686-redhat-linux/3.5-tree-ssa/specs
Configured with: ../configure --prefix=/usr --mandir=/usr/share/man --
infodir=/usr/share/info --libdir=/lib/ssa --libexecdir=/lib/ssa --host=i686-
redhat-linux --enable-shared --enable-threads=posix --disable-checking --enable-
languages=c,c++,java,objc,f95 --with-system-zlib --enable-__cxa_atexit --
disable-multilib
Thread model: posix
gcc version 3.5-tree-ssa 20040513 (Fedora Core Rawhide 3.5ssa-snapshot)

[dtucker@mordy mpe]$ uname -a
Linux mordy 2.4.20-8 #1 Thu Mar 13 17:54:28 EST 2003 i686 i686 i386 GNU/Linux

Pentium III

[dtucker@mordy mpe]$ /usr/bin/gfortran-ssa -c -save-temps farg.f
farg.f: In function `mpir_iargc':
farg.f:3: internal compiler error: in gfc_conv_intrinsic_function, at 
fortran/trans-intrinsic.c:2589
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://bugzilla.redhat.com/bugzilla/> for instructions.

farg.f:
      integer function mpir_iargc()

      mpir_iargc = IARGC()
      return
      end
c     
      subroutine mpir_getarg( i, s )

      integer       i
      character (LEN=*) s
      external getarg
      call GETARG(i,s)
      return
      end

-- 
           Summary: unable to compile file w/ reference to GETARG/IARGC
           Product: gcc
           Version: tree-ssa
            Status: UNCONFIRMED
          Severity: normal
          Priority: P2
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: dtucker at arlut dot utexas dot edu
                CC: gcc-bugs at gcc dot gnu dot org


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=15665