1# ARM simulator testsuite. 2 3if { [istarget arm*-*-*] || [istarget xscale*-*-*] } { 4 # load support procs (none yet) 5 # load_lib cgen.exp 6 7 # all machines 8 set all_machs "xscale" 9 10 if [is_remote host] { 11 remote_download host $srcdir/$subdir/testutils.inc 12 } 13 14 # The .cgs suffix is for "cgen .s". 15 foreach src [lsort [glob -nocomplain $srcdir/$subdir/*.cgs]] { 16 # If we're only testing specific files and this isn't one of them, 17 # skip it. 18 if ![runtest_file_p $runtests $src] { 19 continue 20 } 21 22 run_sim_test $src $all_machs 23 } 24 25 if [is_remote host] { 26 remote_file host delete testutils.inc 27 } 28} 29