Mercurial > pygar
annotate config/bm/Pygar/processor_test/mips.cfx @ 23:90197e3375e2 pygar svn.24
[svn r24] added testing, but something is wrong with our c++ file.
| author | rlm |
|---|---|
| date | Wed, 28 Apr 2010 08:19:09 -0400 |
| parents | |
| children |
| rev | line source |
|---|---|
| rlm@23 | 1 : # -*-Perl-*- |
| rlm@23 | 2 eval 'exec perl -w "$0" ${1+"$@"}' |
| rlm@23 | 3 if 0; |
| rlm@23 | 4 |
| rlm@23 | 5 use Asim; |
| rlm@23 | 6 use strict; |
| rlm@23 | 7 |
| rlm@23 | 8 ## |
| rlm@23 | 9 ## Generate cfg files for 6.375 tests and benchmarks. |
| rlm@23 | 10 ## |
| rlm@23 | 11 |
| rlm@23 | 12 my $gcfg = Asim::GenCFG->new(); |
| rlm@23 | 13 |
| rlm@23 | 14 my @tests = ("smipsv1_simple", |
| rlm@23 | 15 "smipsv1_addiu", |
| rlm@23 | 16 "smipsv1_bne", |
| rlm@23 | 17 "smipsv1_lw", |
| rlm@23 | 18 "smipsv1_sw", |
| rlm@23 | 19 "smipsv2_addiu", |
| rlm@23 | 20 "smipsv2_addu", |
| rlm@23 | 21 "smipsv2_andi", |
| rlm@23 | 22 "smipsv2_and", |
| rlm@23 | 23 "smipsv2_beq", |
| rlm@23 | 24 "smipsv2_bgez", |
| rlm@23 | 25 "smipsv2_bgtz", |
| rlm@23 | 26 "smipsv2_blez", |
| rlm@23 | 27 "smipsv2_bltz", |
| rlm@23 | 28 "smipsv2_bne", |
| rlm@23 | 29 "smipsv2_jalr", |
| rlm@23 | 30 "smipsv2_jal", |
| rlm@23 | 31 "smipsv2_jr", |
| rlm@23 | 32 "smipsv2_j", |
| rlm@23 | 33 "smipsv2_lui", |
| rlm@23 | 34 "smipsv2_lw", |
| rlm@23 | 35 "smipsv2_nor", |
| rlm@23 | 36 "smipsv2_ori", |
| rlm@23 | 37 "smipsv2_or", |
| rlm@23 | 38 "smipsv2_simple", |
| rlm@23 | 39 "smipsv2_sll", |
| rlm@23 | 40 "smipsv2_sllv", |
| rlm@23 | 41 "smipsv2_slti", |
| rlm@23 | 42 "smipsv2_sltiu", |
| rlm@23 | 43 "smipsv2_slt", |
| rlm@23 | 44 "smipsv2_sltu", |
| rlm@23 | 45 "smipsv2_sra", |
| rlm@23 | 46 "smipsv2_srav", |
| rlm@23 | 47 "smipsv2_srl", |
| rlm@23 | 48 "smipsv2_srlv", |
| rlm@23 | 49 "smipsv2_subu", |
| rlm@23 | 50 "smipsv2_sw", |
| rlm@23 | 51 "smipsv2_xori", |
| rlm@23 | 52 "smipsv2_xor"); |
| rlm@23 | 53 |
| rlm@23 | 54 my @bmarks = ("median", |
| rlm@23 | 55 "multiply", |
| rlm@23 | 56 "towers", |
| rlm@23 | 57 "qsort", |
| rlm@23 | 58 "vvadd"); |
| rlm@23 | 59 |
| rlm@23 | 60 foreach my $test (@tests) { |
| rlm@23 | 61 $gcfg->add(name => $test, |
| rlm@23 | 62 tree => [ "tests" ], |
| rlm@23 | 63 setup => "scripts/setup-mit-6.375-bmark-processor --group instruction-tests --isa smips $test", |
| rlm@23 | 64 feeder => "vcs", |
| rlm@23 | 65 feedflags => "program.0/${test}.smips.vmh", |
| rlm@23 | 66 ); |
| rlm@23 | 67 } |
| rlm@23 | 68 |
| rlm@23 | 69 foreach my $bmark (@bmarks) { |
| rlm@23 | 70 $gcfg->add(name => $bmark, |
| rlm@23 | 71 tree => [ "benchmarks" ], |
| rlm@23 | 72 setup => "scripts/setup-mit-6.375-bmark-processor --isa smips $bmark", |
| rlm@23 | 73 feeder => "vcs", |
| rlm@23 | 74 feedflags => "program.0/${bmark}.smips.vmh", |
| rlm@23 | 75 ); |
| rlm@23 | 76 } |
| rlm@23 | 77 |
| rlm@23 | 78 $gcfg->action(@ARGV); |