|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 DFS Tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 DFS Tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2048 (0x800)
Types: EM, TextFile
Names: »TEST_TYP.EM«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »TEST_TYP.EM«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »TEST_TYP.EM«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »TEST_TYP.EM«
[write]
[write]
[write,beginning,of,Type,Board,testing]
[set num_fails 0]
[set bus_parity_fail false]
[type_reset_test] ! Tile 1
[type_diag_kernel] ! Tile 2
[type_wcs_tests] ! Tile 3
[type_bus_n_loop_cntr] ! Tile 4
[type_rf_tests] ! Tile 5
[type_rf2_tests] ! Tile 5 continued
[type_rf3_tests] ! Tile 5 continued
[type_alu_tests] ! Tile 6
[type_alu2_tests] ! Tile 6 continued
[type_csa_tests] ! Tile 7
[write]
[write]
[eq,[var,bus_parity_fail],true]
[write]
[write,bus,parity,checkers,test,failed]
[write]
[write,If,the,board,was,tested,at,44,Mhz,please,change,to,42,Mhz,and,retest]
[write]
[write,the,test,,may,fail,,at,44,Mhz,,,but,should,,ALWAYS,,pass,,at,42Mhz,!!]
[else]
[end]
[kill bus_parity_fail]
[write]
[write]
[write,end,of,Type,Board,testing]
[write]
[eq,[var,NUM_FAILS],0]
PASS_MESSAGE Type,BOARD;
kill NUM_FAILS;
[ne,%1%,]
write;
write PASS,COUNT,IS,[dec,[add,%1%,1]];
TEST_TYP [add,%1%,1];
[end]
[else]
FAIL_MESSAGE Type,BOARD;
write;
write [dec,[var,NUM_FAILS]],,,TEST(S),,,FAILED,[ASCII,87];
kill NUM_FAILS;
[ne,%1%,]
write;
write PASS,COUNT,WAS,[dec,%1%];
[end]
[end]«nul»