[thirdparty/binutils-gdb.git] / sim / testsuite / sim / sh64 / interwork.exp

# SH64 interworking testsuite.
# In particular, test parts of the instruction set that can be used
# for SHmedia/SHcompact instruction set mode switches.

if [istarget sh64-*-*] {
    # load support procs (none yet)
    # load_lib cgen.exp

    # all machines
    set all_machs "sh5"

    foreach src [lsort [glob -nocomplain $srcdir/$subdir/misc/*.s]] {
       # If we're only testing specific files and this isn't one of them,
       # skip it.
       if ![runtest_file_p $runtests $src] {
  	  continue
	}
    run_sim_test $src $all_machs
    }
}
Commit	Line	Data
cbb38b47 BE	1	# SH64 interworking testsuite.
	2	# In particular, test parts of the instruction set that can be used
	3	# for SHmedia/SHcompact instruction set mode switches.
	4
	5	if [istarget sh64--] {
	6	# load support procs (none yet)
	7	# load_lib cgen.exp
	8
	9	# all machines
	10	set all_machs "sh5"
	11
	12	foreach src [lsort [glob -nocomplain $srcdir/$subdir/misc/*.s]] {
	13	# If we're only testing specific files and this isn't one of them,
	14	# skip it.
	15	if ![runtest_file_p $runtests $src] {
	16	continue
	17	}
	18	run_sim_test $src $all_machs
	19	}
	20	}