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

⟦d42520257⟧ EM, TextFile

    Length: 512 (0x200)
    Types: EM, TextFile
    Names: »ERRORS.EM«

Derivation

└─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3
    └─ ⟦this⟧ »ERRORS.EM«

TextFile

[set ERROR FALSE]
[#eq,[model],100][get_sys_errors [xeq sys read_parity]][end]
[#eq,[model],200][get_ioc_errors [xeq ioc read_pareg 0]][end]
                 [get_typ_errors [xeq typ read_parity]]
                 [get_val_errors [xeq val read_parity]]
                 [get_fiu_errors [xeq fiu read_pareg 0]]
                 [get_seq_errors [xeq seq get_misc_errors],[xeq seq halt]]
                 [get_mem_errors]
[eq,[var ERROR],FALSE][write NEITHER A HALT OR A PARITY ERROR WAS DETECTED][end]
[kill ERROR]