diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/dynamic_dispatch_7.f03')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/dynamic_dispatch_7.f03 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/testsuite/gfortran.dg/dynamic_dispatch_7.f03 b/gcc/testsuite/gfortran.dg/dynamic_dispatch_7.f03 index 89ed05c753a..fa4df633d5d 100644 --- a/gcc/testsuite/gfortran.dg/dynamic_dispatch_7.f03 +++ b/gcc/testsuite/gfortran.dg/dynamic_dispatch_7.f03 @@ -52,8 +52,8 @@ end module type(t2), target :: y type(t3) :: z z%a => x - if ((z%sizeof() .ne. 1) .or. (z%a%sizeof() .ne. 1)) call abort + if ((z%sizeof() .ne. 1) .or. (z%a%sizeof() .ne. 1)) STOP 1 z%a => y - if ((z%sizeof() .ne. 2) .or. (z%a%sizeof() .ne. 2)) call abort + if ((z%sizeof() .ne. 2) .or. (z%a%sizeof() .ne. 2)) STOP 2 end |