|
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 0060 | ` | .CONST 0x0060 ; 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 000d | | .CONST 0x000d ; Address of begin
0009 0046 | F | .CONST 0x0046 ; Address of exception handler
000a 0002 | | .CONST 0x0002 ; Number of locals
000b INIT_0008:
000b 029f 0053 | S| Declare_Subprogram INIT_0050,For_Call
000d BODY_0008:
000d 00db | | Load_Top At_Offset_3
000e 8251 | Q | Call 0x1,0x51
000f e012 | | Load 0x0,0x12
0010 1872 | r | Execute Package,Field_Execute,Field_Number 0x72
0011 e012 | | Load 0x0,0x12
0012 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0013 0aff | | Execute_Immediate Plus,-0x1
0014 460a |F | Jump_Case 0xb
0015 780c |x | Jump 0x22 ; case 0x0
0016 7809 |x | Jump 0x20 ; case 0x1
0017 7808 |x | Jump 0x20 ; case 0x2
0018 7807 |x | Jump 0x20 ; case 0x3
0019 7819 |x | Jump 0x33 ; case 0x4
001a 7805 |x | Jump 0x20 ; case 0x5
001b 7804 |x | Jump 0x20 ; case 0x6
001c 7803 |x | Jump 0x20 ; case 0x7
001d 7802 |x | Jump 0x20 ; case 0x8
001e 7801 |x | Jump 0x20 ; case 0x9
001f 7800 |x | Jump 0x20 ; case 0xa
0020 e213 | | Load 0x1,0x13
0021 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0022 8402 | | Call 0x2,0x2
0023 4608 |F | Jump_Case 0x9
0024 780c |x | Jump 0x31 ; case 0x0
0025 7809 |x | Jump 0x2f ; case 0x1
0026 7808 |x | Jump 0x2f ; case 0x2
0027 7805 |x | Jump 0x2d ; case 0x3
0028 7804 |x | Jump 0x2d ; case 0x4
0029 7803 |x | Jump 0x2d ; case 0x5
002a 7802 |x | Jump 0x2d ; case 0x6
002b 7801 |x | Jump 0x2d ; case 0x7
002c 7800 |x | Jump 0x2d ; case 0x8
002d e212 | | Load 0x1,0x12
002e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
002f e20f | | Load 0x1,0xf
0030 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0031 e213 | | Load 0x1,0x13
0032 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0033 8402 | | Call 0x2,0x2
0034 4608 |F | Jump_Case 0x9
0035 780e |x | Jump 0x44 ; case 0x0
0036 7809 |x | Jump 0x40 ; case 0x1
0037 7808 |x | Jump 0x40 ; case 0x2
0038 7809 |x | Jump 0x42 ; case 0x3
0039 7804 |x | Jump 0x3e ; case 0x4
003a 7803 |x | Jump 0x3e ; case 0x5
003b 7802 |x | Jump 0x3e ; case 0x6
003c 7801 |x | Jump 0x3e ; case 0x7
003d 7800 |x | Jump 0x3e ; case 0x8
003e e211 | | Load 0x1,0x11
003f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0040 e20e | | Load 0x1,0xe
0041 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0042 e210 | | Load 0x1,0x10
0043 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0044 e213 | | Load 0x1,0x13
0045 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0046 TRAP_0008:
0046 0007 | | Action Break_Optional
0047 e213 | | Load 0x1,0x13
0048 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0049 0000 0000 | | .BLANK 0000[0x7]
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 0053 | S | .CONST 0x0053 ; Address of begin
0051 005a | Z | .CONST 0x005a ; Address of exception handler
0052 0001 | | .CONST 0x0001 ; Number of locals
0053 BODY_0050:
0053 INIT_0050:
0053 e5ff | | Load 0x2,-0x1
0054 e00c | | Load 0x0,0xc
0055 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0056 e01a | | Load 0x0,0x1a
0057 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0058 1c02 | | Execute_Immediate Run_Utility,0x2
0059 00ca | | Action Exit_Nullary_Function
005a TRAP_0050:
005a 010e | | Execute Exception,Is_Constraint_Error
005b 6802 |h | Jump_Zero 0x5e
005c 4800 |H | Short_Literal 0x0
005d 00ca | | Action Exit_Nullary_Function
005e 0100 | | Execute Exception,Raise
005f 0000 | | .XXX[0x1]
0060 ; --------------------------------------------------------------------------------------
0060 ; Debug Table
0060 ; --------------------------------------------------------------------------------------
0060 0004 0012 | | .DEBUG4 0x0004,0x0012,0xc6ed,0x0000,0x0001,0x0000
0066 821f a6ba | | .XXX[0x19a]
0068 282e 8e1f |(. |
006a 5539 fcbf |U9 |
006c 1eab 44b1 | D |
006e 01dd e0b4 | |
0070 3872 7c27 |8r|'|
0072 8448 2c07 | H, |
0074 f40e 921e | |
0076 9212 282e | (.|
0078 c21e d844 | D|
007a 6ebc 2840 |n (@|
007c cec2 ec70 | p|
007e e2c2 9da9 | |
0080 e19a a0d1 | |
0082 3c78 fc16 |<x |
0084 3432 9a9e |42 |
0086 fe1c 8a1b | |
0088 a85b 4576 | [Ev|
008a 921d 3501 | 5 |
008c b1fa 5cf0 | \ |
008e 889d d8ed | |
0090 e19a 8463 | c|
0092 42bc c64d |B M|
0094 6277 f833 |bw 3|
0096 461d b874 |F t|
0098 1967 561f | gV |
009a c9de 9211 | |
009c 8c87 421f | B |
009e 0493 9a1c | |
00a0 c196 e6ad | |
00a2 92c3 d505 | |
00a4 a847 761f | Gv |
00a6 8e1f d03b | ;|
00a8 961d 1ebf | |
00aa 761f a21d |v |
00ac bac3 aa1d | |
00ae c873 b21d | s |
00b0 bc63 be1c | c |
00b2 5abe 268d |Z & |
00b4 88bd 1847 | G|
00b6 25d7 da1d |% |
00b8 c607 561f | V |
00ba d61d 51ff | Q |
00bc f21e 92b6 | |
00be fab4 2c1a | , |
00c0 68ea 7c26 |h |&|
00c2 dea8 829f | |
00c4 2454 1222 |$T "|
00c6 0e4a 2642 | J&B|
00c8 22c0 5806 |" X |
00ca c400 5c30 | \0|
00cc 39a0 ec25 |9 %|
00ce 76bc 30c4 |v 0 |
00d0 3a21 f46c |:! l|
00d2 5221 b960 |R! `|
00d4 4e23 946a |N# j|
00d6 687f fc22 |h "|
00d8 deb0 9ec3 | |
00da b8e8 6e20 | n |
00dc c947 69bc | Gi |
00de 7a23 5c17 |z#\ |
00e0 34c3 3cdc |4 < |
00e2 8a22 6eae | "n |
00e4 2293 89d0 |" |
00e6 9e22 bcc2 | " |
00e8 6c50 a851 |lP Q|
00ea 3c04 b222 |< "|
00ec 56bf 9e85 |V |
00ee 3c04 c223 |< #|
00f0 888f ca9f | |
00f2 1eab 4e41 | NA|
00f4 2c9c 5807 |, X |
00f6 7c02 893b || ;|
00f8 b103 a64d | M|
00fa 82b1 e1ac | |
00fc 6450 fe20 |dP |
00fe 39c1 f270 |9 p|
0100 1c61 0e23 | a #|
0102 e60c e215 | |
0104 e915 2221 | "!|
0106 9e21 e110 | ! |
0108 8419 61e1 | a |
010a 9e79 ec35 | y 5|
010c 4220 cd4c |B L|
010e 14d1 ca79 | y|
0110 b43c 96ba | < |
0112 8451 91e0 | Q |
0114 9e05 143c | <|
0116 bab9 7220 | r |
0118 d62d 7049 | -pI|
011a ea79 5622 | yV"|
011c 8255 9c31 | U 1|
011e 2a45 ad34 |*E 4|
0120 88bd a223 | #|
0122 8906 3a53 | :S|
0124 c0bf 4ac3 | J |
0126 c02a f451 | * Q|
0128 d5e1 2c3a | ,:|
012a debe 8a4b | K|
012c 5c7b 3c52 |\{<R|
012e 6c0a ca4a |l J|
0130 4a93 c489 |J |
0132 42a7 d08a |B |
0134 56a7 dc89 |V |
0136 9170 7d09 | p} |
0138 9972 5e4b | r^K|
013a 75d7 299e |u ) |
013c 6855 c173 |hU s|
013e 89d7 0a4b | K|
0140 91d4 5dcb | ] |
0142 99d5 2171 | !q|
0144 72a7 cac3 |r |
0146 a64b a58f | K |
0148 3248 4c8f |2HL |
014a 5a48 3dc7 |ZH= |
014c 424a 084f |BJ O|
014e 2e72 9407 |.r |
0150 5249 3a68 |RI:h|
0152 9030 2a33 | 0*3|
0154 e1d4 c521 | !|
0156 1508 6676 | fv|
0158 70c6 d214 |p |
015a f9cb 6d4b | mK|
015c 7e49 8216 |~I |
015e 3573 7441 |5stA|
0160 d431 6464 | 1dd|
0162 88be 4573 | Es|
0164 964a 4d73 | JMs|
0166 1ea8 cc7f | |
0168 2e72 cc04 |.r |
016a 1151 e181 | Q |
016c 6460 45d9 |d`E |
016e c243 c64b | C K|
0170 4971 25da |Iq% |
0172 8570 9a4d | p M|
0174 0441 35d8 | A5 |
0176 02c7 e648 | H|
0178 75da 00c4 |u |
017a 65c8 81db |e |
017c 25e2 3c1c |% < |
017e 1518 064e | N|
0180 3242 a07f |2B |
0182 39e0 1a4d |9 M|
0184 e909 663e | f>|
0186 dd72 3241 | r2A|
0188 1c2f 4652 | /FR|
018a 0908 3e4e | >N|
018c 7ea0 464e |~ FN|
018e 86a2 bc51 | Q|
0190 8964 62a7 | db |
0192 ec32 7d6c | 2}l|
0194 b5ff d95e | ^|
0196 3581 12c4 |5 |
0198 84b7 3173 | 1s|
019a 75e0 cec6 |u |
019c 6d70 e2a5 |mp |
019e 1dd8 dec7 | |
01a0 ce48 e567 | H g|
01a2 29f8 9e4d |) M|
01a4 a10a d1d7 | |
01a6 6572 ee44 |er D|
01a8 cea5 ca23 | #|
01aa 7250 a802 |rP |
01ac 9025 5dc1 | %] |
01ae 2ccd c900 |, |
01b0 ce4e cd09 | N |
01b2 6dd8 da4c |m L|
01b4 f24f c572 | O r|
01b6 e08c ea4d | M|
01b8 85db c573 | s|
01ba 5902 81b7 |Y |
01bc 9252 0431 | R 1|
01be a1d8 6c55 | lU|
01c0 a9db 388f | 8 |
01c2 3807 310b |8 1 |
01c4 f573 508f | sP |
01c6 1469 2a4e | i*N|
01c8 e811 324f | 2O|
01ca b08d 3a4d | :M|
01cc 85b5 d9d9 | |
01ce 2031 4a4d | 1JM|
01d0 1e23 710a | #q |
01d2 01da 3018 | 0 |
01d4 0886 a292 | |
01d6 01da 6804 | h |
01d8 4976 5092 |IvP |
01da 9577 a509 | w |
01dc fe79 864d | y M|
01de 58c2 29d8 |X ) |
01e0 746e 31d8 |tn1 |
01e2 1598 8174 | t|
01e4 8206 45d8 | E |
01e6 9176 6c2d | vl-|
01e8 e135 54a2 | 5T |
01ea 59db 4c57 |Y LW|
01ec f109 70a1 | p |
01ee ca4f 014a | O J|
01f0 9061 d64d | a M|
01f2 c297 5cea | \ |
01f4 164d e64d | M M|
01f6 d5cc 5804 | X |
01f8 dd76 ed82 | v |
01fa 99da 0ce2 | |
01fc 024f 2946 | O)F|
01fe da8c f974 | t|