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

Subversion Repositories openrisc

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

Details | Compare with Previous | View Log


! { dg-do "compile" }
! { dg-options "-fwhole-file" }
!
! PR fortran/34260
!
      PROGRAM MAIN
      REAL A
      CALL SUB(A)             ! { dg-error "requires an explicit interface" }
      END PROGRAM
 
      SUBROUTINE SUB(A,I)
      REAL :: A
      INTEGER, OPTIONAL :: I
      END SUBROUTINE

Line No.	Rev	Author	Line
1	302	jeremybenn	`! { dg-do "compile" }`
2			`! { dg-options "-fwhole-file" }`
3			`!`
4			`! PR fortran/34260`
5			`!`
6			`PROGRAM MAIN`
7			`REAL A`
8			`CALL SUB(A) ! { dg-error "requires an explicit interface" }`
9			`END PROGRAM`
10
11			`SUBROUTINE SUB(A,I)`
12			`REAL :: A`
13			`INTEGER, OPTIONAL :: I`
14			`END SUBROUTINE`

Browse

Tools

Subversion Repositories openrisc

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