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

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gfortran.dg/] [g77/] [20010115.f] - Blame information for rev 302

Details | Compare with Previous | View Log


c { dg-do compile }
* GNATS PR Fortran/1636
      PRINT 42, 'HELLO'
   42 FORMAT(A)
      CALL WORLD
      END
      SUBROUTINE WORLD
      PRINT 42, 'WORLD'
   42 FORMAT(A)
      END

Line No.	Rev	Author	Line
1	302	jeremybenn	`c { dg-do compile }`
2			`* GNATS PR Fortran/1636`
3			`PRINT 42, 'HELLO'`
4			`42 FORMAT(A)`
5			`CALL WORLD`
6			`END`
7			`SUBROUTINE WORLD`
8			`PRINT 42, 'WORLD'`
9			`42 FORMAT(A)`
10			`END`

Browse

Tools

Subversion Repositories openrisc_2011-10-31

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gfortran.dg/] [g77/] [20010115.f] - Blame information for rev 302