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.fortran-torture/] [compile/] [mloc.f90] - Blame information for rev 384

Details | Compare with Previous | View Log


! from PR 14928
! we used to not accept the two argument variant of MINLOC and MAXLOC when
! the MASK keyword was omitted.
  real b(10)
  integer c(1)
  c = minloc(b,b<0)
  c = maxloc(b,b>0)
end

Line No.	Rev	Author	Line
1	303	jeremybenn	`! from PR 14928`
2			`! we used to not accept the two argument variant of MINLOC and MAXLOC when`
3			`! the MASK keyword was omitted.`
4			`real b(10)`
5			`integer c(1)`
6			`c = minloc(b,b<0)`
7			`c = maxloc(b,b>0)`
8			`end`

Browse

Tools

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [tags/] [gnu-src/] [gcc-4.5.1/] [gcc-4.5.1-or32-1.0rc2/] [gcc/] [testsuite/] [gfortran.fortran-torture/] [compile/] [mloc.f90] - Blame information for rev 384