|
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_03bcfe
└─⟦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 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 2cec a405 |, | .XXX[0x53] 00c8 0ac4 0744 | D| 00ca 0acc 2e4d | .M| 00cc 2c2c 4d8c |,,M | 00ce abea 6e8e | n | 00d0 4d2d cce5 |M- | 00d2 240e 4cae |$ L | 00d4 8eae 4dc4 | M | 00d6 0a6e 8e4d | n M| 00d8 2dcc e760 |- `| 00da 0000 0180 | | 00dc 0000 06a4 | | 00de 040c cead | | 00e0 cc6e 8d2d | n -| 00e2 edc4 092d | -| 00e4 ac2c eca4 | , | 00e6 050a c407 | | 00e8 440a cc2e |D .| 00ea 4d2c 2c4d |M,,M| 00ec 8cab ea6e | n| 00ee 8e4d 2dcc | M- | 00f0 e524 0e4c | $ L| 00f2 ae8e ae4d | M| 00f4 c40a 6e8e | n | 00f6 4d2d cce7 |M- | 00f8 6000 0001 |` | 00fa 8000 0006 | | 00fc a404 0cce | | 00fe adcc 6e8d | n | 0100 2ded c409 |- | 0102 2dac 2cec |- , | 0104 a405 0ac4 | | 0106 0744 0acc | D | 0108 2e4d 2c2c |.M,,| 010a 4d8c abea |M | 010c 6e8e 4d2d |n M-| 010e cce5 240e | $ | 0110 4cae 8eae |L | 0112 4dc4 0a6e |M n| 0114 8e4d 2dcc | M- | 0116 e760 0000 | ` | 0118 0020 | | 0119 0000 0000 | | .BLANK 0000[0x5] 011e 0840 0000 | @ | .XXX[0x6e] 0120 0000 0000 | | 0122 0820 0000 | | 0124 08a0 0000 | | 0126 0768 6ded | hm | 0128 cecc ae4e | N| 012a 8e64 0e8d | d | 012c 0ca4 0ecc | | 012e 2e4d 2c2c |.M,,| 0130 4d8c a40e |M | 0132 6e8e 4d2d |n M-| 0134 cce4 0d2d | -| 0136 ce8d e40c | | 0138 2dc4 082c |- ,| 013a 8c24 0e0e | $ | 013c 4cac 8cac |L | 013e cd2d ccac | - | 0140 840e 6e8e | n | 0142 4d2d cce5 |M- | 0144 c000 0008 | | 0146 6000 0007 |` | 0148 a404 086d | m| 014a edce ccae | | 014c 4e8e 640e |N d | 014e 8d0c a40e | | 0150 cc2e 4d2c | .M,| 0152 2c4d 8ca4 |,M | 0154 0e6e 8e4d | n M| 0156 2dcc e40d |- | 0158 2dce 8de4 |- | 015a 0c2d c408 | - | 015c 2c8c 240e |, $ | 015e 0e4c ac8c | L | 0160 accd 2dcc | - | 0162 ac84 0e6e | n| 0164 8e4d 2dcc | M- | 0166 e5c0 0000 | | 0168 0860 0000 | ` | 016a 07a4 0408 | | 016c 6ded cecc |m | 016e ae4e 8e64 | N d| 0170 0e8d 0ca4 | | 0172 0ecc 2e4d | .M| 0174 2c2c 4d8c |,,M | 0176 a40e 6e8e | n | 0178 4d2d cce4 |M- | 017a 0d2d ce8d | - | 017c e40c 2dc4 | - | 017e 082c 8c24 | , $| 0180 0e0e 4cac | L | 0182 8cac cd2d | -| 0184 ccac 840e | | 0186 6e8e 4d2d |n M-| 0188 cce5 c000 | | 018a 0000 2000 | | 018c 0000 0000 | | .BLANK 0000[0x5] 0191 2000 | | .XXX[0x1] 0192 0000 0000 | | .BLANK 0000[0x5] 0197 8000 0008 | | .XXX[0x69] 0199 6a8d 0d2e |j .| 019b 640c cead |d | 019d cc6e 8d2d | n -| 019f edc4 0c6d | m| 01a1 edce ccae | | 01a3 4e8e 640c |N d | 01a5 2dc4 0dec |- | 01a7 4d4c ac6e |ML n| 01a9 840d ecc4 | | 01ab 0e8d 0ca4 | | 01ad 0acc 2e4d | .M| 01af 2c2c 4d8c |,,M | 01b1 abea 6e8e | n | 01b3 4d2d cce4 |M- | 01b5 0e8f 2e0c | . | 01b7 a40e 8de4 | | 01b9 0e8d 0ca0 | | 01bb 0000 0040 | @| 01bd 0000 08a4 | | 01bf 040a 8d0d | | 01c1 2e64 0cce |.d | 01c3 adcc 6e8d | n | 01c5 2ded c40c |- | 01c7 6ded cecc |m | 01c9 ae4e 8e64 | N d| 01cb 0c2d c40d | - | 01cd ec4d 4cac | ML | 01cf 6e84 0dec |n | 01d1 c40e 8d0c | | 01d3 a40a cc2e | .| 01d5 4d2c 2c4d |M,,M| 01d7 8cab ea6e | n| 01d9 8e4d 2dcc | M- | 01db e40e 8f2e | .| 01dd 0ca4 0e8d | | 01df e40e 8d0c | | 01e1 a000 0000 | | 01e3 4000 0008 |@ | 01e5 a404 0a8d | | 01e7 0d2e 640c | .d | 01e9 cead cc6e | n| 01eb 8d2d edc4 | - | 01ed 0c6d edce | m | 01ef ccae 4e8e | N | 01f1 640c 2dc4 |d - | 01f3 0dec 4d4c | ML| 01f5 ac6e 840d | n | 01f7 ecc4 0e8d | | 01f9 0ca4 0acc | | 01fb 2e4d 2c2c |.M,,| 01fd 4d8c abea |M | 01ff 6e8e |n |