diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/initialization_9.f90')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/initialization_9.f90 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/initialization_9.f90 b/gcc/testsuite/gfortran.dg/initialization_9.f90 index 5a82770..2341d40 100644 --- a/gcc/testsuite/gfortran.dg/initialization_9.f90 +++ b/gcc/testsuite/gfortran.dg/initialization_9.f90 @@ -5,7 +5,7 @@ integer function xstrcmp(s1) character*(*), intent(in) :: s1 - integer :: n1 = len(s1) ! { dg-error "assumed character length variable" } + integer :: n1 = len(s1) ! { dg-error "Assumed character length variable" } n1 = 1 return end function xstrcmp |