From f1b2f3a7e0638c450129ea099baa42cbf290e313 Mon Sep 17 00:00:00 2001 From: Patrick O'Neill Date: Thu, 2 Nov 2023 10:20:43 -0700 Subject: [PATCH] gfortran: Rely on dg-do-what-default to avoid running pr85853.f90, pr107254.f90 and vect-alias-check-1.F90 on non-vector targets Testcases in gfortran.dg/vect/vect.exp rely on check_vect_support_and_set_flags to set dg-do-what-default and avoid running vector tests on non-vector targets. The three testcases in this patch overwrite the default with dg-do run which causes issues for non-vector targets. Removing the dg-do run directive resolves this issue for non-vector targets (while still running the tests on vector targets). gcc/testsuite/ChangeLog: * gfortran.dg/vect/pr107254.f90: Remove dg-do run directive. * gfortran.dg/vect/pr85853.f90: Ditto. * gfortran.dg/vect/vect-alias-check-1.F90: Ditto. Signed-off-by: Patrick O'Neill --- gcc/testsuite/gfortran.dg/vect/pr107254.f90 | 2 -- gcc/testsuite/gfortran.dg/vect/pr85853.f90 | 1 - gcc/testsuite/gfortran.dg/vect/vect-alias-check-1.F90 | 1 - 3 files changed, 4 deletions(-) diff --git a/gcc/testsuite/gfortran.dg/vect/pr107254.f90 b/gcc/testsuite/gfortran.dg/vect/pr107254.f90 index 85bcb5f3fa2..adce6bedc30 100644 --- a/gcc/testsuite/gfortran.dg/vect/pr107254.f90 +++ b/gcc/testsuite/gfortran.dg/vect/pr107254.f90 @@ -1,5 +1,3 @@ -! { dg-do run } - subroutine dlartg( f, g, s, r ) implicit none double precision :: f, g, r, s diff --git a/gcc/testsuite/gfortran.dg/vect/pr85853.f90 b/gcc/testsuite/gfortran.dg/vect/pr85853.f90 index 68f4a004324..4c0e3b81a09 100644 --- a/gcc/testsuite/gfortran.dg/vect/pr85853.f90 +++ b/gcc/testsuite/gfortran.dg/vect/pr85853.f90 @@ -1,5 +1,4 @@ ! Taken from execute/where_2.f90, but with special flags. -! { dg-do run } ! { dg-additional-options "-fno-tree-loop-vectorize" } ! Program to test the WHERE constructs diff --git a/gcc/testsuite/gfortran.dg/vect/vect-alias-check-1.F90 b/gcc/testsuite/gfortran.dg/vect/vect-alias-check-1.F90 index 3014ff9f3b6..85ae9b151e3 100644 --- a/gcc/testsuite/gfortran.dg/vect/vect-alias-check-1.F90 +++ b/gcc/testsuite/gfortran.dg/vect/vect-alias-check-1.F90 @@ -1,4 +1,3 @@ -! { dg-do run } ! { dg-additional-options "-fno-inline" } #define N 200