|
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_0870df
└─⟦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 0038 | 8 | .CONST 0x0038 ; 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 001b | | .CONST 0x001b ; Address of begin 0019 0028 | ( | .CONST 0x0028 ; Address of exception handler 001a 0001 | | .CONST 0x0001 ; Number of locals 001b BODY_0018: 001b INIT_0018: 001b 00da | | Load_Top At_Offset_2 001c e001 | | Load 0x0,0x1 001d 1815 | | Execute Package,Field_Execute,Field_Number 0x15 001e a5fe | | Store_Unchecked 0x2,-0x2 001f 00da | | Load_Top At_Offset_2 0020 e001 | | Load 0x0,0x1 0021 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0022 a5fd | | Store_Unchecked 0x2,-0x3 0023 00da | | Load_Top At_Offset_2 0024 e001 | | Load 0x0,0x1 0025 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0026 a5fc | | Store_Unchecked 0x2,-0x4 0027 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0028 TRAP_0018: 0028 010e | | Execute Exception,Is_Constraint_Error 0029 6807 |h | Jump_Zero 0x31 002a 4800 |H | Short_Literal 0x0 002b a5fe | | Store_Unchecked 0x2,-0x2 002c 4800 |H | Short_Literal 0x0 002d a5fd | | Store_Unchecked 0x2,-0x3 002e 4800 |H | Short_Literal 0x0 002f a5fc | | Store_Unchecked 0x2,-0x4 0030 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0031 0100 | | Execute Exception,Raise 0032 0000 0000 | | .BLANK 0000[0x6] 0038 ; -------------------------------------------------------------------------------------- 0038 ; Debug Table 0038 ; -------------------------------------------------------------------------------------- 0038 0004 0004 | | .DEBUG4 0x0004,0x0004,0x4a64,0x0000,0x0001,0x0000 003e 3515 3955 |5 9U| .XXX[0x1c2] 0040 7d05 3151 |} 1Q| 0042 1549 38b0 | I8 | 0044 80a1 d185 | | 0046 b1d1 95c9 | | 0048 b880 f428 | (| 004a 2424 81cd |$$ | 004c 8dc9 9595 | | 004e b8b4 f985 | | 0050 b1d1 95c9 | | 0052 b985 d194 | | 0054 a4a4 ec28 | (| 0056 25f4 2825 |% (%| 0058 b595 b9d5 | | 005a c195 c9b5 | | 005c 85b9 95b9 | | 005e d080 f481 | | 0060 4985 d135 |I 5| 0062 95b9 d511 | | 0064 9599 85d5 | | 0066 b1d1 ccb9 | | 0068 c195 c9b5 | | 006a 85b9 95b9 | | 006c d0ec 2825 | (%| 006e b595 b9d5 | | 0070 e0c4 c5c8 | | 0072 c880 f481 | | 0074 d9d0 c4c0 | | 0076 c17d c995 | } | 0078 cdbd d5c9 | | 007a 8d94 b960 | `| 007c c4c5 48c8 | H | 007e ec28 25b5 | (% | 0080 95b9 d5c9 | | 0082 85d1 a5bd | | 0084 b985 b080 | | 0086 f481 d195 | | 0088 c9b4 b4f9 | | 008a b5a5 cd8c | | 008c b9c9 85d1 | | 008e a5bd b985 | | 0090 b0ec 2825 | (%| 0092 b595 b9d5 | | 0094 85d5 d1bd | | 0096 c995 cda5 | | 0098 e994 80f4 | | 009a 81d1 95c9 | | 009c b4b4 f9b5 | | 009e a5cd 8cb9 | | 00a0 85d5 d1bd | | 00a2 c995 cda5 | | 00a4 e994 ec28 | (| 00a6 25b5 95b9 |% | 00a8 d5d9 d1c9 | | 00aa 958d bd9c | | 00ac 80f4 81d1 | | 00ae 95c9 b4b4 | | 00b0 f9b5 a5cd | | 00b2 8cb9 d9d0 | | 00b4 c4c0 c17d | }| 00b6 c995 8dbd | | 00b8 9cec 2825 | (%| 00ba b595 b9d5 | | 00bc d195 c9b5 | | 00be 99b1 859d | | 00c0 cc80 f481 | | 00c2 99b1 859d | | 00c4 ccec 2825 | (%| 00c6 b595 b9d5 | | 00c8 ad89 9199 | | 00ca b185 9dcc | | 00cc 80f4 81ad | | 00ce 99b1 859d | | 00d0 ccec 2825 | (%| 00d2 c995 d1d5 | | 00d4 c9b8 a0a9 | | 00d6 b595 b9d4 | | 00d8 a4ec 29f4 | ) | 00da 2829 91bd |() | 00dc b595 b9d5 | | 00de 99d5 b98c | | 00e0 a1a5 d195 | | 00e2 b4a4 29a5 | ) | 00e4 b9d0 81a5 | | 00e6 d195 b4ec | | 00e8 29ec 2825 |) (%| 00ea c995 9da5 | | 00ec cdd1 95c8 | | 00ee 8151 4d8d | QM | 00f0 c995 95b8 | | 00f2 80a9 cd8d | | 00f4 c995 95b8 | | 00f6 80f4 8099 | | 00f8 d195 c9b4 | | 00fa b4f9 cd8d | | 00fc c995 95b8 | | 00fe ec28 2825 | ((%| 0100 cddd a5d1 | | 0102 8da0 80a1 | | 0104 a5d1 95b4 | | 0106 a481 ec28 | (| 0108 258d 85cd |% | 010a 9481 3535 | 55| 010c 1539 557d | 9U}| 010e 4d0d 493d |M I=| 0110 3130 e828 |10 (| 0112 2425 d195 |$% | 0114 c9b4 b4f9 | | 0116 99b1 859d | | 0118 cc81 78f4 | x | 011a 814d 353d | M5=| 011c 3d51 214d |=Q!M| 011e 0d49 3d31 | I=1| 0120 30ec 2824 |0 ($| 0122 25a5 9880 |% | 0124 a1d1 95c9 | | 0126 b4b4 f999 | | 0128 b185 9dcc | | 012a 8098 814d | M| 012c 353d 3d51 |5==Q| 012e 214d 0d49 |!M I| 0130 3d31 30a4 |=10 | 0132 81ec 2824 | ($| 0134 2425 cd8d |$% | 0136 c995 95b8 | | 0138 b4f9 a9d5 | | 013a b5c1 cd8d | | 013c c9bd b1b0 | | 013e 80f4 8119 | | 0140 0531 4d14 | 1M | 0142 ec28 2424 | ($$| 0144 25a5 9880 |% | 0146 a1cd 8dc9 | | 0148 9595 b8b4 | | 014a f9cd 8dc9 | | 014c bdb1 b17d | }| 014e 85b5 d0a4 | | 0150 2824 2424 |($$$| 0152 2519 b1d5 |% | 0154 cda1 4d8d | M | 0156 c9bd b1b0 | | 0158 a1cd 8dc9 | | 015a 9595 b8a4 | | 015c ec28 2425 | ($%| 015e f481 95b1 | | 0160 cd94 2824 | ($| 0162 2425 cd8d |$% | 0164 c995 95b8 | | 0166 b4f9 a9d5 | | 0168 b5c1 cd8d | | 016a c9bd b1b0 | | 016c 80f4 8151 | Q| 016e 4955 14ec |IU | 0170 2824 2589 |($% | 0172 c995 85ac | | 0174 ec28 2825 | ((%| 0176 8d85 cd94 | | 0178 8135 3515 | 55 | 017a 3955 7d59 |9U}Y| 017c 2511 153c |% <| 017e e828 2425 | ($%| 0180 4995 d995 |I | 0182 c9cd 9559 | Y| 0184 a591 95bc | | 0186 a1d1 95c9 | | 0188 b4a4 ec28 | (| 018a 2425 d195 |$% | 018c c9b4 b4f9 | | 018e 99b1 859d | | 0190 cc81 78f4 | x | 0192 8149 1559 | I Y| 0194 1549 4d15 | IM | 0196 7d59 2511 |}Y% | 0198 153c ec28 | < (| 019a 2425 89c9 |$% | 019c 9585 acec | | 019e 2828 258d |((% | 01a0 85cd 9481 | | 01a2 3535 1539 |55 9| 01a4 557d 5d49 |U}]I| 01a6 0540 e828 | @ (| 01a8 2425 d195 |$% | 01aa c9b4 b4f9 | | 01ac 99b1 859d | | 01ae cc81 78f4 | x | 01b0 815d 4905 | ]I | 01b2 4105 493d |A I=| 01b4 5539 10ec |U9 | 01b6 2824 2589 |($% | 01b8 c995 85ac | | 01ba ec28 2825 | ((%| 01bc 8d85 cd94 | | 01be 8135 3515 | 55 | 01c0 3955 7d49 |9U}I| 01c2 1559 1549 | Y I| 01c4 4d15 5d49 |M ]I| 01c6 0540 e828 | @ (| 01c8 2425 d195 |$% | 01ca c9b4 b4f9 | | 01cc 99b1 859d | | 01ce cc81 78f4 | x | 01d0 8149 1559 | I Y| 01d2 1549 4d15 | IM | 01d4 5d49 0540 |]I @| 01d6 ec28 2425 | ($%| 01d8 89c9 9585 | | 01da acec 2828 | ((| 01dc 258d 85cd |% | 01de 9481 3535 | 55| 01e0 1539 557d | 9U}| 01e2 3931 34e8 |914 | 01e4 2824 25d1 |($% | 01e6 95c9 b4b4 | | 01e8 f999 b185 | | 01ea 9dcc 8178 | x| 01ec f481 3125 | 1%| 01ee 3915 1915 |9 | 01f0 1510 ec28 | (| 01f2 2425 89c9 |$% | 01f4 9585 acec | | 01f6 2828 258d |((% | 01f8 85cd 9481 | | 01fa 3535 1539 |55 9| 01fc 557d 0d55 |U} U| 01fe 494d 3d48 |IM=H|