| Index: gcc/gcc/testsuite/gfortran.fortran-torture/execute/intrinsic_trim.f90
|
| diff --git a/gcc/gcc/testsuite/gfortran.fortran-torture/execute/intrinsic_trim.f90 b/gcc/gcc/testsuite/gfortran.fortran-torture/execute/intrinsic_trim.f90
|
| index 90e4131685accd20250280e0732e053e4368ca15..d57610cca5214637e2a8b8d6b16b49df218f0e59 100644
|
| --- a/gcc/gcc/testsuite/gfortran.fortran-torture/execute/intrinsic_trim.f90
|
| +++ b/gcc/gcc/testsuite/gfortran.fortran-torture/execute/intrinsic_trim.f90
|
| @@ -3,7 +3,7 @@ program intrinsic_trim
|
| character(len=8) a
|
| character(len=4) b,work
|
| a='1234 '
|
| - b=work(9,a)
|
| + b=work(8,a)
|
| if (llt(b,"1234")) call abort()
|
| a=' '
|
| b=trim(a)
|
|
|