[testsuite] Assorted fixes

[Eric Botcazou]

First, gcc.dg/array-quals-1.c does not pass if the compiler is configured with 
--enable-default-pie because the section names change, so force -fno-pie.
Second, replace *-*-solaris* with sparc*-*-* for gfortran.dg/pr95690.f90 
because this depends on the architecture rather than the OS.  Third force SRA 
to trigger on Aarch64 (like PowerPC) for gnat.dg/opt39.adb.

Tested on the affected platforms, applied on the mainline as obvious.


2021-03-09  Eric Botcazou  <ebotca...@adacore.com>

        * gcc.dg/array-quals-1.c: Pass -fno-pie if supported.
        * gfortran.dg/pr95690.f90: Replace *-*-solaris* with sparc*-*-*.
        * gnat.dg/opt39.adb: Pass --param option for Aarch64 too.

-- 
Eric Botcazou
diff --git a/gcc/testsuite/gcc.dg/array-quals-1.c b/gcc/testsuite/gcc.dg/array-quals-1.c
index 5d9170ea81e..2c041649279 100644
--- a/gcc/testsuite/gcc.dg/array-quals-1.c
+++ b/gcc/testsuite/gcc.dg/array-quals-1.c
@@ -4,6 +4,7 @@
 /* Origin: Joseph Myers <j...@polyomino.org.uk> */
 /* { dg-do compile } */
 /* { dg-options "-Wno-discarded-array-qualifiers" } */
+/* { dg-additional-options "-fno-pie" { target pie } } */
 /* The MMIX port always switches to the .data section at the end of a file.  */
 /* { dg-final { scan-assembler-not "\\.data(?!\\.rel\\.ro)" { xfail powerpc*-*-aix* mmix-*-* x86_64-*-mingw* } } } */
 /* { dg-final { scan-assembler-symbol-section {^_?a$} {^\.(const|rodata|srodata)|\[RO\]} } } */
diff --git a/gcc/testsuite/gfortran.dg/pr95690.f90 b/gcc/testsuite/gfortran.dg/pr95690.f90
index 7d8c68d1d7c..47a5df9e894 100644
--- a/gcc/testsuite/gfortran.dg/pr95690.f90
+++ b/gcc/testsuite/gfortran.dg/pr95690.f90
@@ -2,8 +2,8 @@
 module m
 contains
    subroutine s
-      print *, (erfc) ! { dg-error "not a floating constant" "" { target i?86-*-* x86_64-*-* *-*-solaris* cris-*-* } }
-   end ! { dg-error "not a floating constant" "" { target { ! "i?86-*-* x86_64-*-* *-*-solaris* cris-*-*" } } }
+      print *, (erfc) ! { dg-error "not a floating constant" "" { target i?86-*-* x86_64-*-* sparc*-*-* cris-*-* } }
+   end ! { dg-error "not a floating constant" "" { target { ! "i?86-*-* x86_64-*-* sparc*-*-* cris-*-*" } } }
    function erfc()
    end
 end
diff --git a/gcc/testsuite/gnat.dg/opt39.adb b/gcc/testsuite/gnat.dg/opt39.adb
index f2e983fd602..70f198617ce 100644
--- a/gcc/testsuite/gnat.dg/opt39.adb
+++ b/gcc/testsuite/gnat.dg/opt39.adb
@@ -1,6 +1,6 @@
 -- { dg-do compile }
 -- { dg-options "-O2 -fno-inline -fdump-tree-optimized" }
--- { dg-additional-options "-cargs --param=sra-max-scalarization-size-Ospeed=32 -margs" { target powerpc*-*-* } }
+-- { dg-additional-options "-cargs --param=sra-max-scalarization-size-Ospeed=32 -margs" { target aarch64-*-* powerpc*-*-* } }
 
 procedure Opt39 (I : Integer) is