diff options
Diffstat (limited to 'gcc/testsuite/g77.f-torture/execute/claus.f')
| -rw-r--r-- | gcc/testsuite/g77.f-torture/execute/claus.f | 13 |
1 files changed, 0 insertions, 13 deletions
diff --git a/gcc/testsuite/g77.f-torture/execute/claus.f b/gcc/testsuite/g77.f-torture/execute/claus.f deleted file mode 100644 index bccef7f4090..00000000000 --- a/gcc/testsuite/g77.f-torture/execute/claus.f +++ /dev/null @@ -1,13 +0,0 @@ - PROGRAM TEST - REAL AB(3) - do i=1,3 - AB(i)=i - enddo - k=1 - n=2 - ind=k-n+2 - if (ind /= 1) call abort - if (ab(ind) /= 1) call abort - if (k-n+2 /= 1) call abort - if (ab(k-n+2) /= 1) call abort - END |