|
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_5e40f2
└─⟦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 0058 | X | .CONST 0x0058 ; 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 0010 | | .CONST 0x0010 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0001 | | .CONST 0x0001 ; Number of locals
000b INIT_0008:
000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated
000d 00bf | | Action Accept_Activation
000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd
000f 00c7 | | Action Elaborate_Subprogram
0010 BODY_0008:
0010 00bc | | Action Signal_Activated
0011 00bb | | Action Signal_Completion
0012 0000 0000 | | .BLANK 0000[0x6]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 0029 | ) | .CONST 0x0029 ; Address of begin
0019 0047 | G | .CONST 0x0047 ; Address of exception handler
001a 0007 | | .CONST 0x0007 ; Number of locals
001b INIT_0018:
001b e001 | | Load 0x0,0x1
001c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
001d 02c7 | | Declare_Variable Any
001e 00d8 | | Load_Top At_Offset_0
001f 1c00 | | Execute_Immediate Run_Utility,0x0
0020 4801 |H | Short_Literal 0x1
0021 4801 |H | Short_Literal 0x1
0022 00e9 | | Load_Encached String_Cache
0023 035b | [ | Declare_Type Array,Constrained
0024 0337 | 7 | Declare_Variable Array
0025 00e3 | | Load_Encached Natural_Cache
0026 00e1 | | Load_Encached Boolean_Cache
0027 03e9 | | Declare_Variable Discrete,Duplicate
0028 03e9 | | Declare_Variable Discrete,Duplicate
0029 BODY_0018:
0029 e402 | | Load 0x2,0x2
002a 00ea | | Load_Encached Null_String_Cache
002b e5ff | | Load 0x2,-0x1
002c 4800 |H | Short_Literal 0x0
002d e001 | | Load 0x0,0x1
002e 1815 | | Execute Package,Field_Execute,Field_Number 0x15
002f c402 | | Store 0x2,0x2
0030 00e1 | | Load_Encached Boolean_Cache
0031 00e1 | | Load_Encached Boolean_Cache
0032 00e1 | | Load_Encached Boolean_Cache
0033 00e3 | | Load_Encached Natural_Cache
0034 e403 | | Load 0x2,0x3
0035 e402 | | Load 0x2,0x2
0036 e001 | | Load 0x0,0x1
0037 1868 | h | Execute Package,Field_Execute,Field_Number 0x68
0038 00d1 | | Pop_Control Pop_Count_1
0039 c404 | | Store 0x2,0x4
003a c405 | | Store 0x2,0x5
003b 005b | [ | Store_Top Discrete,At_Offset_3
003c 0059 | Y | Store_Top Discrete,At_Offset_1
003d e402 | | Load 0x2,0x2
003e e001 | | Load 0x0,0x1
003f 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0040 c402 | | Store 0x2,0x2
0041 00db | | Load_Top At_Offset_3
0042 7002 |p | Jump_Nonzero 0x45
0043 00d8 | | Load_Top At_Offset_0
0044 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0045 4800 |H | Short_Literal 0x0
0046 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0047 TRAP_0018:
0047 0007 | | Action Break_Optional
0048 e402 | | Load 0x2,0x2
0049 e001 | | Load 0x0,0x1
004a 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
004b 6804 |h | Jump_Zero 0x50
004c e402 | | Load 0x2,0x2
004d e001 | | Load 0x0,0x1
004e 181b | | Execute Package,Field_Execute,Field_Number 0x1b
004f c402 | | Store 0x2,0x2
0050 4801 |H | Short_Literal 0x1
0051 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0052 0000 0000 | | .BLANK 0000[0x6]
0058 ; --------------------------------------------------------------------------------------
0058 ; Debug Table
0058 ; --------------------------------------------------------------------------------------
0058 0004 000d | | .DEBUG4 0x0004,0x000d,0x9717,0x0000,0x0001,0x0000
005e f81b ac1e | | .XXX[0x1a2]
0060 422d f81a |B- |
0062 0f1c 61a0 | a |
0064 1ac2 2a10 | * |
0066 201c ab91 | |
0068 415d a040 |A] @|
006a 3ba2 c42a |; *|
006c 0f10 21a1 | ! |
006e 127a 2a10 | z* |
0070 201c ab91 | |
0072 415d a1a8 |A] |
0074 3ba2 742a |; t*|
0076 0f10 2179 | !y|
0078 7f27 0f20 | ' |
007a b800 015d | ]|
007c 5a2d d812 |Z- |
007e 2df8 220d |- " |
0080 f028 81d4 | ( |
0082 1a2d 1013 | - |
0084 ac1a 422d | B-|
0086 1010 0f1a | |
0088 251b 9b1d |% |
008a 1bf0 5003 | P |
008c 1d1b 9000 | |
008e 031d 1bf8 | |
0090 0002 00f8 | |
0092 4800 01d1 |H |
0094 922d 1020 | - |
0096 0d10 1014 | |
0098 1000 f600 | |
009a 01d8 31a2 | 1 |
009c 801f a132 | 2|
009e 9e0f 100b | |
00a0 a4a0 062d | -|
00a2 1020 b450 | P|
00a4 0142 2d1b | B- |
00a6 9814 6001 | ` |
00a8 422d 1b98 |B- |
00aa 1450 0143 | P C|
00ac a364 c20f | d |
00ae 101a 0d10 | |
00b0 2012 2d7b | -{|
00b2 9b19 1c52 | R|
00b4 0a2d 7b9b | -{ |
00b6 191c 5412 | T |
00b8 2d7b 9a80 |-{ |
00ba 4802 211c |H ! |
00bc 5a2d 7b9a |Z-{ |
00be 8054 0221 | T !|
00c0 1c5e 0d1b | ^ |
00c2 f012 2d7b | -{|
00c4 9a0d 1c08 | |
00c6 122d 7b9a | -{ |
00c8 281c 903c |( <|
00ca 3102 201e |1 |
00cc 2d1b f307 |- |
00ce e008 903e | >|
00d0 2d7b 9a28 |-{ (|
00d2 3e03 87c0 |> |
00d4 2b06 201e |+ |
00d6 2d7b 9a05 |-{ |
00d8 9c18 0103 | |
00da fcda 0833 | 3|
00dc fc1a 0833 | 3|
00de a074 c60f | t |
00e0 100a 2d7b | -{|
00e2 9a25 1c10 | % |
00e4 2ffd d43a |/ :|
00e6 351b a22f |5 /|
00e8 e1a8 515f | Q_|
00ea a3c4 c20f | |
00ec 1012 85f8 | |
00ee 40e5 1449 |@ I|
00f0 d013 1c14 | |
00f2 0002 3514 | 5 |
00f4 0a25 1b7a | % z|
00f6 0cf4 01d0 | |
00f8 0fa6 b003 | |
00fa 1d14 0808 | |
00fc 022d 7b9a | -{ |
00fe 2d1c 422d |- B-|
0100 5c4a 2514 |\J% |
0102 1a25 5422 | %T"|
0104 07ff e859 | Y|
0106 d00f a620 | |
0108 022d 7b9a | -{ |
010a 297c 40ab |)|@ |
010c ff07 ac16 | |
010e 0f8c 1e2a | *|
0110 7ca0 1cab || |
0112 ff07 8c0a | |
0114 2e1c c01e |. |
0116 2e5c c81e |.\ |
0118 2d7b 988d |-{ |
011a 1c40 8d5c | @ \|
011c 4949 43a2 |IIC |
011e 0c2e 0f10 | . |
0120 1225 1b60 | % `|
0122 2f01 d00f |/ |
0124 a7f0 022d | -|
0126 7b9b fddc |{ |
0128 3bfd dc33 |; 3|
012a fddc 4bfd | K |
012c dc41 a078 | A x|
012e 1da0 5607 | V |
0130 a12a 9a0f | * |
0132 1033 1d1b | 3 |
0134 90cc 015b | [|
0136 a031 d20f | 1 |
0138 100a 351b | 5 |
013a a0ef 1dd0 | |
013c 0fa4 b80e | |
013e 0cf4 01d4 | |
0140 0fa4 980e | |
0142 2c76 01fc |,v |
0144 b405 d00f | |
0146 a458 0d4f | X O|
0148 a1e0 a60f | |
014a 100b a444 | D|
014c 0d5f a018 | _ |
014e a20f 100a | |
0150 0cf4 01d0 | |
0152 322c 762d |2,v-|
0154 1ca2 251b | % |
0156 602f 01d5 |`/ |
0158 f22d 7b9a | -{ |
015a 0dfc 43fd | C |
015c d41a 0dfc | |
015e 4bfd d17e |K ~|
0160 297c 40ab |)|@ |
0162 ff07 ac16 | |
0164 0f8c 1e2a | *|
0166 7ca0 1cab || |
0168 ff07 8c0a | |
016a 2e1d 001e |. |
016c 2e5d 081e |.] |
016e 2d7b 988d |-{ |
0170 1c40 8d5c | @ \|
0172 4a25 1b82 |J% |
0174 255b 882f |%[ /|
0176 41d0 c229 |A )|
0178 7c40 abff ||@ |
017a 07ac 160f | |
017c 8c1e 2a7c | *||
017e a01c abff | |
0180 078c 0a2e | .|
0182 1cc0 1e2e | .|
0184 5cc8 1fdf |\ |
0186 43df 48ed |C H |
0188 1b81 d00f | |
018a a4d3 fced | |
018c 5b89 d00f |[ |
018e a4b3 ff1d | |
0190 1bf8 0402 | |
0192 8530 7225 | 0r%|
0194 1b63 ac6e | c n|
0196 422c 760d |B,v |
0198 1c90 060d | |
019a 5c98 022c |\ ,|
019c 77d9 1cb0 |w |
019e 09d0 222f | "/|
01a0 0c14 4002 | @ |
01a2 251b 7a2d |% z-|
01a4 7b9a 2d1c |{ - |
01a6 302d 1c39 |0- 9|
01a8 d44a 2d7b | J-{|
01aa 622d 1c7a |b- z|
01ac 2d5c 822d |-\ -|
01ae 7b9a 251c |{ % |
01b0 3225 5c3a |2%\:|
01b2 0df8 2801 | ( |
01b4 d536 2d7b | 6-{|
01b6 63d9 1c38 |c 8|
01b8 09d1 120d | |
01ba fbf8 01d4 | |
01bc da2d 7b9b | -{ |
01be fddc 4bfd | K |
01c0 dc43 a378 | C x|
01c2 0e0f 1012 | |
01c4 251b 8225 |% %|
01c6 5b88 2f41 |[ /A|
01c8 d076 2d7b | v-{|
01ca 9bfd dc4b | K|
01cc fddc 43a0 | C |
01ce cc12 0f10 | |
01d0 13df 43df | C |
01d2 48ed 1b81 |H |
01d4 d434 ed5b | 4 [|
01d6 89d4 231d | # |
01d8 1b90 3403 | 4 |
01da a6d3 fa2d | -|
01dc 7b62 2d1c |{b- |
01de 122d 7b98 | -{ |
01e0 e51c 09fd | |
01e2 43fd dc0b |C |
01e4 a044 be0f | D |
01e6 100a 2d7b | -{|
01e8 9a25 1c0a | % |
01ea 2d7b 9bfd |-{ |
01ec dc1b a3fc | |
01ee ba0f 100a | |
01f0 2d7b 9a25 |-{ %|
01f2 1c1a 2d7b | -{|
01f4 9b1d 1c28 | (|
01f6 0003 fddb | |
01f8 f15b a260 | [ `|
01fa b20f 1012 | |
01fc 2d7b 9a25 |-{ %|
01fe 1c2b fddb | + |