[gcc(refs/vendors/riscv/heads/gcc-13-with-riscv-opts)] gfortran: Rely on dg-do-what-default to avoid running pr85853.f90, pr107254.f90 and vect-alias-check

[gcc(refs/vendors/riscv/heads/gcc-13-with-riscv-opts)] gfortran: Rely on dg-do-what-default to avoid running pr85853.f90, pr107254.f90 and vect-alias-check

[Jeff Law]

https://gcc.gnu.org/g:c3fe693428485bf9408915efa78acddcd056d7cb

commit c3fe693428485bf9408915efa78acddcd056d7cb
Author: Patrick O'Neill <patrick@rivosinc.com>
Date:   Thu Nov 2 10:20:43 2023 -0700

    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 <patrick@rivosinc.com>
    (cherry picked from commit f1b2f3a7e0638c450129ea099baa42cbf290e313)

Diff:
---
 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