|
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_0a7cf5
└─⟦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 00c0 | | .CONST 0x00c0 ; 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 000f | | .CONST 0x000f ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0003 | | .CONST 0x0003 ; Number of locals 000b INIT_0008: 000b e0a8 | | Load 0x0,0xa8 000c 0007 | | Action Break_Optional 000d 029f 0063 | c| Declare_Subprogram INIT_0060,For_Call 000f BODY_0008: 000f e0a9 | | Load 0x0,0xa9 0010 0a01 | | Execute_Immediate Plus,0x1 0011 c0a9 | | Store 0x0,0xa9 0012 e0a9 | | Load 0x0,0xa9 0013 00d8 | | Load_Top At_Offset_0 0014 00e4 | | Load_Encached Positive_Cache 0015 0260 | ` | Execute Discrete,In_Type 0016 7001 |p | Jump_Nonzero 0x18 0017 0801 | | Execute_Immediate Raise,0x1 0018 8061 | a | Call 0x0,0x61 0019 a402 | | Store_Unchecked 0x2,0x2 001a e076 | v | Load 0x0,0x76 001b 680d |h | Jump_Zero 0x29 001c e5ff | | Load 0x2,-0x1 001d e011 | | Load 0x0,0x11 001e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 001f 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0020 8403 | | Call 0x2,0x3 0021 e01a | | Load 0x0,0x1a 0022 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 0023 e0aa | | Load 0x0,0xaa 0024 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0025 e402 | | Load 0x2,0x2 0026 0217 | | Execute Heap_Access,All_Reference 0027 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0028 780a |x | Jump 0x33 0029 e5ff | | Load 0x2,-0x1 002a e011 | | Load 0x0,0x11 002b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 002c 1816 | | Execute Package,Field_Execute,Field_Number 0x16 002d 8403 | | Call 0x2,0x3 002e e0aa | | Load 0x0,0xaa 002f 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0030 e402 | | Load 0x2,0x2 0031 0217 | | Execute Heap_Access,All_Reference 0032 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0033 e018 | | Load 0x0,0x18 0034 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0035 0f02 | | Execute_Immediate Equal,0x2 0036 6808 |h | Jump_Zero 0x3f 0037 4801 |H | Short_Literal 0x1 0038 e018 | | Load 0x0,0x18 0039 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 003a 01d7 | | Execute Vector,Field_Read 003b e402 | | Load 0x2,0x2 003c 0217 | | Execute Heap_Access,All_Reference 003d 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 003e 7804 |x | Jump 0x43 003f 4800 |H | Short_Literal 0x0 0040 e402 | | Load 0x2,0x2 0041 0217 | | Execute Heap_Access,All_Reference 0042 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0043 e018 | | Load 0x0,0x18 0044 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0045 e018 | | Load 0x0,0x18 0046 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0047 01d7 | | Execute Vector,Field_Read 0048 e402 | | Load 0x2,0x2 0049 0217 | | Execute Heap_Access,All_Reference 004a 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 004b e018 | | Load 0x0,0x18 004c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 004d e402 | | Load 0x2,0x2 004e 0217 | | Execute Heap_Access,All_Reference 004f 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0050 e02c | , | Load 0x0,0x2c 0051 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0052 e402 | | Load 0x2,0x2 0053 0217 | | Execute Heap_Access,All_Reference 0054 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0055 e5fe | | Load 0x2,-0x2 0056 e402 | | Load 0x2,0x2 0057 0217 | | Execute Heap_Access,All_Reference 0058 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0059 4503 |E | Exit_Suprogram New_Top_Offset 0x3 005a 0000 0000 | | .BLANK 0000[0x6] 0060 ; -------------------------------------------------------------------------------------- 0060 ; SUBPROGRAM 0060 ; -------------------------------------------------------------------------------------- 0060 0069 | i | .CONST 0x0069 ; Address of begin 0061 0004 | | .CONST 0x0004 ; Address of exception handler 0062 0004 | | .CONST 0x0004 ; Number of locals 0063 INIT_0060: 0063 4820 |H | Short_Literal 0x20 0064 e7ff | | Load 0x3,-0x1 0065 e01a | | Load 0x0,0x1a 0066 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0067 00e3 | | Load_Encached Natural_Cache 0068 00e3 | | Load_Encached Natural_Cache 0069 BODY_0060: 0069 e602 | | Load 0x3,0x2 006a 01db | | Execute Vector,Length 006b 7002 |p | Jump_Nonzero 0x6e 006c 00ea | | Load_Encached Null_String_Cache 006d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 006e e602 | | Load 0x3,0x2 006f 01dd | | Execute Vector,First 0070 c603 | | Store 0x3,0x3 0071 00cf | | Action Mark_Auxiliary 0072 780c |x | Jump 0x7f 0073 e603 | | Load 0x3,0x3 0074 e602 | | Load 0x3,0x2 0075 01d7 | | Execute Vector,Field_Read 0076 4809 |H | Short_Literal 0x9 0077 480a |H | Short_Literal 0xa 0078 0262 | b | Execute Discrete,In_Range 0079 7001 |p | Jump_Nonzero 0x7b 007a 7809 |x | Jump 0x84 007b e603 | | Load 0x3,0x3 007c 0a01 | | Execute_Immediate Plus,0x1 007d c603 | | Store 0x3,0x3 007e 00c9 | | Action Pop_Auxiliary_Loop 007f e603 | | Load 0x3,0x3 0080 e602 | | Load 0x3,0x2 0081 01dc | | Execute Vector,Last 0082 027a | z | Execute Discrete,Less_Equal 0083 77ef |w | Jump_Nonzero 0x73 0084 00ce | | Action Pop_Auxiliary 0085 e603 | | Load 0x3,0x3 0086 e602 | | Load 0x3,0x2 0087 01dc | | Execute Vector,Last 0088 027d | } | Execute Discrete,Greater 0089 6802 |h | Jump_Zero 0x8c 008a 00ea | | Load_Encached Null_String_Cache 008b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 008c e603 | | Load 0x3,0x3 008d 0a01 | | Execute_Immediate Plus,0x1 008e c604 | | Store 0x3,0x4 008f 00cf | | Action Mark_Auxiliary 0090 781f |x | Jump 0xb0 0091 e604 | | Load 0x3,0x4 0092 e602 | | Load 0x3,0x2 0093 01d7 | | Execute Vector,Field_Read 0094 00d8 | | Load_Top At_Offset_0 0095 4809 |H | Short_Literal 0x9 0096 480a |H | Short_Literal 0xa 0097 0262 | b | Execute Discrete,In_Range 0098 7006 |p | Jump_Nonzero 0x9f 0099 0f20 | | Execute_Immediate Equal,0x20 009a 7005 |p | Jump_Nonzero 0xa0 009b e604 | | Load 0x3,0x4 009c 0a01 | | Execute_Immediate Plus,0x1 009d c604 | | Store 0x3,0x4 009e 7810 |x | Jump 0xaf 009f 00d1 | | Pop_Control Pop_Count_1 00a0 4820 |H | Short_Literal 0x20 00a1 e603 | | Load 0x3,0x3 00a2 e604 | | Load 0x3,0x4 00a3 0aff | | Execute_Immediate Plus,-0x1 00a4 e602 | | Load 0x3,0x2 00a5 01cf | | Execute Vector,Slice_Read 00a6 01cb | | Execute Vector,Append 00a7 e604 | | Load 0x3,0x4 00a8 e602 | | Load 0x3,0x2 00a9 01dc | | Execute Vector,Last 00aa e602 | | Load 0x3,0x2 00ab 01cf | | Execute Vector,Slice_Read 00ac 8403 | | Call 0x2,0x3 00ad 01cc | | Execute Vector,Catenate 00ae 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00af 00c9 | | Action Pop_Auxiliary_Loop 00b0 e604 | | Load 0x3,0x4 00b1 e602 | | Load 0x3,0x2 00b2 01dc | | Execute Vector,Last 00b3 027a | z | Execute Discrete,Less_Equal 00b4 77dc |w | Jump_Nonzero 0x91 00b5 00ce | | Action Pop_Auxiliary 00b6 e603 | | Load 0x3,0x3 00b7 e602 | | Load 0x3,0x2 00b8 01dc | | Execute Vector,Last 00b9 e602 | | Load 0x3,0x2 00ba 01cf | | Execute Vector,Slice_Read 00bb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00bc 0000 0000 | | .BLANK 0000[0x4] 00c0 ; -------------------------------------------------------------------------------------- 00c0 ; Debug Table 00c0 ; -------------------------------------------------------------------------------------- 00c0 0004 000f | | .DEBUG4 0x0004,0x000f,0x4805,0x0000,0x0001,0x0000 00c6 cd7d b0fc | } | .XXX[0x13a] 00c8 adf8 a037 | 7| 00ca 40bf 1690 |@ | 00cc 5431 d4bd |T1 | 00ce 217f 99d0 |! | 00d0 a9f8 216d | !m| 00d2 9d5b 3290 | [2 | 00d4 5432 e4bc |T2 | 00d6 bc30 8802 | 0 | 00d8 b954 9834 | T 4| 00da 049c d804 | | 00dc 0c52 70f9 | Rp | 00de 1d58 3a99 | X: | 00e0 e237 8473 | 7 s| 00e2 d5d1 9180 | | 00e4 a41c 8804 | | 00e6 1d86 70fa | p | 00e8 e956 d235 | V 5| 00ea 4d5a 44bd |MZD | 00ec 7d7c 69d5 |}|i | 00ee c831 1d58 | 1 X| 00f0 8a98 5432 | T2| 00f2 78bc 5c3e |x \>| 00f4 e06a bd56 | j V| 00f6 4449 9d59 |DI Y| 00f8 8a98 c9d2 | | 00fa 4866 4c64 |HfLd| 00fc 21d5 8a61 |! a| 00fe 6006 fde2 |` | 0100 9159 aa9a | Y | 0102 2d5a 4866 |-ZHf| 0104 f066 8956 | f V| 0106 5299 9001 |R | 0108 9436 1d58 | 6 X| 010a 3a98 2c4e |: ,N| 010c 015b 5429 | [T)| 010e 69d0 aa12 |i | 0110 dd83 a88f | | 0112 08be 3c32 | <2| 0114 995a 44bc | ZD | 0116 a053 19d2 | S | 0118 9a9a 7e99 | ~ | 011a 11d2 1e99 | | 011c f416 78be | x | 011e 8d69 729b | ir | 0120 a057 dd82 | W | 0122 7a9a a29a |z | 0124 915a 3e99 | Z> | 0126 d936 617d | 6a}| 0128 115a 0d5a | Z Z| 012a e29a c299 | | 012c 7dd2 629a |} b | 012e e892 7d7d | }}| 0130 d249 0d63 | I c| 0132 08bd 8291 | | 0134 e1d1 5c56 | \V| 0136 ed59 b293 | Y | 0138 bdfa b558 | X| 013a 5e9b fe87 |^ | 013c f0f5 e9d9 | | 013e 5563 f5f9 |Uc | 0140 8299 d9d2 | | 0142 ca9b a052 | R| 0144 c559 ce90 | Y | 0146 c5f8 51e5 | Q | 0148 7dd2 3e98 |} > | 014a 5c36 c558 |\6 X| 014c 0299 c9d8 | | 014e 9420 569a | V | 0150 64bc 1c72 |d r| 0152 79d2 e4bd |y | 0154 70cf 99d3 |p | 0156 bdf8 829b | | 0158 fd54 8e3f | T ?| 015a c55f 329b | _2 | 015c c4b2 8957 | W| 015e b699 5698 | V | 0160 9a8e 49d0 | I | 0162 5e98 b63e |^ >| 0164 095c dcbd | \ | 0166 edd9 5261 | Ra| 0168 b803 9a98 | | 016a c5d0 d496 | | 016c 79d2 78bc |y x | 016e 1046 da9b | F | 0170 769a d983 |v | 0172 ba9a 49d2 | I | 0174 3e99 8496 |> | 0176 adf4 3647 | 6G| 0178 5698 7e9b |V ~ | 017a da99 a800 | | 017c 7562 629a |ubb | 017e 9692 c9f4 | | 0180 1244 e1fa | D | 0182 ad69 6e61 | ina| 0184 3960 3a9a |9`: | 0186 b692 4983 | I | 0188 5298 629c |R b | 018a e9fa 9e99 | | 018c 2a99 6467 |* dg| 018e a470 f962 | p b| 0190 44bf ecce |D | 0192 7298 8c8f |r | 0194 a06d 3962 | m9b| 0196 ca9a 4cc0 | L | 0198 5161 2438 |Qa$8| 019a 5d60 d8fc |]` | 019c 4478 7562 |Dxub| 019e 3e9b 1028 |> (| 01a0 5163 0010 |Qc | 01a2 9000 c69f | | 01a4 f814 4478 | Dx| 01a6 029f 5956 | YV| 01a8 b879 6962 | yib| 01aa e4be 9c4d | M| 01ac 69d2 00b4 |i | 01ae ee9c d40c | | 01b0 269d 6467 |& dg| 01b2 4a93 edd3 |J | 01b4 329b 404d |2 @M| 01b6 ba9b 4df8 | M | 01b8 ca9d 1a9c | | 01ba 469d 6160 |F a`| 01bc 5e98 f053 |^ S| 01be f5d0 6a9a | j | 01c0 1249 a660 | I `| 01c2 d29b a5d2 | | 01c4 ca9a 99ab | | 01c6 81f6 7d58 | }X| 01c8 3e64 329b |>d2 | 01ca e5d2 3e9a | > | 01cc 45bc a038 |E 8| 01ce f815 5e9f | ^ | 01d0 a17d 2698 | }& | 01d2 9e44 b9d6 | D | 01d4 6298 3daf |b = | 01d6 58c3 225d |X "]| 01d8 9a9d 29f8 | ) | 01da 529b f9f4 |R | 01dc 79d4 3a99 |y : | 01de c89b d5f6 | | 01e0 a04d be9d | M | 01e2 aa60 229d | `" | 01e4 469c b9d4 |F | 01e6 5e9a 1009 |^ | 01e8 04be a8d1 | | 01ea e5de 6163 | ac| 01ec 6053 c4de |`S | 01ee 964a 8d62 | J b| 01f0 10cc 3400 | 4 | 01f2 b1f7 40c0 | @ | 01f4 3045 71de |0Eq | 01f6 5a48 ddd4 |ZH | 01f8 04c1 c161 | a| 01fa 582b 8e48 |X+ H| 01fc 2651 95dd |&Q | 01fe f9de 4c3a | L:|