------- Comment #3 from pinskia at gcc dot gnu dot org  2007-06-22 00:22 -------
Reduced testcase:
      SUBROUTINE ONEINTS()
      COMMON /INFOA / NAT,NUM
      DIMENSION TINT(NUM*NUM,NAT,3,3,3),TINTM(NUM,NUM,NAT,3,3,3)

        CALL TINTS(IC)
        DO ID=1,3
        DO IC=1,NAT
           TINTM(J,I,IC,IAN,INU,ID) = TINT((I-1)*NUM+J,IC,IAN,INU,ID)
        ENDDO
        ENDDO
      END


-- 

pinskia at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |ASSIGNED
     Ever Confirmed|0                           |1
   Last reconfirmed|0000-00-00 00:00:00         |2007-06-22 00:22:36
               date|                            |


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

Reply via email to