OpenCores
URL https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc2/] [gcc/] [testsuite/] [gfortran.dg/] [debug/] [pr43166.f] - Blame information for rev 384

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 302 jeremybenn 
C PR debug/43166
2 
C { dg-do compile }
3 
C { dg-options "-O" }
4 
      SUBROUTINE FOO ()
5 
      INTEGER V1
6 
      COMMON // V1
7 
      END
8 
      SUBROUTINE BAR ()
9 
      INTEGER V0,V1,V2,V3
10 
      COMMON // V1(4),V2(85,4),V3
11 
      DO V3=1,V1(1)
12 
      V0=V2(V3,1)
13 
      END DO
14 
      END

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.