This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/15958] New: ICE and assertion failure in trans-expr.c
- From: "Mart dot Rentmeester at sci dot kun dot nl" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 12 Jun 2004 12:58:20 -0000
- Subject: [Bug fortran/15958] New: ICE and assertion failure in trans-expr.c
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
This piece of (valid) code generates the following ICE and
assertion failure.
gfortran -v -c n6.f95
Reading specs from /OPT/32/gcc-2004-06-09/lib/gcc/hppa2.0w-hp-hpux11.11/3.5.
0/specs
Configured with: ../configure --enable-languages=c,f95
--prefix=/opt32/gcc-2004-06-09 --with-gmp=/opt32/gmp --with-gnu-as
--with-as=/opt32/binutils/bin/as --enable-threads --disable-shared --disable-nls
Thread model: posix
gcc version 3.5.0 20040611 (experimental)
/OPT/32/gcc-2004-06-09/libexec/gcc/hppa2.0w-hp-hpux11.11/3.5.0/f951 n6.f95
-quiet -dumpbase n6.f95 -auxbase n6 -version -o /var/tmp//ccq2tvvp.s
GNU F95 version 3.5.0 20040611 (experimental) (hppa2.0w-hp-hpux11.11)
compiled by GNU C version 3.5.0 20040611 (experimental).
GGC heuristics: --param ggc-min-expand=30 --param ggc-min-heapsize=4096
Assertion failed: sym->ts.cl && sym->ts.cl->length && sym->ts.
cl->length->expr_type == EXPR_CONSTANT, file ../../gcc/fortran/trans-expr.c,
line 1042
n6.f95: In function `querystring':
n6.f95:29: internal compiler error: Aborted
module cgi
contains
!*******************************************************************************
! Process the contents of a querystring
subroutine querystring(varcheck,qs)
implicit none
character(*), intent(in) :: qs
integer :: i,j,k,l
external varcheck
! Length of querystring input
l = len_trim(qs)
! Empty querystring
if (l <= 1) return
! Split up qs and send keyword/value strings to 'varcheck'
i = 1
do while (i <= l)
j = index(qs(i:),'=')
k = index(qs(i:),'&')
if (k == 0) k = l - i + 2
if (j /= k-1) call varcheck(trim(urldecode(qs(i:i+j-2))), &
trim(urldecode(qs(i+j:i+k-2))) )
i = i + k
enddo
end subroutine querystring
!*******************************************************************************
function urldecode(s) result(o)
implicit none
character(*), intent(in) :: s
character(len(s)) :: o
o = s
end function urldecode
!*******************************************************************************
end module cgi
--
Summary: ICE and assertion failure in trans-expr.c
Product: gcc
Version: 3.5.0
Status: UNCONFIRMED
Severity: normal
Priority: P2
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: Mart dot Rentmeester at sci dot kun dot nl
CC: gcc-bugs at gcc dot gnu dot org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=15958