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

⟦e44747917⟧ EM, TextFile

    Length: 3072 (0xc00)
    Types: EM, TextFile
    Names: »SYS_BUFFER2_TEST.EM«

Derivation

└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
    └─ ⟦this⟧ »SYS_BUFFER2_TEST.EM« 
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
    └─ ⟦this⟧ »SYS_BUFFER2_TEST.EM« 
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
    └─ ⟦this⟧ »SYS_BUFFER2_TEST.EM« 

TextFile

[xeq sys WRITE_ONES_RPARITY]
[set experiment_result [xeq sys NUDGE_RPARITY]]
[eq,[arg 1,[var experiment_result]],false]
     [FAIL_MESSAGE RCV_buffer_parity_test]
     [set num_fails [add,[var num_fails],1]]
     [write [ASCII,7]]
     [NAME_MESSAGE UCODE_BUFF_AUX]
     [NAME_MESSAGE WRITE_ONES_RPARITY]
     [NAME_MESSAGE LOAD_BAR 0 0]
     [NAME_MESSAGE NUDGE_RPARITY][write]
     [else]
     [PASS_MESSAGE RCV_buffer_parity_test]
[end]
[xeq sys UCODE_DATA]
[xeq sys LOAD_LINK 7 0]
[set experiment_result [xeq sys TEST_DATA_MODE_ADDRESS]]
[eq,[arg 1,[var experiment_result]],false]
     [FAIL_MESSAGE Data_Mode_Addressing_test]
     [set num_fails [add,[var num_fails],1]]
     [write [ASCII,7]]
     [NAME_MESSAGE UCODE_DATA]
     [NAME_MESSAGE LOAD_LINK 7 0]
     [NAME_MESSAGE TEST_DATA_MODE_ADDRESS][write]
     [else]
     [PASS_MESSAGE Data_Mode_Addressing_test]
[end]
[xeq sys WRITE_ONES_XBUFFER]
[xeq sys LOAD_LINK 7 0]
[set experiment_result [xeq sys NUDGE_XDATA]]
[eq,[arg 1,[var experiment_result]],false]
     [FAIL_MESSAGE XMIT_buffer_data_test_2]
     [set num_fails [add,[var num_fails],1]]
     [write [ASCII,7]]
     [NAME_MESSAGE WRITE_ONES_XBUFFER]
     [NAME_MESSAGE LOAD_LINK 7 0]
     [NAME_MESSAGE NUDGE_XDATA][write]
     [else]
     [PASS_MESSAGE XMIT_buffer_data_test_2]
[end]
[xeq sys WRITE_ONES_RBUFFER]
[xeq sys LOAD_LINK 7 0]
[set experiment_result [xeq sys NUDGE_RDATA]]
[eq,[arg 1,[var experiment_result]],false]
     [FAIL_MESSAGE RCV_buffer_data_test_2]
     [set num_fails [add,[var num_fails],1]]
     [write [ASCII,7]]
     [NAME_MESSAGE WRITE_ONES_RBUFFER]
     [NAME_MESSAGE LOAD_LINK 7 0]
     [NAME_MESSAGE NUDGE_RDATA][write]
     [else]
     [PASS_MESSAGE RCV_buffer_data_test_2]
[end]
[xeq sys UCODE_XHEAD]
[xeq sys LOAD_HOME 7 0]
[xeq sys LOAD_LINK 0 0]
[set experiment_result [xeq sys TEST_HEADER_MODE_ADDRESS]]
[eq,[arg 1,[var experiment_result]],false]
     [FAIL_MESSAGE Header_Mode_Addressing_test]
     [set num_fails [add,[var num_fails],1]]
     [write [ASCII,7]]
     [NAME_MESSAGE UCODE_XHEAD]
     [NAME_MESSAGE LOAD_HOME 7 0]
     [NAME_MESSAGE LOAD_LINK 0 0]
     [NAME_MESSAGE TEST_HEADER_MODE_ADDRESS][write]
     [else]
     [PASS_MESSAGE Header_Mode_Addressing_test]
[end]

[xeq sys WRITE_ONES_XBUFFER]
[xeq sys WRITE_ONES_RBUFFER]
[SYS_HEADER_NUDGE 4,7]
[SYS_HEADER_NUDGE 0,3]«nul»