[Bug fortran/31408] New: <built-in>:0: internal compiler error: Illegal instruction

["satyaakam at yahoo dot co dot in" <gcc-bugzilla at gcc dot gnu dot org>]

subroutine a1toi4 (istr,isize,num)
      character istr(*)
      integer isize, num
      integer isign, ipos
      character*8 iprog
      character     nch(10),dash
      data iprog  /'A1TOI4'/
      data nch    /'0','1','2','3','4','5','6','7','8','9'/
      data dash   /'-'/
      num=0
      isign=0
      ipos=1
      if (istr(1) .eq. dash)then
        isign=1
        ipos=2
      endif
  100 do 150 i=ipos,isize
         do 110 j=1,10
            if (istr(i) .eq. nch(j)) go to 120
  110    continue
         go to 200
  120    nxtnum=j-1
         num=num*10+nxtnum
  150 continue
  200 if (isign .ne. 0) num=-num
      return
      end


above case fails on Pentium machine with the following error

$gfortran -c a1toi4_.F

<built-in>:0: internal compiler error: Illegal instruction
Please submit a full bug report,
with preprocessed source if appropriate.
See <URL:http://gcc.gnu.org/bugs.html> for instructions.

Tried compiling using both gcc4.1.1 and gcc4.1.2 on pentium mahcines it fails
on  opteron based machines it passes 


satya


-- 
           Summary: <built-in>:0: internal compiler error: Illegal
                    instruction
           Product: gcc
           Version: 4.1.2
            Status: UNCONFIRMED
          Severity: normal
          Priority: P3
         Component: fortran
        AssignedTo: unassigned at gcc dot gnu dot org
        ReportedBy: satyaakam at yahoo dot co dot in


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