diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/pdt_28.f03')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/pdt_28.f03 | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/testsuite/gfortran.dg/pdt_28.f03 b/gcc/testsuite/gfortran.dg/pdt_28.f03 index da4c9d68dbd..c0dc1a0d1be 100644 --- a/gcc/testsuite/gfortran.dg/pdt_28.f03 +++ b/gcc/testsuite/gfortran.dg/pdt_28.f03 @@ -27,5 +27,5 @@ program test_pdt type(vec(k=123)) :: u u%foo=1 - if (total(u) .ne. u%k) call abort + if (total(u) .ne. u%k) STOP 1 end program test_pdt |