|
|
Power 6/32 Unix version 1.21
#include "evt_defs.h"
/*
********************************************************************
*
* MONITOR FOR THE FPP PIPELINED EVENTS TEST
*
* If evt_inst is non-zero, run the test that it specifies, otherwise
* run all of the pipelined tests. If the print headers option is
* set then print the names of the tests as they are run:
* Piped Events Tests: pipe1 pipd2 pipe3 pipe4 pipe5 pipe6 pipe7 pipe8
* pipe9 pipd10 pipe11 pipe12 pipe13 pipe14 pipe15
********************************************************************
*/
pipeline_test()
{
if( evt_inst ) { /* was the test specified? */
inst_index = evt_inst - 1; /* get '0' based subtest # */
subtest = evt_inst; /* get '1' based subtest # */
if( (inst_index < 0) || (inst_index >= no_pipe_tests) ) {
if( (prt_hdrs) && (cycle == 1) ) { /* not a valid instr */
writes("There is no pipeline test #");
writed( evt_inst );
writec('\n');
error = TRUE; /* needed for line feed control */
}
} else {
valid_test = TRUE; /* a test is being run */
if( (prt_hdrs) && (cycle == 1) )
writes( pipe_test_tbl[inst_index].name );
(*pipe_test_tbl[inst_index].test)(); /* run the test */
}
} else /* the test # wasn't specfied */
for(inst_index=0; inst_index < no_pipe_tests; inst_index++) {
if( (prt_hdrs) && (cycle == 1) ) {
if( (inst_index == 8) ||
(inst_index == 16) )
writes("\n ");
writes( pipe_test_tbl[inst_index].name );
}
valid_test = TRUE; /* a test is being run */
subtest = inst_index+1; /* get '1' based subtest # */
(*pipe_test_tbl[inst_index].test)(); /* run the test */
}
}
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.