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/] [namelist_print_1.f] - Rev 302
Compare with Previous | Blame | View Log
! Test Non standard PRINT namelist - PR21432 ! ! Contributor Paul Thomas <pault@gcc.gnu.org> ! ! { dg-do run } ! { dg-options "-std=gnu" } real x namelist /mynml/ x x = 1 ! ( dg-output "^" } print mynml ! { dg-output "&MYNML(\n|\r\n|\r) X= 1.0000000 ,(\n|\r\n|\r) /(\n|\r\n|\r)" } end