diff options
| author | Richard Biener <rguenther@suse.de> | 2018-05-03 07:33:09 +0000 |
|---|---|---|
| committer | Richard Biener <rguenth@gcc.gnu.org> | 2018-05-03 07:33:09 +0000 |
| commit | c2901468a9ed394160042aaf32d9910ce5b9096f (patch) | |
| tree | ecf00319fe7693b7fbd8d7c1d62fdfe107177689 /gcc | |
| parent | 5cf052826f45f14bdffbb3b59b66243dcb132a5b (diff) | |
| download | gcc-c2901468a9ed394160042aaf32d9910ce5b9096f.zip gcc-c2901468a9ed394160042aaf32d9910ce5b9096f.tar.gz gcc-c2901468a9ed394160042aaf32d9910ce5b9096f.tar.bz2 | |
re PR fortran/85579 (accepts invalid fortran test case gfortran.dg/pr51434.f90)
2018-05-03 Richard Biener <rguenther@suse.de>
PR testsuite/85579
* fortran.dg/pr51434.f90: Truncate transfer argument.
From-SVN: r259880
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/testsuite/gfortran.dg/pr51434.f90 | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 6708456..f87151f 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2018-05-03 Richard Biener <rguenther@suse.de> + + PR testsuite/85579 + * fortran.dg/pr51434.f90: Truncate transfer argument. + 2018-05-02 Jakub Jelinek <jakub@redhat.com> PR target/85582 diff --git a/gcc/testsuite/gfortran.dg/pr51434.f90 b/gcc/testsuite/gfortran.dg/pr51434.f90 index 31679ec..49bca66 100644 --- a/gcc/testsuite/gfortran.dg/pr51434.f90 +++ b/gcc/testsuite/gfortran.dg/pr51434.f90 @@ -6,7 +6,7 @@ module foo character(len=1), parameter :: s(n) = 'a' type :: a integer :: m = n - character(len=1):: t(n) = transfer('abcde ', s) + character(len=1):: t(n) = transfer('abcde', s) end type a end module foo |