|
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_191cd7
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦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 0160 | ` | .CONST 0x0160 ; 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 0000 | | .CONST 0x0000 ; 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 0001 | | .CONST 0x0001 ; Number of locals 000b INIT_0008: 000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated 000d 00bf | | Action Accept_Activation 000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd 000f 00c7 | | Action Elaborate_Subprogram 0010 BODY_0008: 0010 00bc | | Action Signal_Activated 0011 00bb | | Action Signal_Completion 0012 0000 0000 | | .BLANK 0000[0x6] 0018 ; -------------------------------------------------------------------------------------- 0018 ; SUBPROGRAM 0018 ; -------------------------------------------------------------------------------------- 0018 0112 | | .CONST 0x0112 ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0016 | | .CONST 0x0016 ; Number of locals 001b INIT_0018: 001b 00e3 | | Load_Encached Natural_Cache 001c 0266 | f | Execute Discrete,Bounds 001d 00e2 | | Load_Encached Integer_Cache 001e 02a0 | | Declare_Subprogram Null_Subprogram 001f 4801 |H | Short_Literal 0x1 0020 0350 | P | Declare_Type Array,Defined,Bounds_With_Object 0021 4801 |H | Short_Literal 0x1 0022 4803 |H | Short_Literal 0x3 0023 00da | | Load_Top At_Offset_2 0024 035b | [ | Declare_Type Array,Constrained 0025 4801 |H | Short_Literal 0x1 0026 4804 |H | Short_Literal 0x4 0027 00db | | Load_Top At_Offset_3 0028 035b | [ | Declare_Type Array,Constrained 0029 e002 | | Load 0x0,0x2 002a 190e | | Execute Package,Field_Reference,Field_Number 0xe 002b 00c6 | | Action Check_Subprogram_Elaborated 002c 00da | | Load_Top At_Offset_2 002d e003 | | Load 0x0,0x3 002e e004 | | Load 0x0,0x4 002f 4808 |H | Short_Literal 0x8 0030 0007 | | Action Break_Optional 0031 e002 | | Load 0x0,0x2 0032 190f | | Execute Package,Field_Reference,Field_Number 0xf 0033 00c6 | | Action Check_Subprogram_Elaborated 0034 e404 | | Load 0x2,0x4 0035 e005 | | Load 0x0,0x5 0036 e006 | | Load 0x0,0x6 0037 480c |H | Short_Literal 0xc 0038 0007 | | Action Break_Optional 0039 e002 | | Load 0x0,0x2 003a 190f | | Execute Package,Field_Reference,Field_Number 0xf 003b 00c6 | | Action Check_Subprogram_Elaborated 003c e402 | | Load 0x2,0x2 003d e007 | | Load 0x0,0x7 003e e008 | | Load 0x0,0x8 003f 4810 |H | Short_Literal 0x10 0040 0007 | | Action Break_Optional 0041 e403 | | Load 0x2,0x3 0042 0337 | 7 | Declare_Variable Array 0043 00d8 | | Load_Top At_Offset_0 0044 0335 | 5 | Declare_Variable Array,Duplicate 0045 00cd | | Action Spare6_Action 0046 4810 |H | Short_Literal 0x10 0047 4801 |H | Short_Literal 0x1 0048 00da | | Load_Top At_Offset_2 0049 01d6 | | Execute Vector,Field_Write 004a 4fff |O | Short_Literal -0x1 004b 4802 |H | Short_Literal 0x2 004c 00da | | Load_Top At_Offset_2 004d 01d6 | | Execute Vector,Field_Write 004e 4804 |H | Short_Literal 0x4 004f 4803 |H | Short_Literal 0x3 0050 00da | | Load_Top At_Offset_2 0051 01d6 | | Execute Vector,Field_Write 0052 00d9 | | Load_Top At_Offset_1 0053 01d4 | | Execute Vector,Structure_Write 0054 00d8 | | Load_Top At_Offset_0 0055 e405 | | Load 0x2,0x5 0056 4806 |H | Short_Literal 0x6 0057 4802 |H | Short_Literal 0x2 0058 0099 | | Action Reference_Dynamic 0059 e002 | | Load 0x0,0x2 005a 180e | | Execute Package,Field_Execute,Field_Number 0xe 005b 4801 |H | Short_Literal 0x1 005c 4810 |H | Short_Literal 0x10 005d e009 | | Load 0x0,0x9 005e 1b12 | | Execute Package,Field_Read,Field_Number 0x12 005f 035b | [ | Declare_Type Array,Constrained 0060 0337 | 7 | Declare_Variable Array 0061 00d8 | | Load_Top At_Offset_0 0062 0335 | 5 | Declare_Variable Array,Duplicate 0063 00cd | | Action Spare6_Action 0064 4800 |H | Short_Literal 0x0 0065 4801 |H | Short_Literal 0x1 0066 00da | | Load_Top At_Offset_2 0067 01d6 | | Execute Vector,Field_Write 0068 4800 |H | Short_Literal 0x0 0069 4802 |H | Short_Literal 0x2 006a 00da | | Load_Top At_Offset_2 006b 01d6 | | Execute Vector,Field_Write 006c 4800 |H | Short_Literal 0x0 006d 4803 |H | Short_Literal 0x3 006e 00da | | Load_Top At_Offset_2 006f 01d6 | | Execute Vector,Field_Write 0070 4820 |H | Short_Literal 0x20 0071 4804 |H | Short_Literal 0x4 0072 00da | | Load_Top At_Offset_2 0073 01d6 | | Execute Vector,Field_Write 0074 48ff |H | Short_Literal 0xff 0075 4805 |H | Short_Literal 0x5 0076 00da | | Load_Top At_Offset_2 0077 01d6 | | Execute Vector,Field_Write 0078 48ff |H | Short_Literal 0xff 0079 4806 |H | Short_Literal 0x6 007a 00da | | Load_Top At_Offset_2 007b 01d6 | | Execute Vector,Field_Write 007c 48ff |H | Short_Literal 0xff 007d 4807 |H | Short_Literal 0x7 007e 00da | | Load_Top At_Offset_2 007f 01d6 | | Execute Vector,Field_Write 0080 48fe |H | Short_Literal 0xfe 0081 4808 |H | Short_Literal 0x8 0082 00da | | Load_Top At_Offset_2 0083 01d6 | | Execute Vector,Field_Write 0084 4800 |H | Short_Literal 0x0 0085 4809 |H | Short_Literal 0x9 0086 00da | | Load_Top At_Offset_2 0087 01d6 | | Execute Vector,Field_Write 0088 4800 |H | Short_Literal 0x0 0089 480a |H | Short_Literal 0xa 008a 00da | | Load_Top At_Offset_2 008b 01d6 | | Execute Vector,Field_Write 008c 4800 |H | Short_Literal 0x0 008d 480b |H | Short_Literal 0xb 008e 00da | | Load_Top At_Offset_2 008f 01d6 | | Execute Vector,Field_Write 0090 481b |H | Short_Literal 0x1b 0091 480c |H | Short_Literal 0xc 0092 00da | | Load_Top At_Offset_2 0093 01d6 | | Execute Vector,Field_Write 0094 48ff |H | Short_Literal 0xff 0095 480d |H | Short_Literal 0xd 0096 00da | | Load_Top At_Offset_2 0097 01d6 | | Execute Vector,Field_Write 0098 48ff |H | Short_Literal 0xff 0099 480e |H | Short_Literal 0xe 009a 00da | | Load_Top At_Offset_2 009b 01d6 | | Execute Vector,Field_Write 009c 48ff |H | Short_Literal 0xff 009d 480f |H | Short_Literal 0xf 009e 00da | | Load_Top At_Offset_2 009f 01d6 | | Execute Vector,Field_Write 00a0 4800 |H | Short_Literal 0x0 00a1 4810 |H | Short_Literal 0x10 00a2 00da | | Load_Top At_Offset_2 00a3 01d6 | | Execute Vector,Field_Write 00a4 00d9 | | Load_Top At_Offset_1 00a5 01d4 | | Execute Vector,Structure_Write 00a6 00d8 | | Load_Top At_Offset_0 00a7 e409 | | Load 0x2,0x9 00a8 480a |H | Short_Literal 0xa 00a9 4802 |H | Short_Literal 0x2 00aa 0099 | | Action Reference_Dynamic 00ab e002 | | Load 0x0,0x2 00ac 180f | | Execute Package,Field_Execute,Field_Number 0xf 00ad 4801 |H | Short_Literal 0x1 00ae 4814 |H | Short_Literal 0x14 00af e009 | | Load 0x0,0x9 00b0 1b12 | | Execute Package,Field_Read,Field_Number 0x12 00b1 035b | [ | Declare_Type Array,Constrained 00b2 0337 | 7 | Declare_Variable Array 00b3 00d8 | | Load_Top At_Offset_0 00b4 0335 | 5 | Declare_Variable Array,Duplicate 00b5 00cd | | Action Spare6_Action 00b6 4825 |H% | Short_Literal 0x25 00b7 4801 |H | Short_Literal 0x1 00b8 00da | | Load_Top At_Offset_2 00b9 01d6 | | Execute Vector,Field_Write 00ba 4825 |H% | Short_Literal 0x25 00bb 4802 |H | Short_Literal 0x2 00bc 00da | | Load_Top At_Offset_2 00bd 01d6 | | Execute Vector,Field_Write 00be 4800 |H | Short_Literal 0x0 00bf 4803 |H | Short_Literal 0x3 00c0 00da | | Load_Top At_Offset_2 00c1 01d6 | | Execute Vector,Field_Write 00c2 4800 |H | Short_Literal 0x0 00c3 4804 |H | Short_Literal 0x4 00c4 00da | | Load_Top At_Offset_2 00c5 01d6 | | Execute Vector,Field_Write 00c6 4800 |H | Short_Literal 0x0 00c7 4805 |H | Short_Literal 0x5 00c8 00da | | Load_Top At_Offset_2 00c9 01d6 | | Execute Vector,Field_Write 00ca 4820 |H | Short_Literal 0x20 00cb 4806 |H | Short_Literal 0x6 00cc 00da | | Load_Top At_Offset_2 00cd 01d6 | | Execute Vector,Field_Write 00ce 48ff |H | Short_Literal 0xff 00cf 4807 |H | Short_Literal 0x7 00d0 00da | | Load_Top At_Offset_2 00d1 01d6 | | Execute Vector,Field_Write 00d2 48ff |H | Short_Literal 0xff 00d3 4808 |H | Short_Literal 0x8 00d4 00da | | Load_Top At_Offset_2 00d5 01d6 | | Execute Vector,Field_Write 00d6 48ff |H | Short_Literal 0xff 00d7 4809 |H | Short_Literal 0x9 00d8 00da | | Load_Top At_Offset_2 00d9 01d6 | | Execute Vector,Field_Write 00da 48fe |H | Short_Literal 0xfe 00db 480a |H | Short_Literal 0xa 00dc 00da | | Load_Top At_Offset_2 00dd 01d6 | | Execute Vector,Field_Write 00de 4800 |H | Short_Literal 0x0 00df 480b |H | Short_Literal 0xb 00e0 00da | | Load_Top At_Offset_2 00e1 01d6 | | Execute Vector,Field_Write 00e2 4800 |H | Short_Literal 0x0 00e3 480c |H | Short_Literal 0xc 00e4 00da | | Load_Top At_Offset_2 00e5 01d6 | | Execute Vector,Field_Write 00e6 4800 |H | Short_Literal 0x0 00e7 480d |H | Short_Literal 0xd 00e8 00da | | Load_Top At_Offset_2 00e9 01d6 | | Execute Vector,Field_Write 00ea 481b |H | Short_Literal 0x1b 00eb 480e |H | Short_Literal 0xe 00ec 00da | | Load_Top At_Offset_2 00ed 01d6 | | Execute Vector,Field_Write 00ee 48ff |H | Short_Literal 0xff 00ef 480f |H | Short_Literal 0xf 00f0 00da | | Load_Top At_Offset_2 00f1 01d6 | | Execute Vector,Field_Write 00f2 48ff |H | Short_Literal 0xff 00f3 4810 |H | Short_Literal 0x10 00f4 00da | | Load_Top At_Offset_2 00f5 01d6 | | Execute Vector,Field_Write 00f6 48ff |H | Short_Literal 0xff 00f7 4811 |H | Short_Literal 0x11 00f8 00da | | Load_Top At_Offset_2 00f9 01d6 | | Execute Vector,Field_Write 00fa 4800 |H | Short_Literal 0x0 00fb 4812 |H | Short_Literal 0x12 00fc 00da | | Load_Top At_Offset_2 00fd 01d6 | | Execute Vector,Field_Write 00fe 4825 |H% | Short_Literal 0x25 00ff 4813 |H | Short_Literal 0x13 0100 00da | | Load_Top At_Offset_2 0101 01d6 | | Execute Vector,Field_Write 0102 4825 |H% | Short_Literal 0x25 0103 4814 |H | Short_Literal 0x14 0104 00da | | Load_Top At_Offset_2 0105 01d6 | | Execute Vector,Field_Write 0106 00d9 | | Load_Top At_Offset_1 0107 01d4 | | Execute Vector,Structure_Write 0108 4803 |H | Short_Literal 0x3 0109 4812 |H | Short_Literal 0x12 010a 00da | | Load_Top At_Offset_2 010b 01cf | | Execute Vector,Slice_Read 010c e409 | | Load 0x2,0x9 010d 480a |H | Short_Literal 0xa 010e 4802 |H | Short_Literal 0x2 010f 0099 | | Action Reference_Dynamic 0110 e002 | | Load 0x0,0x2 0111 180f | | Execute Package,Field_Execute,Field_Number 0xf 0112 BODY_0018: 0112 00cf | | Action Mark_Auxiliary 0113 e412 | | Load 0x2,0x12 0114 01d9 | | Execute Vector,Reverse_Bounds 0115 0263 | c | Execute Discrete,Above_Bound 0116 700c |p | Jump_Nonzero 0x123 0117 480a |H | Short_Literal 0xa 0118 4800 |H | Short_Literal 0x0 0119 00da | | Load_Top At_Offset_2 011a e412 | | Load 0x2,0x12 011b 01d7 | | Execute Vector,Field_Read 011c e00a | | Load 0x0,0xa 011d 186c | l | Execute Package,Field_Execute,Field_Number 0x6c 011e 4801 |H | Short_Literal 0x1 011f e00a | | Load 0x0,0xa 0120 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 0121 00c8 | | Action Pop_Auxiliary_Range 0122 3ff4 |? | Loop_Increasing 0x117 0123 00ce | | Action Pop_Auxiliary 0124 0092 0150 | P| Action Push_String_Extended,0x150 ; "------------------" 0126 e00a | | Load 0x0,0xa 0127 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0128 00cf | | Action Mark_Auxiliary 0129 00db | | Load_Top At_Offset_3 012a 01d9 | | Execute Vector,Reverse_Bounds 012b 0263 | c | Execute Discrete,Above_Bound 012c 700c |p | Jump_Nonzero 0x139 012d 480a |H | Short_Literal 0xa 012e 4800 |H | Short_Literal 0x0 012f 00da | | Load_Top At_Offset_2 0130 e414 | | Load 0x2,0x14 0131 01d7 | | Execute Vector,Field_Read 0132 e00a | | Load 0x0,0xa 0133 186c | l | Execute Package,Field_Execute,Field_Number 0x6c 0134 4801 |H | Short_Literal 0x1 0135 e00a | | Load 0x0,0xa 0136 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 0137 00c8 | | Action Pop_Auxiliary_Range 0138 3ff4 |? | Loop_Increasing 0x12d 0139 00ce | | Action Pop_Auxiliary 013a 0092 0150 | P| Action Push_String_Extended,0x150 ; "------------------" 013c e00a | | Load 0x0,0xa 013d 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 013e 00cf | | Action Mark_Auxiliary 013f 00d9 | | Load_Top At_Offset_1 0140 01d9 | | Execute Vector,Reverse_Bounds 0141 0263 | c | Execute Discrete,Above_Bound 0142 700c |p | Jump_Nonzero 0x14f 0143 480a |H | Short_Literal 0xa 0144 4800 |H | Short_Literal 0x0 0145 00da | | Load_Top At_Offset_2 0146 e416 | | Load 0x2,0x16 0147 01d7 | | Execute Vector,Field_Read 0148 e00a | | Load 0x0,0xa 0149 186c | l | Execute Package,Field_Execute,Field_Number 0x6c 014a 4801 |H | Short_Literal 0x1 014b e00a | | Load 0x0,0xa 014c 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 014d 00c8 | | Action Pop_Auxiliary_Range 014e 3ff4 |? | Loop_Increasing 0x143 014f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0150 ; -------------------------------------------------------------------------------------- 0150 ; STRING TABLE 0150 ; -------------------------------------------------------------------------------------- 0150 0004 | | .STRTAB 0x0004->0x0152 ; "------------------" 0151 0014 | | .STREND 0x0014->0x015b 0152 2d2d 2d2d |----| .STRTAB_STRINGS 015b 0000 0000 | | .BLANK 0000[0x5] 0160 ; -------------------------------------------------------------------------------------- 0160 ; Debug Table 0160 ; -------------------------------------------------------------------------------------- 0160 0004 0000 | | .DEBUG4 0x0004,0x0000,0x4a3a,0x0000,0x0001,0x0002 0166 000b 0000 | | .DBG4T 0x000b,0x0000,0x8000,0x0000 016a 001b 016e | n| .DBG4T 0x001b,0x016e,0x8001,0x0000 016e ; -------------------------------------------------------------------------------------- 016e ; Debug chain 016e ; -------------------------------------------------------------------------------------- 016e 000c 000b | | .DBGLEN 0x000c,0x000b 0170 001b 0021 | !| .DBGLNO 0x001b,0x0021,0x0025,0x0029,0x0031,0x0039,0x0041,0x0054,0x005b,0x00a6,0x00ad,0x0108,0x0113,0x0117,0x011e,0x0124,0x0129,0x012d,0x0134,0x013a,0x013f,0x0143,0x014a 0187 0000 0000 | | .BLANK 0000[0x79]