|
|
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 - metrics - download
Length: 2575 (0xa0f)
Types: EM, TextFile
Names: »TYPE_ALU_TESTS.EM«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
└─⟦this⟧ »TYPE_ALU_TESTS.EM«
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
└─⟦this⟧ »TYPE_ALU_TESTS.EM«
[write]
[write,Testing,Type,Board,Tile,6,,-,,Type_alu_tests]
[write,,,,,,,,,,,,,,,,,,,,,,,,,,,,,&,Type_alu2_tests]
[write]
[xeq typ init_wcs 000fe0a7ff0c]
[xeq typ prep_ucode_logical_alu]
[xeq typ prep_rf_logical_alu]
[set experiment_result [xeq typ test_logical_alu]]
[eq,[arg 1,[var experiment_result]],false]
[FAIL_MESSAGE alu_test_1]
[set num_fails [add,[var num_fails],1]]
[write [ASCII,7]]
[NAME_MESSAGE init_wcs 000fe0a7ff0c]
[NAME_MESSAGE prep_ucode_logical_alu]
[NAME_MESSAGE prep_rf_logical_alu]
[NAME_MESSAGE test_logical_alu][write]
[else]
[PASS_MESSAGE alu_test_1]
[end]
[set experiment_result [xeq typ test_not_b_op]]
[eq,[arg 1,[var experiment_result]],false]
[FAIL_MESSAGE alu_test_2]
[set num_fails [add,[var num_fails],1]]
[write [ASCII,7]]
[NAME_MESSAGE prep_rf_logical_alu]
[NAME_MESSAGE test_not_b_op][write]
[else]
[PASS_MESSAGE alu_test_2]
[end]
[set experiment_result [xeq typ test_alu_zeros_ones]]
[eq,[arg 1,[var experiment_result]],false]
[FAIL_MESSAGE alu_test_3]
[set num_fails [add,[var num_fails],1]]
[write [ASCII,7]]
[NAME_MESSAGE prep_rf_logical_alu]
[NAME_MESSAGE test_alu_zeros_ones][write]
[else]
[PASS_MESSAGE alu_test_3]
[end]
[set experiment_result [xeq typ test_pass_randoms]]
[eq,[arg 1,[var experiment_result]],false]
[FAIL_MESSAGE alu_test_4]
[set num_fails [add,[var num_fails],1]]
[write [ASCII,7]]
[NAME_MESSAGE prep_rf_logical_alu]
[NAME_MESSAGE test_pass_randoms][write]
[else]
[PASS_MESSAGE alu_test_4]
[end]
[set experiment_result [xeq typ prep_test_plus_minus]]
[eq,[arg 1,[var experiment_result]],false]
[FAIL_MESSAGE alu_test_5]
[set num_fails [add,[var num_fails],1]]
[write [ASCII,7]]
[NAME_MESSAGE prep_test_plus_minus][write]
[else]
[PASS_MESSAGE alu_test_5]
[end]
[set experiment_result [xeq typ test_plus_op]]
[eq,[arg 1,[var experiment_result]],false]
[FAIL_MESSAGE alu_test_6]
[set num_fails [add,[var num_fails],1]]
[write [ASCII,7]]
[NAME_MESSAGE prep_test_plus_minus]
[NAME_MESSAGE test_plus_op][write]
[else]
[PASS_MESSAGE alu_test_6]
[end]
[set experiment_result [xeq typ test_minus_op]]
[eq,[arg 1,[var experiment_result]],false]
[FAIL_MESSAGE alu_test_7]
[set num_fails [add,[var num_fails],1]]
[write [ASCII,7]]
[NAME_MESSAGE prep_test_plus_minus]
[NAME_MESSAGE test_plus_op]
[NAME_MESSAGE test_minus_op][write]
[else]
[PASS_MESSAGE alu_test_7]
[end]