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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gfortran.dg/] [fmt_error_7.f] - Blame information for rev 414

Go to most recent revision | Details | Compare with Previous | View Log


! { dg-do compile }
! PR37446 Diagnostic of edit descriptors, esp. EN
      character(40) :: fmt_string
      write(*, '(1P,2E12.4)') 1.0
      write(*,'(EN)') 5.0 ! { dg-error "Positive width required" }
      write(*,'("abcdefg",EN6,"hjjklmnop")') 5.0 ! { dg-error "Period required" }
      end

Line No.	Rev	Author	Line
1	302	jeremybenn	`! { dg-do compile }`
2			`! PR37446 Diagnostic of edit descriptors, esp. EN`
3			`character(40) :: fmt_string`
4			`write(*, '(1P,2E12.4)') 1.0`
5			`write(*,'(EN)') 5.0 ! { dg-error "Positive width required" }`
6			`write(*,'("abcdefg",EN6,"hjjklmnop")') 5.0 ! { dg-error "Period required" }`
7			`end`

Browse

Tools

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gcc-4.5.1/] [gcc/] [testsuite/] [gfortran.dg/] [fmt_error_7.f] - Blame information for rev 414