diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/block_8.f08')
-rw-r--r-- | gcc/testsuite/gfortran.dg/block_8.f08 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/testsuite/gfortran.dg/block_8.f08 b/gcc/testsuite/gfortran.dg/block_8.f08 index 6059fa89c79..677125edff2 100644 --- a/gcc/testsuite/gfortran.dg/block_8.f08 +++ b/gcc/testsuite/gfortran.dg/block_8.f08 @@ -1,5 +1,5 @@ ! { dg-do run } -! { dg-options "-std=f2008 -fall-intrinsics" } +! { dg-options "-std=f2008 " } ! Check BLOCK with SAVE'ed variables. @@ -11,7 +11,7 @@ PROGRAM main BLOCK INTEGER, SAVE :: summed = 0 summed = summed + i - IF (i == 100 .AND. summed /= 5050) CALL abort () + IF (i == 100 .AND. summed /= 5050) STOP 1 END BLOCK END DO END PROGRAM main |