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

⟦578070da1⟧ EM, TextFile

    Length: 967 (0x3c7)
    Types: EM, TextFile
    Names: »POLL_FOR_MC.EM«

Derivation

└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293
    └─ ⟦this⟧ »POLL_FOR_MC.EM« 

TextFile

[set machine_check [arg 2 [poll seq]]]
[eq,[var machine_check],false]
    [#eq,[model],100]
	[set machine_check [sor,[var machine_check],[arg 2 [poll sys]]]]
    [end]
    [#eq,[model],200]
	[set machine_check [sor,[var machine_check],[arg 2 [poll ioc]]]]
    [end]
    [set machine_check [sor,[var machine_check],[arg 2 [poll typ]]]]
    [set machine_check [sor,[var machine_check],[arg 2 [poll val]]]]
    [set machine_check [sor,[var machine_check],[arg 2 [poll fiu]]]]
    [eq [mem3_exists],true]
        [set machine_check [sor,[var machine_check],[arg 2 [poll mem3]]]]
    [end]
    [eq [mem2_exists],true]
        [set machine_check [sor,[var machine_check],[arg 2 [poll mem2]]]]
    [end]
    [eq [mem1_exists],true]
        [set machine_check [sor,[var machine_check],[arg 2 [poll mem1]]]]
    [end]
    [eq [mem0_exists],true]
        [set machine_check [sor,[var machine_check],[arg 2 [poll mem0]]]]
    [end]
[end]
[var machine_check]
[kill machine_check]