Mercurial > pygar

annotate config/bm/Pygar/processor_test/mips.cfx @ 76:8bd0e4d37ad2 pygar svn.77 tip

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[svn r77] I don't know why my last change didn't go through grumble grumble....
author rlm
date Wed, 12 May 2010 08:58:23 -0400
parents 90197e3375e2
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);