https://gcc.gnu.org/g:785448f0465cf9802f1ccfea798f5b732f73f62c

commit r15-9461-g785448f0465cf9802f1ccfea798f5b732f73f62c
Author: Thomas Schwinge <tschwi...@baylibre.com>
Date:   Fri Mar 28 09:15:19 2025 +0100

    Add 'g++.target/gcn/gcn.exp' for GCN-specific C++ test cases
    
    Like 'gcc.target/gcn/gcn.exp' is modeled after 'gcc.dg/dg.exp', this new
    'g++.target/gcn/gcn.exp' is modeled after 'g++.dg/dg.exp'.
    
            gcc/testsuite/
            * g++.target/gcn/gcn.exp: New.

Diff:
---
 gcc/testsuite/g++.target/gcn/gcn.exp | 56 ++++++++++++++++++++++++++++++++++++
 1 file changed, 56 insertions(+)

diff --git a/gcc/testsuite/g++.target/gcn/gcn.exp 
b/gcc/testsuite/g++.target/gcn/gcn.exp
new file mode 100644
index 000000000000..a3bd75f2a79e
--- /dev/null
+++ b/gcc/testsuite/g++.target/gcn/gcn.exp
@@ -0,0 +1,56 @@
+# Specific regression driver for GCN.
+#   Copyright (C) 2000-2025 Free Software Foundation, Inc.
+
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 3 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with GCC; see the file COPYING3.  If not see
+# <http://www.gnu.org/licenses/>.
+
+# G++ testsuite that uses the `dg.exp' driver.
+
+# Exit immediately if this isn't a GCN target.
+if ![istarget amdgcn*-*-*] then {
+  return
+}
+
+# Load support procs.
+load_lib g++-dg.exp
+
+# If a testcase doesn't have special options, use these.
+global DEFAULT_CXXFLAGS
+if ![info exists DEFAULT_CXXFLAGS] then {
+    set DEFAULT_CXXFLAGS " -pedantic-errors -Wno-long-long"
+}
+
+# Initialize `dg'.
+dg-init
+
+# Recursively find files in $dir and subdirs, do not walk into subdirs
+# that contain their own .exp file.
+proc find-cxx-tests { dir suffix } {
+    set tests [lsort [glob -nocomplain -directory $dir "*.$suffix" ]]
+    foreach subdir [lsort [glob -nocomplain -type d -directory $dir *]] {
+       if { [glob -nocomplain -directory $subdir *.exp] eq "" } {
+           eval lappend tests [find-cxx-tests $subdir $suffix]
+       }
+    }
+    return $tests
+}
+
+set tests [find-cxx-tests $srcdir/$subdir {C}]
+
+# Main loop.
+g++-dg-runtest $tests "" $DEFAULT_CXXFLAGS
+
+
+# All done.
+dg-finish

Reply via email to