|
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: 1300 (0x514) Types: EM, TextFile Names: »TEST_MEM_BOARD.EM«
└─⟦24d56d853⟧ Bits:30000744 8mm tape, Rational 1000, DFS, D_12_6_5 SEQ293 └─ ⟦this⟧ »TEST_MEM_BOARD.EM« └─⟦9031b0687⟧ Bits:30000407 8mm tape, Rational 1000, DFS, D_12_7_3 └─ ⟦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]