DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400 DFS Tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400 DFS Tapes

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - download

⟦15473d164⟧ EM, TextFile

    Length: 3228 (0xc9c)
    Types: EM, TextFile
    Names: »SYS_BUFFER_TEST.EM«

Derivation

└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
    └─ ⟦this⟧ »SYS_BUFFER_TEST.EM« 
└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
    └─ ⟦this⟧ »SYS_BUFFER_TEST.EM«

TextFile

[write]
[write,Testing,SYSBUS,BOARD,Tile,10,,-,,Sys_buffer_test]
[write,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,&,Sys_buffer2_test]
[write]
[xeq sys UCODE_PIPE]
[set experiment_result [xeq sys TEST_PIPE_INIT]]
[eq,[arg 1,[var experiment_result]],false]
     [FAIL_MESSAGE Pipeline_test_1]
     [set num_fails [add,[var num_fails],1]]
     [write [ASCII,7]]
     [NAME_MESSAGE UCODE_PIPE]
     [NAME_MESSAGE TEST_PIPE_INIT][write]
     [else]
     [PASS_MESSAGE Pipeline_test_1]
[end]
[set experiment_result [xeq sys TEST_PIPE_BUFF]]
[eq,[arg 1,[var experiment_result]],false]
     [FAIL_MESSAGE Pipeline_test_2]
     [set num_fails [add,[var num_fails],1]]
     [write [ASCII,7]]
     [NAME_MESSAGE UCODE_PIPE]
     [NAME_MESSAGE TEST_PIPE_BUFF][write]
     [else]
     [PASS_MESSAGE Pipeline_test_2]
[end]
[xeq sys UCODE_BAR]
[set experiment_result [xeq sys TEST_XBUFFER_ADDRESS_QUICK]]
[eq,[arg 1,[var experiment_result]],false]
     [FAIL_MESSAGE XMIT_buffer_address_test]
     [set num_fails [add,[var num_fails],1]]
     [write [ASCII,7]]
     [NAME_MESSAGE UCODE_BAR]
     [NAME_MESSAGE TEST_XBUFFER_ADDRESS_QUICK][write]
     [else]
     [PASS_MESSAGE XMIT_buffer_address_test]
[end]
[set experiment_result [xeq sys TEST_RBUFFER_ADDRESS_QUICK]]
[eq,[arg 1,[var experiment_result]],false]
     [FAIL_MESSAGE RCV_buffer_address_test]
     [set num_fails [add,[var num_fails],1]]
     [write [ASCII,7]]
     [NAME_MESSAGE UCODE_BAR]
     [NAME_MESSAGE TEST_RBUFFER_ADDRESS_QUICK][write]
     [else]
     [PASS_MESSAGE RCV_buffer_address_test]
[end]
[xeq sys UCODE_MODE] 
[set experiment_result [xeq sys TEST_TR_MODE_ADDRESS]]
[eq,[arg 1,[var experiment_result]],false]
     [FAIL_MESSAGE Transmit/Receive_Mode_test]
     [set num_fails [add,[var num_fails],1]]
     [write [ASCII,7]]
     [NAME_MESSAGE UCODE_MODE]
     [NAME_MESSAGE TEST_TR_MODE_ADDRESS][write]
     [else]
     [PASS_MESSAGE Transmit/Receive_Mode_test]
[end]
[xeq sys UCODE_BUFF_AUX]
[xeq sys WRITE_ONES_XBUFFER]
[set experiment_result [xeq sys NUDGE_XBUFFER]]
[eq,[arg 1,[var experiment_result]],false]
     [FAIL_MESSAGE XMIT_buffer_data_test_1]
     [set num_fails [add,[var num_fails],1]]
     [write [ASCII,7]]
     [NAME_MESSAGE UCODE_BUFF_AUX]
     [NAME_MESSAGE WRITE_ONES_XBUFFER]
     [NAME_MESSAGE NUDGE_XBUFFER][write]
     [else]
     [PASS_MESSAGE XMIT_buffer_data_test_1]
[end]
[xeq sys WRITE_ONES_RBUFFER]
[set experiment_result [xeq sys NUDGE_RBUFFER]]
[eq,[arg 1,[var experiment_result]],false]
     [FAIL_MESSAGE RCV_buffer_data_test_1]
     [set num_fails [add,[var num_fails],1]]
     [write [ASCII,7]]
     [NAME_MESSAGE UCODE_BUFF_AUX]
     [NAME_MESSAGE WRITE_ONES_RBUFFER]
     [NAME_MESSAGE NUDGE_RBUFFER][write]
     [else]
     [PASS_MESSAGE RCV_buffer_data_test_1]
[end]
[xeq sys WRITE_ONES_XPARITY]
[xeq sys LOAD_BAR 0 0]
[set experiment_result [xeq sys NUDGE_XPARITY]]
[eq,[arg 1,[var experiment_result]],false]
     [FAIL_MESSAGE XMIT_buffer_parity_test]
     [set num_fails [add,[var num_fails],1]]
     [write [ASCII,7]]
     [NAME_MESSAGE UCODE_BUFF_AUX]
     [NAME_MESSAGE WRITE_ONES_XPARITY]
     [NAME_MESSAGE LOAD_BAR 0 0]
     [NAME_MESSAGE NUDGE_XPARITY][write]
     [else]
     [PASS_MESSAGE XMIT_buffer_parity_test]
[end]