1# Copyright (C) 2004-2015 Free Software Foundation, Inc.
2#
3# This file is part of GCC.
4#
5# GCC is free software; you can redistribute it and/or modify
6# it under the terms of the GNU General Public License as published by
7# the Free Software Foundation; either version 3, or (at your option)
8# any later version.
9#
10# GCC is distributed in the hope that it will be useful,
11# but WITHOUT ANY WARRANTY; without even the implied warranty of
12# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13# GNU General Public License for more details.
14#
15# You should have received a copy of the GNU General Public License
16# along with GCC; see the file COPYING3.  If not see
17# <http://www.gnu.org/licenses/>.
18
19# The name of each test starts with the architecture it requires.  Tests that
20# work on all variants start with "all".
21
22if {![istarget frv-*-*]} {
23    return 0
24}
25
26load_lib gcc-dg.exp
27
28# Find out which architecture is used by default.
29set mainarch "fr500"
30foreach flag [target_info multilib_flags] {
31    regexp "^-mcpu=(.*)" $flag dummy mainarch
32    if {$flag == "-mno-pack"} {
33	# -mno-pack disables media intrinsics.
34	return 0
35    }
36}
37
38# Set $archs to "all" plus the list of architectures we can test.
39set archs [list "all" $mainarch]
40switch $mainarch {
41    fr405 { lappend archs fr400 }
42    fr450 { lappend archs fr405 fr400 }
43}
44
45# Set $files to the list of files we can test.
46set files ""
47foreach arch $archs {
48    lappend files [lsort [glob -nocomplain $srcdir/$subdir/${arch}*.c]]
49}
50
51dg-init
52gcc-dg-runtest [eval concat $files] "" ""
53dg-finish
54