|
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 00e8 | | .CONST 0x00e8 ; 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 002e | . | .CONST 0x002e ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0008 | | .CONST 0x0008 ; Number of locals 000b INIT_0008: 000b e004 | | Load 0x0,0x4 000c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 000d 02c7 | | Declare_Variable Any 000e e004 | | Load 0x0,0x4 000f 180e | | Execute Package,Field_Execute,Field_Number 0xe 0010 a402 | | Store_Unchecked 0x2,0x2 0011 e008 | | Load 0x0,0x8 0012 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0013 02c7 | | Declare_Variable Any 0014 00d8 | | Load_Top At_Offset_0 0015 1c00 | | Execute_Immediate Run_Utility,0x0 0016 e00e | | Load 0x0,0xe 0017 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0018 e00f | | Load 0x0,0xf 0019 02c7 | | Declare_Variable Any 001a 00d8 | | Load_Top At_Offset_0 001b 1c00 | | Execute_Immediate Run_Utility,0x0 001c e010 | | Load 0x0,0x10 001d 02c7 | | Declare_Variable Any 001e 00d8 | | Load_Top At_Offset_0 001f 1c00 | | Execute_Immediate Run_Utility,0x0 0020 4815 |H | Short_Literal 0x15 0021 e001 | | Load 0x0,0x1 0022 01d7 | | Execute Vector,Field_Read 0023 0a01 | | Execute_Immediate Plus,0x1 0024 e001 | | Load 0x0,0x1 0025 01d7 | | Execute Vector,Field_Read 0026 02ab | | Declare_Subprogram For_Call,With_Address 0027 4815 |H | Short_Literal 0x15 0028 e001 | | Load 0x0,0x1 0029 01d7 | | Execute Vector,Field_Read 002a 0a03 | | Execute_Immediate Plus,0x3 002b e001 | | Load 0x0,0x1 002c 01d7 | | Execute Vector,Field_Read 002d 02ab | | Declare_Subprogram For_Call,With_Address 002e BODY_0008: 002e e004 | | Load 0x0,0x4 002f 180e | | Execute Package,Field_Execute,Field_Number 0xe 0030 4800 |H | Short_Literal 0x0 0031 0092 00a0 | | Action Push_String_Extended,0xa0 ; "TestMate_Tools.Run (Test_Cases_Or_A_Set => \x22" 0033 e5ff | | Load 0x2,-0x1 0034 01cc | | Execute Vector,Catenate 0035 0092 00a1 | | Action Push_String_Extended,0xa1 ; "\x22" 0037 01cc | | Execute Vector,Catenate 0038 0092 00a2 | | Action Push_String_Extended,0xa2 ; ", " 003a 01cc | | Execute Vector,Catenate 003b 0092 00a3 | | Action Push_String_Extended,0xa3 ; "Test_Set_Name => " 003d 01cc | | Execute Vector,Catenate 003e 0092 00a1 | | Action Push_String_Extended,0xa1 ; "\x22" 0040 01cc | | Execute Vector,Catenate 0041 e5fe | | Load 0x2,-0x2 0042 01cc | | Execute Vector,Catenate 0043 0092 00a1 | | Action Push_String_Extended,0xa1 ; "\x22" 0045 01cc | | Execute Vector,Catenate 0046 0092 00a2 | | Action Push_String_Extended,0xa2 ; ", " 0048 01cc | | Execute Vector,Catenate 0049 0092 00a4 | | Action Push_String_Extended,0xa4 ; "Coverage_Analysis => " 004b 01cc | | Execute Vector,Catenate 004c e5fd | | Load 0x2,-0x3 004d 00e1 | | Load_Encached Boolean_Cache 004e 011c | | Execute Any,Convert_Unchecked 004f 1c01 | | Execute_Immediate Run_Utility,0x1 0050 01cc | | Execute Vector,Catenate 0051 0092 00a2 | | Action Push_String_Extended,0xa2 ; ", " 0053 01cc | | Execute Vector,Catenate 0054 0092 00a5 | | Action Push_String_Extended,0xa5 ; "Response => " 0056 01cc | | Execute Vector,Catenate 0057 0092 00a1 | | Action Push_String_Extended,0xa1 ; "\x22" 0059 01cc | | Execute Vector,Catenate 005a e5fc | | Load 0x2,-0x4 005b 01cc | | Execute Vector,Catenate 005c 0092 00a1 | | Action Push_String_Extended,0xa1 ; "\x22" 005e 01cc | | Execute Vector,Catenate 005f 0092 00a6 | | Action Push_String_Extended,0xa6 ; ")" 0061 01cc | | Execute Vector,Catenate 0062 e006 | | Load 0x0,0x6 0063 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0064 e403 | | Load 0x2,0x3 0065 e5fc | | Load 0x2,-0x4 0066 e004 | | Load 0x0,0x4 0067 184d | M | Execute Package,Field_Execute,Field_Number 0x4d 0068 c403 | | Store 0x2,0x3 0069 4801 |H | Short_Literal 0x1 006a e403 | | Load 0x2,0x3 006b e008 | | Load 0x0,0x8 006c 1817 | | Execute Package,Field_Execute,Field_Number 0x17 006d 6809 |h | Jump_Zero 0x77 006e e004 | | Load 0x0,0x4 006f 180e | | Execute Package,Field_Execute,Field_Number 0xe 0070 4802 |H | Short_Literal 0x2 0071 e403 | | Load 0x2,0x3 0072 e008 | | Load 0x0,0x8 0073 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0074 e006 | | Load 0x0,0x6 0075 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0076 781e |x | Jump 0x95 0077 e5fe | | Load 0x2,-0x2 0078 4801 |H | Short_Literal 0x1 0079 e002 | | Load 0x0,0x2 007a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 007b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 007c e5ff | | Load 0x2,-0x1 007d e002 | | Load 0x0,0x2 007e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 007f 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 0080 8407 | | Call 0x2,0x7 0081 6813 |h | Jump_Zero 0x95 0082 e404 | | Load 0x2,0x4 0083 00db | | Load_Top At_Offset_3 0084 e405 | | Load 0x2,0x5 0085 8216 | | Call 0x1,0x16 0086 c405 | | Store 0x2,0x5 0087 c406 | | Store 0x2,0x6 0088 c404 | | Store 0x2,0x4 0089 e404 | | Load 0x2,0x4 008a 700a |p | Jump_Nonzero 0x95 008b 00db | | Load_Top At_Offset_3 008c e5fd | | Load 0x2,-0x3 008d e5fe | | Load 0x2,-0x2 008e e5ff | | Load 0x2,-0x1 008f 8408 | | Call 0x2,0x8 0090 00da | | Load_Top At_Offset_2 0091 e405 | | Load 0x2,0x5 0092 8011 | | Call 0x0,0x11 0093 c405 | | Store 0x2,0x5 0094 c406 | | Store 0x2,0x6 0095 e004 | | Load 0x0,0x4 0096 180e | | Execute Package,Field_Execute,Field_Number 0xe 0097 4800 |H | Short_Literal 0x0 0098 0092 00a7 | | Action Push_String_Extended,0xa7 ; "TestMate_Tools.Run Completed" 009a e006 | | Load 0x0,0x6 009b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 009c e402 | | Load 0x2,0x2 009d e004 | | Load 0x0,0x4 009e 1810 | | Execute Package,Field_Execute,Field_Number 0x10 009f 4505 |E | Exit_Suprogram New_Top_Offset 0x5 00a0 ; -------------------------------------------------------------------------------------- 00a0 ; STRING TABLE 00a0 ; -------------------------------------------------------------------------------------- 00a0 0012 | | .STRTAB 0x0012->0x00a9 ; "TestMate_Tools.Run (Test_Cases_Or_A_Set => \x22" 00a1 003c | < | .STRTAB 0x003c->0x00bf ; "\x22" 00a2 003b | ; | .STRTAB 0x003b->0x00bf ; ", " 00a3 003b | ; | .STRTAB 0x003b->0x00c0 ; "Test_Set_Name => " 00a4 004a | J | .STRTAB 0x004a->0x00c9 ; "Coverage_Analysis => " 00a5 005d | ] | .STRTAB 0x005d->0x00d3 ; "Response => " 00a6 0067 | g | .STRTAB 0x0067->0x00d9 ; ")" 00a7 0066 | f | .STRTAB 0x0066->0x00da ; "TestMate_Tools.Run Completed" 00a8 0080 | | .STREND 0x0080->0x00e8 00a9 5465 7374 |Test| .STRTAB_STRINGS 00e8 ; -------------------------------------------------------------------------------------- 00e8 ; Debug Table 00e8 ; -------------------------------------------------------------------------------------- 00e8 0004 000a | | .DEBUG4 0x0004,0x000a,0x8ba0,0x0000,0x0001,0x0000 00ee 0000 0000 | | .BLANK 0000[0x112]