Commit bits missing from previous checkin

Commit bits missing from previous checkin
* gfortran.dg/repeat_2.f90: Add dg-warning annotations.
* gfortran.dg/repeat_4.f90: Likewise.

From-SVN: r123765
This commit is contained in:
Tobias Schlüter 2007-04-12 21:12:20 +02:00
parent 4557bf49fa
commit b5a31c9b43
2 changed files with 4 additions and 4 deletions

View File

@ -22,10 +22,10 @@ end subroutine bar
program test
implicit none
character(len=0), parameter :: s0 = ""
character(len=0), parameter :: s0 = "" ! { dg-warning "zero length" }
character(len=1), parameter :: s1 = "a"
character(len=2), parameter :: s2 = "ab"
character(len=0) :: t0
character(len=0) :: t0 ! { dg-warning "CHARACTER variable has zero length" }
character(len=1) :: t1
character(len=2) :: t2
integer :: i

View File

@ -3,10 +3,10 @@
! { dg-do compile }
program test
implicit none
character(len=0), parameter :: s0 = ""
character(len=0), parameter :: s0 = "" ! { dg-warning "zero length" }
character(len=1), parameter :: s1 = "a"
character(len=2), parameter :: s2 = "ab"
character(len=0) :: t0
character(len=0) :: t0 ! { dg-warning "CHARACTER variable has zero length" }
character(len=1) :: t1
character(len=2) :: t2