|
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 - download
Length: 2048 (0x800)
Types: EM, TextFile
Names: »TEST_MEM_BOARD.EM«
└─⟦b4205821b⟧ Bits:30000743 8mm tape, Rational 1000, DFS, D_12_7_3 SEQ288
└─ ⟦this⟧ »TEST_MEM_BOARD.EM«
└─⟦b434774df⟧ Bits:30000528 8mm tape, Rational 1000, DFS, D_12_6_5
└─ ⟦this⟧ »TEST_MEM_BOARD.EM«
└─⟦bc1274df5⟧ Bits:30000750 8mm tape, Rational 1000, DFS backup from PAM's R1000
└─ ⟦this⟧ »TEST_MEM_BOARD.EM«
[set NUM_FAILS 0]
[set BOARD_NUM [ne,%1%,]%1%[else]3[end]]
[write]
[write beginning of,,
[eq,[QUAD_DENSITY],true]8[else]2[end]
,Megabyte Memory Board testing]
[TEST_TILE MEM_DIAGNOSTIC_KERNEL 1]
[set TILE1_RESULT [var TILE_RESULT]]
[TEST_TILE MEM_SCANNABLE_REGSTERS 2]
[set TILE2_RESULT [var TILE_RESULT]]
[TEST_TILE MEM_TAGSTORE 3]
[set TILE3_RESULT [var TILE_RESULT]]
[TEST_TILE MEM_DATA_STORE 4]
[set TILE4_RESULT [var TILE_RESULT]]
[write][write]
[write end of,,
[eq,[QUAD_DENSITY],true]8[else]2[end],
,Megabyte Memory Board testing]
[write]
[[var TILE1_RESULT]]
[[var TILE2_RESULT]]
[[var TILE3_RESULT]]
[[var TILE4_RESULT]]
[write][write]
[#eq,[var NUM_FAILS],0]
[PASS_MESSAGE [eq,[QUAD_DENSITY],true]8[else]2[end],
,Megabyte Memory Board]
[else]
[FAIL_MESSAGE [eq,[QUAD_DENSITY],true]8[else]2[end],
,Megabyte Memory Board]
[write]
[write [eq,[var NUM_FAILS],1]IT'S NOT TOO BAD : ONLY ONE TEST FAILED,
[else][var NUM_FAILS],,TESTS,FAILED[end]]
[end]
[write]
[kill NUM_FAILS]
[kill BOARD_NUM]
[kill TILE_RESULT]
[kill TILE1_RESULT]
[kill TILE2_RESULT]
[kill TILE3_RESULT]
[kill TILE4_RESULT]«nul»