|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 1024 (0x400)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_779ce4
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0140 | @ | .CONST 0x0140 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments)
0007 8000 | | .CONST 0x8000 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0010 | | .CONST 0x0010 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0002 | | .CONST 0x0002 ; Number of locals
000b INIT_0008:
000b e012 | | Load 0x0,0x12
000c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
000d 02c7 | | Declare_Variable Any
000e 00d8 | | Load_Top At_Offset_0
000f 1c00 | | Execute_Immediate Run_Utility,0x0
0010 BODY_0008:
0010 00d8 | | Load_Top At_Offset_0
0011 00ea | | Load_Encached Null_String_Cache
0012 e7ff | | Load 0x3,-0x1
0013 4801 |H | Short_Literal 0x1
0014 e012 | | Load 0x0,0x12
0015 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0016 c602 | | Store 0x3,0x2
0017 0092 0059 | Y| Action Push_String_Extended,0x59 ; "test_script_control_c => ("
0019 00d9 | | Load_Top At_Offset_1
001a e012 | | Load 0x0,0x12
001b 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
001c 0092 005a | Z| Action Push_String_Extended,0x5a ; " Coverage_Analyzer_Params => <WORLDS>,"
001e 00d9 | | Load_Top At_Offset_1
001f e012 | | Load 0x0,0x12
0020 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0021 0092 005b | [| Action Push_String_Extended,0x5b ; " Coverage_Kind => SEGMENT,"
0023 00d9 | | Load_Top At_Offset_1
0024 e012 | | Load 0x0,0x12
0025 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0026 0092 005c | \| Action Push_String_Extended,0x5c ; " Log_Test_Description => TRUE,"
0028 00d9 | | Load_Top At_Offset_1
0029 e012 | | Load 0x0,0x12
002a 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
002b 0092 005d | ]| Action Push_String_Extended,0x5d ; " Overall_Clock_Time => 500.0,"
002d 00d9 | | Load_Top At_Offset_1
002e e012 | | Load 0x0,0x12
002f 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0030 0092 005e | ^| Action Push_String_Extended,0x5e ; " Overall_Cpu_Time => 100.00,"
0032 00d9 | | Load_Top At_Offset_1
0033 e012 | | Load 0x0,0x12
0034 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0035 0092 005f | _| Action Push_String_Extended,0x5f ; " Max_Clock_Per_Test => 50.0,"
0037 00d9 | | Load_Top At_Offset_1
0038 e012 | | Load 0x0,0x12
0039 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
003a 0092 0060 | `| Action Push_String_Extended,0x60 ; " Max_Cpu_Per_Test => 10.0,"
003c 00d9 | | Load_Top At_Offset_1
003d e012 | | Load 0x0,0x12
003e 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
003f 0092 0061 | a| Action Push_String_Extended,0x61 ; " Max_Number_Of_Failures => 10,"
0041 00d9 | | Load_Top At_Offset_1
0042 e012 | | Load 0x0,0x12
0043 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0044 0092 0062 | b| Action Push_String_Extended,0x62 ; " Terminate_On_Unhandled_Exception => FALSE)"
0046 00d9 | | Load_Top At_Offset_1
0047 e012 | | Load 0x0,0x12
0048 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0049 00d8 | | Load_Top At_Offset_0
004a e012 | | Load 0x0,0x12
004b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
004c c602 | | Store 0x3,0x2
004d e004 | | Load 0x0,0x4
004e 180e | | Execute Package,Field_Execute,Field_Number 0xe
004f 4803 |H | Short_Literal 0x3
0050 e7ff | | Load 0x3,-0x1
0051 e005 | | Load 0x0,0x5
0052 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0053 0092 0063 | c| Action Push_String_Extended,0x63 ; " created."
0055 01cc | | Execute Vector,Catenate
0056 e006 | | Load 0x0,0x6
0057 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0058 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0059 ; --------------------------------------------------------------------------------------
0059 ; STRING TABLE
0059 ; --------------------------------------------------------------------------------------
0059 0018 | | .STRTAB 0x0018->0x0065 ; "test_script_control_c => ("
005a 0030 | 0 | .STRTAB 0x0030->0x0072 ; " Coverage_Analyzer_Params => <WORLDS>,"
005b 005d | ] | .STRTAB 0x005d->0x0089 ; " Coverage_Kind => SEGMENT,"
005c 0089 | | .STRTAB 0x0089->0x00a0 ; " Log_Test_Description => TRUE,"
005d 00b2 | | .STRTAB 0x00b2->0x00b6 ; " Overall_Clock_Time => 500.0,"
005e 00dc | | .STRTAB 0x00dc->0x00cc ; " Overall_Cpu_Time => 100.00,"
005f 0107 | | .STRTAB 0x0107->0x00e2 ; " Max_Clock_Per_Test => 50.0,"
0060 0130 | 0 | .STRTAB 0x0130->0x00f8 ; " Max_Cpu_Per_Test => 10.0,"
0061 0159 | Y | .STRTAB 0x0159->0x010d ; " Max_Number_Of_Failures => 10,"
0062 0180 | | .STRTAB 0x0180->0x0122 ; " Terminate_On_Unhandled_Exception => FALSE)"
0063 01aa | | .STRTAB 0x01aa->0x0138 ; " created."
0064 01b1 | | .STREND 0x01b1->0x013c
0065 7465 7374 |test| .STRTAB_STRINGS
013d 0000 0000 | | .XXX[0x3]
013f 0000 | |
0140 ; --------------------------------------------------------------------------------------
0140 ; Debug Table
0140 ; --------------------------------------------------------------------------------------
0140 0004 000a | | .DEBUG4 0x0004,0x000a,0x8ba7,0x0000,0x0001,0x0000
0146 0000 0000 | | .BLANK 0000[0xba]