|
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_0258fa
└─⟦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 0068 | h | .CONST 0x0068 ; 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 001a | | .CONST 0x001a ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 000f | | .CONST 0x000f ; Number of locals 000b INIT_0008: 000b 029a 0023 | #| Declare_Subprogram INIT_0020,For_Outer_Call,Visible,Unelaborated 000d 029a 0033 | 3| Declare_Subprogram INIT_0030,For_Outer_Call,Visible,Unelaborated 000f 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated 0011 00bf | | Action Accept_Activation 0012 0007 | | Action Break_Optional 0013 0007 | | Action Break_Optional 0014 1d0d | | Execute_Immediate Reference_Lex_1,0xd 0015 00c7 | | Action Elaborate_Subprogram 0016 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0017 00c7 | | Action Elaborate_Subprogram 0018 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0019 00c7 | | Action Elaborate_Subprogram 001a BODY_0008: 001a 00bc | | Action Signal_Activated 001b 00bb | | Action Signal_Completion 001c 0000 0000 | | .BLANK 0000[0x4] 0020 ; -------------------------------------------------------------------------------------- 0020 ; SUBPROGRAM 0020 ; -------------------------------------------------------------------------------------- 0020 0023 | # | .CONST 0x0023 ; Address of begin 0021 0004 | | .CONST 0x0004 ; Address of exception handler 0022 0001 | | .CONST 0x0001 ; Number of locals 0023 BODY_0020: 0023 INIT_0020: 0023 4801 |H | Short_Literal 0x1 0024 e5fe | | Load 0x2,-0x2 0025 e5ff | | Load 0x2,-0x1 0026 e001 | | Load 0x0,0x1 0027 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0028 6803 |h | Jump_Zero 0x2c 0029 e5fd | | Load 0x2,-0x3 002a 0335 | 5 | Declare_Variable Array,Duplicate 002b 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 002c 00da | | Load_Top At_Offset_2 002d 0335 | 5 | Declare_Variable Array,Duplicate 002e 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 002f 0000 | | .XXX[0x1] 0030 ; -------------------------------------------------------------------------------------- 0030 ; SUBPROGRAM 0030 ; -------------------------------------------------------------------------------------- 0030 0033 | 3 | .CONST 0x0033 ; Address of begin 0031 0004 | | .CONST 0x0004 ; Address of exception handler 0032 0001 | | .CONST 0x0001 ; Number of locals 0033 BODY_0030: 0033 INIT_0030: 0033 4801 |H | Short_Literal 0x1 0034 e5fe | | Load 0x2,-0x2 0035 e5ff | | Load 0x2,-0x1 0036 e001 | | Load 0x0,0x1 0037 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0038 7004 |p | Jump_Nonzero 0x3d 0039 00da | | Load_Top At_Offset_2 003a e002 | | Load 0x0,0x2 003b 1811 | | Execute Package,Field_Execute,Field_Number 0x11 003c 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 003d e5fd | | Load 0x2,-0x3 003e 00d8 | | Load_Top At_Offset_0 003f 0120 | | Execute Any,Is_Value 0040 7002 |p | Jump_Nonzero 0x43 0041 00d8 | | Load_Top At_Offset_0 0042 011e | | Execute Any,Convert 0043 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0044 0000 0000 | | .BLANK 0000[0x4] 0048 ; -------------------------------------------------------------------------------------- 0048 ; SUBPROGRAM 0048 ; -------------------------------------------------------------------------------------- 0048 004b | K | .CONST 0x004b ; Address of begin 0049 0004 | | .CONST 0x0004 ; Address of exception handler 004a 0001 | | .CONST 0x0001 ; Number of locals 004b BODY_0048: 004b INIT_0048: 004b 4801 |H | Short_Literal 0x1 004c e5fe | | Load 0x2,-0x2 004d e5ff | | Load 0x2,-0x1 004e e001 | | Load 0x0,0x1 004f 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0050 7009 |p | Jump_Nonzero 0x5a 0051 4800 |H | Short_Literal 0x0 0052 4801 |H | Short_Literal 0x1 0053 4802 |H | Short_Literal 0x2 0054 e5ff | | Load 0x2,-0x1 0055 e002 | | Load 0x0,0x2 0056 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0057 e002 | | Load 0x0,0x2 0058 180f | | Execute Package,Field_Execute,Field_Number 0xf 0059 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 005a 4800 |H | Short_Literal 0x0 005b 4801 |H | Short_Literal 0x1 005c 4802 |H | Short_Literal 0x2 005d e5fd | | Load 0x2,-0x3 005e e002 | | Load 0x0,0x2 005f 180f | | Execute Package,Field_Execute,Field_Number 0xf 0060 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0061 0000 0000 | | .BLANK 0000[0x7] 0068 ; -------------------------------------------------------------------------------------- 0068 ; Debug Table 0068 ; -------------------------------------------------------------------------------------- 0068 0004 0000 | | .DEBUG4 0x0004,0x0000,0x1f81,0x0000,0x0001,0x0000 006e 5265 6c65 |Rele| .XXX[0xa6] 0070 6173 652e |ase.| 0072 5261 7469 |Rati| 0074 6f6e 616c |onal| 0076 5f32 3136 |_216| 0078 372e 5064 |7.Pd| 007a 6c5f 436f |l_Co| 007c 6d6d 616e |mman| 007e 6473 2e52 |ds.R| 0080 6576 6e2e |evn.| 0082 556e 6974 |Unit| 0084 732e 4465 |s.De| 0086 7369 676e |sign| 0088 2e53 746c |.Stl| 008a 6464 0000 |dd | 008c 0055 0000 | U | 008e 0048 2154 | H!T| 0090 6f6f 6c73 |ools| 0092 2e44 6573 |.Des| 0094 6967 6e2e |ign.| 0096 5265 6c65 |Rele| 0098 6173 652e |ase.| 009a 5261 7469 |Rati| 009c 6f6e 616c |onal| 009e 5f32 3136 |_216| 00a0 372e 5064 |7.Pd| 00a2 6c5f 436f |l_Co| 00a4 6d6d 616e |mman| 00a6 6473 2e52 |ds.R| 00a8 6576 6e2e |evn.| 00aa 556e 6974 |Unit| 00ac 732e 4465 |s.De| 00ae 7369 676e |sign| 00b0 2e53 746c |.Stl| 00b2 6464 0000 |dd | 00b4 0000 003d | =| 00b6 2630 0056 |&0 V| 00b8 f502 9b16 | | 00ba 6601 1dd4 |f | 00bc 4600 0000 |F | 00be 1f00 0000 | | 00c0 2510 aa37 |% 7| 00c2 b7b6 3997 | 9 | 00c4 2232 b9b4 |"2 | 00c6 b3b7 1729 | )| 00c8 32b6 32b0 |2 2 | 00ca b9b2 9729 | )| 00cc 30ba 34b7 |0 4 | 00ce b730 b62f | 0 /| 00d0 9918 9b1b | | 00d2 9728 3236 | (26| 00d4 2fa1 b7b6 |/ | 00d6 b6b0 b732 | 2| 00d8 3997 2932 |9 )2| 00da bb37 172a | 7 *| 00dc b734 ba39 | 4 9| 00de 9722 32b9 | "2 | 00e0 b4b3 b717 | | 00e2 2ab7 35b7 |* 5 | 00e4 37bb b700 |7 | 00e6 0000 1f00 | | 00e8 0000 2510 | % | 00ea aa37 b7b6 | 7 | 00ec 3997 2232 |9 "2| 00ee b9b4 b3b7 | | 00f0 1729 32b6 | )2 | 00f2 32b0 b9b2 |2 | 00f4 9729 30ba | )0 | 00f6 34b7 b730 |4 0| 00f8 b62f 9918 | / | 00fa 9b1b 9728 | (| 00fc 3236 2fa1 |26/ | 00fe b7b6 b6b0 | | 0100 b732 3997 | 29 | 0102 2932 bb37 |)2 7| 0104 172a b734 | * 4| 0106 ba39 9722 | 9 "| 0108 32b9 b4b3 |2 | 010a b717 2ab7 | * | 010c 35b7 37bb |5 7 | 010e b700 0000 | | 0110 0000 1e95 | | 0112 e480 2bca | + | 0114 0000 0000 | | .BLANK 0000[0x5] 0119 0004 4000 | @ | .XXX[0x10] 011b 0000 d411 | | 011d 1300 0000 | | 011f 0440 0000 | @ | 0121 00d4 1113 | | 0123 0000 0000 | | 0125 000f 4c60 | L`| 0127 8016 0cc0 | | 0129 0000 0000 | | .BLANK 0000[0x5] 012e 0f80 0000 | | .XXX[0x1a] 0130 01a8 0828 | (| 0132 484a 48aa |HJH | 0134 c928 2a89 | (* | 0136 29e9 c000 |) | 0138 000f 8000 | | 013a 0001 a808 | | 013c 2848 4a48 |(HJH| 013e aac9 282a | (*| 0140 8929 e9c0 | ) | 0142 0000 0000 | | 0144 07a6 5960 | Y`| 0146 0b1a 4000 | @ | 0148 0000 0000 | | .BLANK 0000[0x4] 014c 0006 0000 | | .XXX[0x17] 014e 0000 a404 | | 0150 14c4 74f5 | t | 0152 2495 4484 |$ D | 0154 d000 0006 | | 0156 0000 0000 | | 0158 a404 14c4 | | 015a 74f5 2495 |t $ | 015c 4484 d000 |D | 015e 0000 0003 | | 0160 d34b 4005 | K@ | 0162 9710 | | 0163 0000 0000 | | .BLANK 0000[0x5] 0168 03e0 0000 | | .XXX[0x23] 016a 00b2 020a | | 016c 8282 624a | bJ| 016e 1a0a 1262 | b| 0170 2afa 4a72 |* Jr| 0172 a22a 9232 | * 2| 0174 0a1a 2a98 | * | 0176 0000 03e0 | | 0178 0000 00b2 | | 017a 020a 8282 | | 017c 624a 1a0a |bJ | 017e 1262 2afa | b* | 0180 4a72 a22a |Jr *| 0182 9232 0a1a | 2 | 0184 2a98 0000 |* | 0186 0000 01e9 | | 0188 b368 02d0 | h | 018a 8000 | | 018b 0000 0000 | | .BLANK 0000[0x4] 018f 0001 0400 | | .XXX[0x14] 0191 0000 1d01 | | 0193 054d 4d15 | MM | 0195 4950 0000 |IP | 0197 0104 0000 | | 0199 001d 0105 | | 019b 4d4d 1549 |MM I| 019d 5000 0000 |P | 019f 0000 f4e3 | | 01a1 9801 6abc | j | 01a3 0000 0000 | | .BLANK 0000[0x5] 01a8 0016 0000 | | .XXX[0x12] 01aa 000a 8086 | | 01ac 88a4 9800 | | 01ae 0000 1600 | | 01b0 0000 0a80 | | 01b2 8688 a498 | | 01b4 0000 0000 | | 01b6 007a 74de | zt | 01b8 00b6 9c00 | | 01ba 0000 0000 | | .BLANK 0000[0x5] 01bf 2b00 0000 |+ | .XXX[0x1b] 01c1 0f40 434f | @CO| 01c3 4d50 4f4e |MPON| 01c5 454e 545f |ENT_| 01c7 4b49 4e44 |KIND| 01c9 0000 002b | +| 01cb 0000 000f | | 01cd 4043 4f4d |@COM| 01cf 504f 4e45 |PONE| 01d1 4e54 5f4b |NT_K| 01d3 494e 4400 |IND | 01d5 0000 0000 | | 01d7 3d3b d800 |=; | 01d9 5bed |[ | 01da 0000 0000 | | .BLANK 0000[0x5] 01df 002e 8000 | . | .XXX[0x19] 01e1 0006 2021 | !| 01e3 a7a7 21aa | ! | 01e5 a929 22a7 | )" | 01e7 21ac 8000 |! | 01e9 002e 8000 | . | 01eb 0006 2021 | !| 01ed a7a7 21aa | ! | 01ef a929 22a7 | )" | 01f1 21ac 8000 |! | 01f3 0000 001e | | 01f5 9ef0 802e | .| 01f7 4600 |F | 01f8 0000 0000 | | .BLANK 0000[0x5] 01fd 1e00 0000 | | .XXX[0x3] 01ff 0250 | P |