|
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 0080 | | .CONST 0x0080 ; 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 0039 | 9 | .CONST 0x0039 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0011 | | .CONST 0x0011 ; Number of locals
000b INIT_0008:
000b 00c4 | | Action Make_Default
000c 00c4 | | Action Make_Default
000d 00c4 | | Action Make_Default
000e 00c4 | | Action Make_Default
000f 00c4 | | Action Make_Default
0010 e001 | | Load 0x0,0x1
0011 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0012 0266 | f | Execute Discrete,Bounds
0013 e001 | | Load 0x0,0x1
0014 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0015 02a0 | | Declare_Subprogram Null_Subprogram
0016 4801 |H | Short_Literal 0x1
0017 035e | ^ | Declare_Type Array,Defined,Visible
0018 c210 | | Store 0x1,0x10
0019 4800 |H | Short_Literal 0x0
001a 4be8 |K | Short_Literal 0x3e8
001b 00e3 | | Load_Encached Natural_Cache
001c 03f9 | | Declare_Type Discrete,Constrained,Visible
001d c20e | | Store 0x1,0xe
001e e20e | | Load 0x1,0xe
001f 00d8 | | Load_Top At_Offset_0
0020 e001 | | Load 0x0,0x1
0021 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0022 e001 | | Load 0x0,0x1
0023 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0024 00e1 | | Load_Encached Boolean_Cache
0025 e210 | | Load 0x1,0x10
0026 4801 |H | Short_Literal 0x1
0027 4be8 |K | Short_Literal 0x3e8
0028 00e9 | | Load_Encached String_Cache
0029 034f | O | Declare_Type Array,Constrained,Visible,Bounds_With_Object
002a 4801 |H | Short_Literal 0x1
002b 4be8 |K | Short_Literal 0x3e8
002c 00e9 | | Load_Encached String_Cache
002d 034f | O | Declare_Type Array,Constrained,Visible,Bounds_With_Object
002e 029f 0043 | C| Declare_Subprogram INIT_0040,For_Call
0030 4800 |H | Short_Literal 0x0
0031 4802 |H | Short_Literal 0x2
0032 4804 |H | Short_Literal 0x4
0033 4800 |H | Short_Literal 0x0
0034 4802 |H | Short_Literal 0x2
0035 4802 |H | Short_Literal 0x2
0036 031e | | Declare_Type Variant_Record,Defined,Visible
0037 c211 | | Store 0x1,0x11
0038 00bf | | Action Accept_Activation
0039 BODY_0008:
0039 00bc | | Action Signal_Activated
003a 00bb | | Action Signal_Completion
003b 0000 0000 | | .BLANK 0000[0x5]
0040 ; --------------------------------------------------------------------------------------
0040 ; SUBPROGRAM
0040 ; --------------------------------------------------------------------------------------
0040 0043 | C | .CONST 0x0043 ; Address of begin
0041 0004 | | .CONST 0x0004 ; Address of exception handler
0042 0001 | | .CONST 0x0001 ; Number of locals
0043 BODY_0040:
0043 INIT_0040:
0043 4608 |F | Jump_Case 0x9
0044 7808 |x | Jump 0x4d ; case 0x0
0045 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0046 7831 |x1 | Jump 0x78 ; case 0x2
0047 7830 |x0 | Jump 0x78 ; case 0x3
0048 782f |x/ | Jump 0x78 ; case 0x4
0049 782e |x. | Jump 0x78 ; case 0x5
004a 782d |x- | Jump 0x78 ; case 0x6
004b 780e |x | Jump 0x5a ; case 0x7
004c 781b |x | Jump 0x68 ; case 0x8
004d e5ff | | Load 0x2,-0x1
004e 016c | l | Execute Variant_Record,Is_Constrained
004f 7009 |p | Jump_Nonzero 0x59
0050 00cf | | Action Mark_Auxiliary
0051 4be8 |K | Short_Literal 0x3e8
0052 4be8 |K | Short_Literal 0x3e8
0053 e5ff | | Load 0x2,-0x1
0054 1c08 | | Execute_Immediate Run_Utility,0x8
0055 00d8 | | Load_Top At_Offset_0
0056 1c00 | | Execute_Immediate Run_Utility,0x0
0057 c5ff | | Store 0x2,-0x1
0058 00ce | | Action Pop_Auxiliary
0059 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
005a e5fd | | Load 0x2,-0x3
005b e5fe | | Load 0x2,-0x2
005c 4801 |H | Short_Literal 0x1
005d e5fd | | Load 0x2,-0x3
005e 00e9 | | Load_Encached String_Cache
005f 035b | [ | Declare_Type Array,Constrained
0060 4801 |H | Short_Literal 0x1
0061 e5fe | | Load 0x2,-0x2
0062 00e9 | | Load_Encached String_Cache
0063 035b | [ | Declare_Type Array,Constrained
0064 4802 |H | Short_Literal 0x2
0065 e5ff | | Load 0x2,-0x1
0066 031b | | Declare_Type Variant_Record,Constrained
0067 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3
0068 e5fd | | Load 0x2,-0x3
0069 e5fe | | Load 0x2,-0x2
006a e5ff | | Load 0x2,-0x1
006b 02fc | | Declare_Variable Variant_Record,With_Constraint
006c 4801 |H | Short_Literal 0x1
006d e5fd | | Load 0x2,-0x3
006e 00e9 | | Load_Encached String_Cache
006f 0334 | 4 | Declare_Variable Array,With_Constraint
0070 2d07 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x7
0071 4801 |H | Short_Literal 0x1
0072 e5fe | | Load 0x2,-0x2
0073 00e9 | | Load_Encached String_Cache
0074 0334 | 4 | Declare_Variable Array,With_Constraint
0075 2d08 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x8
0076 016a | j | QQ_execute Variant_Record,XXX
0077 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3
0078 0869 | i | Execute_Immediate Raise,0x69
0079 0000 0000 | | .BLANK 0000[0x7]
0080 ; --------------------------------------------------------------------------------------
0080 ; Debug Table
0080 ; --------------------------------------------------------------------------------------
0080 0004 000f | | .DEBUG4 0x0004,0x000f,0x42fa,0x0000,0x0001,0x0000
0086 63df 1c65 |c e| .XXX[0x17a]
0088 0415 be08 | |
008a 5301 d55a |S Z|
008c 0400 1305 | |
008e 95bf b75f | _|
0090 8ed7 1ddb | |
0092 34fa 2b60 |4 +`|
0094 1dc1 2008 | |
0096 3682 d07d |6 }|
0098 db52 790f | Ry |
009a 34e9 ac1c |4 |
009c 123d f534 | = 4|
009e 00cb 6178 | ax|
00a0 c99a ed97 | |
00a2 1fb2 b9f6 | |
00a4 e6fc 2553 | %S|
00a6 036f 1d00 | o |
00a8 2480 8122 |$ "|
00aa 8060 23df | `# |
00ac 4e7b 69d4 |N{i |
00ae a1f0 efba | |
00b0 6576 cb9c |ev |
00b2 bb9d 7b6d | {m|
00b4 bced c89c | |
00b6 3754 f5dc |7T |
00b8 a5dc 9303 | |
00ba 7134 05c1 |q4 |
00bc 000a be41 | A|
00be 61b7 d2bd |a |
00c0 b822 f95d | " ]|
00c2 707f af15 |p |
00c4 f6c6 9dd6 | |
00c6 ee3b 5ca5 | ;\ |
00c8 ed72 bfb5 | r |
00ca d0f4 d3c1 | |
00cc de57 8358 | W X|
00ce 1557 c440 | W @|
00d0 0df3 747e | t~|
00d2 100e 92fb | |
00d4 426f 9091 |Bo |
00d6 e365 9f76 | e v|
00d8 7882 242e |x $.|
00da 437e feec |C~ |
00dc f424 35de | $5 |
00de 00d2 3005 | 0 |
00e0 f8ea 2b18 | + |
00e2 ef50 b792 | P |
00e4 d7f4 7ac2 | z |
00e6 1831 bf78 | 1 x|
00e8 e3f1 909e | |
00ea 4bc5 6141 |K aA|
00ec f7db 4078 | @x|
00ee 00cb 03ab | |
00f0 82d4 1424 | $|
00f2 45e1 cb54 |E T|
00f4 b966 5921 | fY!|
00f6 a240 5ee4 | @^ |
00f8 7538 c1df |u8 |
00fa 6439 d41f |d9 |
00fc 0433 9d0c | 3 |
00fe dcfa ea7f | |
0100 2362 fb84 |#b |
0102 1755 d7dc | U |
0104 c91c 8047 | G|
0106 7229 04c2 |r) |
0108 e641 101a | A |
010a a3c0 f253 | S|
010c 27af b7a2 |' |
010e bbfe 98ec | |
0110 f65f c966 | _ f|
0112 c022 161a | " |
0114 f6b7 72ad | r |
0116 f324 a3ca | $ |
0118 f676 0072 | v r|
011a 04eb 05ad | |
011c c6b0 fd4b | K|
011e b3c1 b442 | B|
0120 e22b 40c0 | +@ |
0122 c52b f19a | + |
0124 9fb1 a87b | {|
0126 d208 60da | ` |
0128 bf85 36f1 | 6 |
012a eb7c a3b4 | | |
012c 74e0 6207 |t b |
012e fce1 9c14 | |
0130 55d3 07a9 |U |
0132 5a39 6195 |Z9a |
0134 283f 383d |(?8=|
0136 d807 3458 | 4X|
0138 11bb 697e | i~|
013a 31d2 2b68 |1 +h|
013c 13ff 4fd2 | O |
013e 58b3 a66c |X l|
0140 75e4 8c13 |u |
0142 9474 214a | t!J|
0144 e3e7 97ae | |
0146 a309 0803 | |
0148 9101 4259 | BY|
014a 0c00 0016 | |
014c b520 5c13 | \ |
014e c03b d400 | ; |
0150 4270 05a3 |Bp |
0152 a855 0131 | U 1|
0154 ae34 072f | 4 /|
0156 3793 031f |7 |
0158 d26e 014c | n L|
015a 8f81 4977 | Iw|
015c 367a 3a44 |6z:D|
015e e42e d979 | . y|
0160 f0d6 01d0 | |
0162 01c0 8cb0 | |
0164 e248 0045 | H E|
0166 a27a 1c18 | z |
0168 082c 786a | ,xj|
016a 089d 311d | 1 |
016c cc79 9489 | y |
016e ea1d 85fe | |
0170 8fed 9ec7 | |
0172 fda7 2f0a | / |
0174 a6f6 60ce | ` |
0176 09d6 4401 | D |
0178 39bc fa0e |9 |
017a b29e ed68 | h|
017c 1169 b520 | i |
017e 01c7 b621 | !|
0180 3000 5a20 |0 Z |
0182 b03f 4046 | ?@F|
0184 8602 e23c | <|
0186 f7b5 9382 | |
0188 71ec 3dc3 |q = |
018a b84f 2e6d | O.m|
018c 800d 6fa6 | o |
018e f5e8 14f3 | |
0190 c31f 6201 | b |
0192 a610 0df5 | |
0194 e940 01c4 | @ |
0196 18c0 1de3 | |
0198 945f 828d | _ |
019a eed2 3c99 | < |
019c 51a8 59bb |Q Y |
019e 9a1a c183 | |
01a0 4491 61a5 |D a |
01a2 ed56 fe20 | V |
01a4 1903 059c | |
01a6 42e1 d604 |B |
01a8 44c2 1401 |D |
01aa c0c8 cbb9 | |
01ac 4aa0 2de1 |J - |
01ae 017a c886 | z |
01b0 2ebc da93 |. |
01b2 0494 0805 | |
01b4 2f84 cd21 |/ !|
01b6 f233 3c1d | 3< |
01b8 180e f4ee | |
01ba e153 0003 | S |
01bc 11ca 2284 | " |
01be 5c72 f976 |\r v|
01c0 0017 5130 | Q0|
01c2 0e00 be3c | <|
01c4 84c1 8b3d | =|
01c6 780b e4ac |x |
01c8 2c08 b025 |, %|
01ca f380 1fa1 | |
01cc 8d8e 03e4 | |
01ce 0600 0d53 | S|
01d0 33a8 03d0 |3 |
01d2 e403 435c | C\|
01d4 0244 59a5 | DY |
01d6 7064 2000 |pd |
01d8 e7e9 f6e6 | |
01da 5023 ff79 |P# y|
01dc 8c2f f2bd | / |
01de 03c1 ddb0 | |
01e0 3f87 0152 |? R|
01e2 03cb e800 | |
01e4 45f1 0a04 |E |
01e6 08fc e1c2 | |
01e8 6a5c cf02 |j\ |
01ea 0e6b bc06 | k |
01ec 6008 02c0 |` |
01ee 19df 0f48 | H|
01f0 0008 71c0 | q |
01f2 bdf4 107f | |
01f4 82a5 c205 | |
01f6 9140 0582 | @ |
01f8 c3cb 3410 | 4 |
01fa 1600 167f | |
01fc 046b e0ba | k |
01fe 5e3c 58cb |^<X |