|
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_063cfc
└─⟦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 0050 | P | .CONST 0x0050 ; 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 0026 | & | .CONST 0x0026 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0013 | | .CONST 0x0013 ; 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 00c4 | | Action Make_Default
0011 00c4 | | Action Make_Default
0012 e001 | | Load 0x0,0x1
0013 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0014 0129 | ) | Execute Any,Make_Visible
0015 c211 | | Store 0x1,0x11
0016 029a 002b | +| Declare_Subprogram INIT_0028,For_Outer_Call,Visible,Unelaborated
0018 c212 | | Store 0x1,0x12
0019 029a 003b | ;| Declare_Subprogram INIT_0038,For_Outer_Call,Visible,Unelaborated
001b c213 | | Store 0x1,0x13
001c 029a 0043 | C| Declare_Subprogram INIT_0040,For_Outer_Call,Visible,Unelaborated
001e c210 | | Store 0x1,0x10
001f 00bf | | Action Accept_Activation
0020 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0021 00c7 | | Action Elaborate_Subprogram
0022 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0023 00c7 | | Action Elaborate_Subprogram
0024 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0025 00c7 | | Action Elaborate_Subprogram
0026 BODY_0008:
0026 00bc | | Action Signal_Activated
0027 00bb | | Action Signal_Completion
0028 ; --------------------------------------------------------------------------------------
0028 ; SUBPROGRAM
0028 ; --------------------------------------------------------------------------------------
0028 002b | + | .CONST 0x002b ; Address of begin
0029 0004 | | .CONST 0x0004 ; Address of exception handler
002a 0001 | | .CONST 0x0001 ; Number of locals
002b BODY_0028:
002b INIT_0028:
002b 480a |H | Short_Literal 0xa
002c 00db | | Load_Top At_Offset_3
002d 01cb | | Execute Vector,Append
002e e5fe | | Load 0x2,-0x2
002f e001 | | Load 0x0,0x1
0030 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0031 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0032 0000 0000 | | .BLANK 0000[0x6]
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 003b | ; | .CONST 0x003b ; Address of begin
0039 0004 | | .CONST 0x0004 ; Address of exception handler
003a 0001 | | .CONST 0x0001 ; Number of locals
003b BODY_0038:
003b INIT_0038:
003b 00da | | Load_Top At_Offset_2
003c e5fe | | Load 0x2,-0x2
003d e001 | | Load 0x0,0x1
003e 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
003f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
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 00da | | Load_Top At_Offset_2
0044 e001 | | Load 0x0,0x1
0045 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0046 6804 |h | Jump_Zero 0x4b
0047 00da | | Load_Top At_Offset_2
0048 e001 | | Load 0x0,0x1
0049 1819 | | Execute Package,Field_Execute,Field_Number 0x19
004a c5ff | | Store 0x2,-0x1
004b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
004c 0000 0000 | | .BLANK 0000[0x4]
0050 ; --------------------------------------------------------------------------------------
0050 ; Debug Table
0050 ; --------------------------------------------------------------------------------------
0050 0004 000d | | .DEBUG4 0x0004,0x000d,0x91c0,0x0000,0x0001,0x0000
0056 f5ef cfb9 | | .XXX[0x1aa]
0058 4070 0226 |@p &|
005a 4158 faf5 |AX |
005c 8c1b 6000 | ` |
005e 05c8 02f1 | |
0060 db79 efcd | y |
0062 39ef e000 |9 |
0064 d991 7628 | v(|
0066 35b0 b4f8 |5 |
0068 038e 9af9 | |
006a dc51 9f2d | Q -|
006c 525e d80f |R^ |
006e 9c28 04d8 | ( |
0070 0356 b405 | V |
0072 f965 08c6 | e |
0074 9c8d 5168 | Qh|
0076 6003 0012 |` |
0078 1005 8900 | |
007a 7fb2 a2ba | |
007c d31c 40d9 | @ |
007e 0100 8003 | |
0080 62ab 3392 |b 3 |
0082 93cf 3a24 | :$|
0084 04d9 c0c8 | |
0086 8001 a402 | |
0088 eb78 0a71 | x q|
008a f1fc 1cdb | |
008c c0c8 87c0 | |
008e 4770 137e |Gp ~|
0090 f0cf 092d | -|
0092 0189 3b04 | ; |
0094 8c7b 6002 | {` |
0096 f208 00c0 | |
0098 05c3 ec1d | |
009a beb1 c949 | I|
009c d300 5003 | P |
009e e088 0134 | 4|
00a0 023a 8b06 | : |
00a2 9c5f 6101 | _a |
00a4 5e04 0120 |^ |
00a6 05cb 382d | 8-|
00a8 7f05 1c24 | $|
00aa 2300 57c2 |# W |
00ac 866f c3fc | o |
00ae 5632 3801 |V28 |
00b0 8005 9ce4 | |
00b2 3d3e f59c |=> |
00b4 7821 0059 |x! Y|
00b6 82dc 2fc5 | / |
00b8 07cb 19f7 | |
00ba 4c88 017c |L ||
00bc 00e9 af0e | |
00be aed2 73dd | s |
00c0 43c0 1663 |C c|
00c2 a120 f192 | |
00c4 4034 e020 |@4 |
00c6 2000 6100 | a |
00c8 28fb c6c9 |( |
00ca 20db 42b0 | B |
00cc 8001 9f00 | |
00ce 45bd 7367 |E sg|
00d0 9d0c 062e | .|
00d2 ba55 5fc6 | U_ |
00d4 a104 db43 | C|
00d6 f3c9 b19d | |
00d8 f216 4437 | D7|
00da 1028 2000 | ( |
00dc 6943 e9c7 |iC |
00de c6c1 10d9 | |
00e0 c359 03c1 | Y |
00e2 b8e4 683c | h<|
00e4 5590 0c14 |U |
00e6 4c0a 801a |L |
00e8 a3b5 e9f1 | |
00ea 5a40 36f0 |Z@6 |
00ec e9f8 f0c5 | |
00ee 1f1d 5c8f | \ |
00f0 6702 2e00 |g . |
00f2 0383 bdb5 | |
00f4 f1ea 4434 | D4|
00f6 1170 fa01 | p |
00f8 c562 5d98 | b] |
00fa 0de5 1c01 | |
00fc 8022 c2ae | " |
00fe eae4 81fc | |
0100 8010 01e5 | |
0102 02fe dc7e | ~|
0104 52fa 3560 |R 5`|
0106 db41 aa0f | A |
0108 5145 3cdb |QE< |
010a 80d8 9003 | |
010c 2102 bc77 |! w|
010e 1e83 c0aa | |
0110 f3ba 3432 | 42|
0112 5369 159c |Si |
0114 da80 5e83 | ^ |
0116 cafc cab2 | |
0118 5c34 2012 |\4 |
011a a2f3 0fe5 | |
011c e643 a6a1 | C |
011e f2c5 75d1 | u |
0120 a80f 7050 | pP|
0122 cb40 b16c | @ l|
0124 e129 f1b9 | ) |
0126 ec31 339e | 13 |
0128 8108 53bf | S |
012a 5c78 0c7b |\x {|
012c e4bd fc78 | x|
012e 8c0e bddb | |
0130 96ac 3753 | 7S|
0132 8cc6 d55d | ]|
0134 0718 bfcf | |
0136 9ae4 d23c | <|
0138 ac7c 0f87 | | |
013a e4bc 7d84 | } |
013c 8c0d 83d4 | |
013e bd3d ec8c | = |
0140 0f16 e766 | f|
0142 8834 5133 | 4Q3|
0144 dcc1 dcbb | |
0146 34bf 2f20 |4 / |
0148 02b6 f429 | )|
014a a40f 9ec0 | |
014c 7ac0 90b8 |z |
014e 026b d8f3 | k |
0150 f2fc 1fc1 | |
0152 b300 4701 | G |
0154 d888 ab1e | |
0156 40d8 0128 |@ (|
0158 7002 1e02 |p |
015a b86e 6cd3 | nl |
015c 97da 08d9 | |
015e c0c8 07d1 | |
0160 1751 3380 | Q3 |
0162 0bc0 43a6 | C |
0164 14db c1f4 | |
0166 7001 b6b1 |p |
0168 e6df 415c | A\|
016a 636a 03c5 |cj |
016c c003 1008 | |
016e 66cd 0b3f |f ?|
0170 43fc 7768 |C wh|
0172 02e5 c347 | G|
0174 cea8 68f5 | h |
0176 17fc c070 | p|
0178 0366 0512 | f |
017a ff44 8c7b | D {|
017c 6f02 5103 |o Q |
017e 48be a6ab |H |
0180 b924 be2d | $ -|
0182 b00e 7c0d | | |
0184 27be a13f |' ?|
0186 d3a7 14db | |
0188 43af 3408 |C 4 |
018a e8b8 93b3 | |
018c 4b0c 4b6c |K Kl|
018e 0315 c003 | |
0190 300b 39a9 |0 9 |
0192 2d7d 85b0 |-} |
0194 0c7a 0c16 | z |
0196 2bfb 4bd1 |+ K |
0198 ff1c db00 | |
019a b162 8310 | b |
019c 714a 3f4b |qJ?K|
019e 8c20 1d00 | |
01a0 8843 a4e7 | C |
01a2 d4bc f4ad | |
01a4 c400 a00b | |
01a6 c48d 573f | W?|
01a8 4f2f ba2d |O/ -|
01aa 014e 9355 | N U|
01ac 5c8f 6d03 |\ m |
01ae bb38 2011 | 8 |
01b0 c97c f59a | | |
01b2 c037 f0b0 | 7 |
01b4 1d00 8d00 | |
01b6 225b d640 |"[ @|
01b8 04de 00c2 | |
01ba 93d6 4c35 | L5|
01bc 6e3c 69c0 |n<i |
01be 0caa f48e | |
01c0 c31f 27d5 | ' |
01c2 e8c0 ac3f | ?|
01c4 e078 0241 | x A|
01c6 0012 1f5d | ]|
01c8 9c17 7203 | r |
01ca d579 61e8 | ya |
01cc 15fc f56f | o|
01ce 0034 c05c | 4 \|
01d0 1e00 9a02 | |
01d2 cc57 daa8 | W |
01d4 ba31 f801 | 1 |
01d6 b00a 7c71 | |q|
01d8 8ebc 4102 | A |
01da cdcc 7c9d | | |
01dc c3b5 23d8 | # |
01de ac04 de83 | |
01e0 1070 028e | p |
01e2 0102 ff4d | M|
01e4 5c8f 7301 |\ s |
01e6 4dc4 0153 |M S|
01e8 2a13 f59e |* |
01ea 3c65 c00e |<e |
01ec 4ce8 afc3 |L |
01ee ecc7 d9ed | |
01f0 c07f f01c | |
01f2 7c02 b003 || |
01f4 0223 676c | #gl|
01f6 2f71 011d |/q |
01f8 c402 d008 | |
01fa 2bd5 b27c |+ ||
01fc 4dc0 0f2f |M /|
01fe 05b4 fc7f | |