URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gfortran.dg/] [graphite/] [pr47019.f] - Blame information for rev 694

Details | Compare with Previous | View Log


! { dg-options "-O -ftree-pre -fgraphite-identity -fno-tree-copy-prop" }
 
      subroutine foo (ldmx,ldmy,v)
      integer :: ldmx, ldmy, v, l, m
      dimension v(5,ldmx,ldmy)
      do m = 5, 1, -1
        do l = m+1, 5
          v(m,3,2) = v(1,3,2)
        end do
        v(m,3,2) = m
      end do
      end

Line No.	Rev	Author	Line
1	694	jeremybenn	`! { dg-options "-O -ftree-pre -fgraphite-identity -fno-tree-copy-prop" }`
2
3			`subroutine foo (ldmx,ldmy,v)`
4			`integer :: ldmx, ldmy, v, l, m`
5			`dimension v(5,ldmx,ldmy)`
6			`do m = 5, 1, -1`
7			`do l = m+1, 5`
8			`v(m,3,2) = v(1,3,2)`
9			`end do`
10			`v(m,3,2) = m`
11			`end do`
12			`end`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gfortran.dg/] [graphite/] [pr47019.f] - Blame information for rev 694