|
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_03bcfe
└─⟦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 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 0018 | | .CONST 0x0018 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0010 | | .CONST 0x0010 ; Number of locals 000b INIT_0008: 000b 029a 0023 | #| Declare_Subprogram INIT_0020,For_Outer_Call,Visible,Unelaborated 000d 029a 003b | ;| Declare_Subprogram INIT_0038,For_Outer_Call,Visible,Unelaborated 000f 00bf | | Action Accept_Activation 0010 00e3 | | Load_Encached Natural_Cache 0011 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0012 00e3 | | Load_Encached Natural_Cache 0013 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 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 BODY_0008: 0018 00bc | | Action Signal_Activated 0019 00bb | | Action Signal_Completion 001a 0000 0000 | | .BLANK 0000[0x6] 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 e20f | | Load 0x1,0xf 0024 0dfa | | Execute_Immediate Less,-0x6 0025 6809 |h | Jump_Zero 0x2f 0026 e5fd | | Load 0x2,-0x3 0027 e5fe | | Load 0x2,-0x2 0028 e5ff | | Load 0x2,-0x1 0029 e002 | | Load 0x0,0x2 002a 1813 | | Execute Package,Field_Execute,Field_Number 0x13 002b e20f | | Load 0x1,0xf 002c 0a01 | | Execute_Immediate Plus,0x1 002d c20f | | Store 0x1,0xf 002e 4504 |E | Exit_Suprogram New_Top_Offset 0x4 002f e210 | | Load 0x1,0x10 0030 0a01 | | Execute_Immediate Plus,0x1 0031 c210 | | Store 0x1,0x10 0032 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0033 0000 0000 | | .BLANK 0000[0x5] 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 e210 | | Load 0x1,0x10 003c 680b |h | Jump_Zero 0x48 003d e003 | | Load 0x0,0x3 003e 180e | | Execute Package,Field_Execute,Field_Number 0xe 003f 4807 |H | Short_Literal 0x7 0040 0092 0049 | I| Action Push_String_Extended,0x49 ; "Messages skipped: " 0042 e210 | | Load 0x1,0x10 0043 00e0 | | Load_Encached Standard_Cache 0044 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0045 01cc | | Execute Vector,Catenate 0046 e002 | | Load 0x0,0x2 0047 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0048 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0049 ; -------------------------------------------------------------------------------------- 0049 ; STRING TABLE 0049 ; -------------------------------------------------------------------------------------- 0049 0004 | | .STRTAB 0x0004->0x004b ; "Messages skipped: " 004a 0014 | | .STREND 0x0014->0x0054 004b 4d65 7373 |Mess| .STRTAB_STRINGS 0054 0000 0000 | | .BLANK 0000[0x4] 0058 ; -------------------------------------------------------------------------------------- 0058 ; Debug Table 0058 ; -------------------------------------------------------------------------------------- 0058 0004 0011 | | .DEBUG4 0x0004,0x0011,0x2361,0x0000,0x0001,0x0000 005e 8000 0000 | | .XXX[0x1a2] 0060 0000 003d | =| 0062 0000 003e | >| 0064 8000 0023 | #| 0066 a9b8 32b1 | 2 | 0068 b4b3 34b2 | 4 | 006a b990 3090 | 0 | 006c 3634 b732 |64 2| 006e 9037 b310 | 7 | 0070 3a32 bc3a |:2 :| 0072 103a 3430 | :40| 0074 ba10 30b8 | 0 | 0076 3832 b0b9 |82 | 0078 3990 30ba |9 0 | 007a 103a 3432 | :42| 007c 9031 37ba | 17 | 007e 3a37 b690 |:7 | 0080 37b3 1032 |7 2| 0082 b0b1 b410 | | 0084 3830 b3b2 |80 | 0086 9037 b310 | 7 | 0088 3a34 3280 |:42 | 008a 0000 3e00 | > | 008c 0000 2410 | $ | 008e 29b8 32b1 |) 2 | 0090 b4b3 34b2 | 4 | 0092 b990 3090 | 0 | 0094 3634 b732 |64 2| 0096 9037 b310 | 7 | 0098 3a32 bc3a |:2 :| 009a 103a 3430 | :40| 009c ba10 30b8 | 0 | 009e 3832 b0b9 |82 | 00a0 3990 30ba |9 0 | 00a2 103a 3432 | :42| 00a4 9031 37ba | 17 | 00a6 3a37 b690 |:7 | 00a8 37b3 1032 |7 2| 00aa b0b1 b410 | | 00ac 3830 b3b2 |80 | 00ae 9037 b310 | 7 | 00b0 3a34 3280 |:42 | 00b2 0000 3e00 | > | 00b4 0000 2410 | $ | 00b6 29b8 32b1 |) 2 | 00b8 b4b3 34b2 | 4 | 00ba b990 3090 | 0 | 00bc 3634 b732 |64 2| 00be 9037 b310 | 7 | 00c0 3a32 bc3a |:2 :| 00c2 103a 3430 | :40| 00c4 ba10 30b8 | 0 | 00c6 3832 b0b9 |82 | 00c8 3990 30ba |9 0 | 00ca 103a 3432 | :42| 00cc 9031 37ba | 17 | 00ce 3a37 b690 |:7 | 00d0 37b3 1032 |7 2| 00d2 b0b1 b410 | | 00d4 3830 b3b2 |80 | 00d6 9037 b310 | 7 | 00d8 3a34 3280 |:42 | 00da 0000 2300 | # | 00dc 0000 24b8 | $ | 00de 3934 b73a |94 :| 00e0 37ba ba17 |7 | 00e2 102a 3434 | *44| 00e4 b990 3830 | 80| 00e6 b930 b6b2 | 0 | 00e8 ba32 b910 | 2 | 00ea 34b9 9031 |4 1| 00ec bab9 3932 | 92| 00ee b73a 363c | :6<| 00f0 9034 b6b8 | 4 | 00f2 3632 b6b2 |62 | 00f4 b73a 32b2 | :2 | 00f6 1037 b736 | 7 6| 00f8 3c90 3337 |< 37| 00fa b910 3839 | 89| 00fc 34b7 3a10 |4 : | 00fe 3932 b8ba |92 | 0100 b2b9 ba39 | 9| 0102 8000 0022 | "| 0104 8000 0025 | %| 0106 1038 3934 | 894| 0108 b73a 37ba | :7 | 010a ba17 102a | *| 010c 3434 b990 |44 | 010e 3830 b930 |80 0| 0110 b6b2 ba32 | 2| 0112 b910 34b9 | 4 | 0114 9031 bab9 | 1 | 0116 3932 b73a |92 :| 0118 363c 9034 |6< 4| 011a b6b8 3632 | 62| 011c b6b2 b73a | :| 011e 32b2 1037 |2 7| 0120 b736 3c90 | 6< | 0122 3337 b910 |37 | 0124 3839 34b7 |894 | 0126 3a10 3932 |: 92| 0128 b8ba b2b9 | | 012a ba39 8000 | 9 | 012c 0022 8000 | " | 012e 0025 1038 | % 8| 0130 3934 b73a |94 :| 0132 37ba ba17 |7 | 0134 102a 3434 | *44| 0136 b990 3830 | 80| 0138 b930 b6b2 | 0 | 013a ba32 b910 | 2 | 013c 34b9 9031 |4 1| 013e bab9 3932 | 92| 0140 b73a 363c | :6<| 0142 9034 b6b8 | 4 | 0144 3632 b6b2 |62 | 0146 b73a 32b2 | :2 | 0148 1037 b736 | 7 6| 014a 3c90 3337 |< 37| 014c b910 3839 | 89| 014e 34b7 3a10 |4 : | 0150 3932 b8ba |92 | 0152 b2b9 ba39 | 9| 0154 8000 0008 | | 0156 8000 0025 | %| 0158 3a34 30ba |:40 | 015a 1030 b932 | 0 2| 015c 9032 34b9 | 24 | 015e 32b1 ba32 |2 2| 0160 b210 3a37 | :7| 0162 9020 a9a1 | | 0164 a4a4 9032 | 2| 0166 32bb 34b1 |2 4 | 0168 b2b9 9039 | 9| 016a bab1 b410 | | 016c 30b9 9036 |0 6| 016e 34b7 3290 |4 2 | 0170 3839 34b7 |894 | 0172 3a32 b939 |:2 9| 0174 9d90 34ba | 4 | 0176 1034 b990 | 4 | 0178 34b3 b737 |4 7| 017a b932 b210 | 2 | 017c 34b3 0000 |4 | 017e 0008 0000 | | 0180 0025 903a | % :| 0182 3430 ba10 |40 | 0184 30b9 3290 |0 2 | 0186 3234 b932 |24 2| 0188 b1ba 32b2 | 2 | 018a 103a 3790 | :7 | 018c 20a9 a1a4 | | 018e a490 3232 | 22| 0190 bb34 b1b2 | 4 | 0192 b990 39ba | 9 | 0194 b1b4 1030 | 0| 0196 b990 3634 | 64| 0198 b732 9038 | 2 8| 019a 3934 b73a |94 :| 019c 32b9 399d |2 9 | 019e 9034 ba10 | 4 | 01a0 34b9 9034 |4 4| 01a2 b3b7 37b9 | 7 | 01a4 32b2 1034 |2 4| 01a6 b300 0000 | | 01a8 0800 0000 | | 01aa 2590 3a34 |% :4| 01ac 30ba 1030 |0 0| 01ae b932 9032 | 2 2| 01b0 34b9 32b1 |4 2 | 01b2 ba32 b210 | 2 | 01b4 3a37 9020 |:7 | 01b6 a9a1 a4a4 | | 01b8 9032 32bb | 22 | 01ba 34b1 b2b9 |4 | 01bc 9039 bab1 | 9 | 01be b410 30b9 | 0 | 01c0 9036 34b7 | 64 | 01c2 3290 3839 |2 89| 01c4 34b7 3a32 |4 :2| 01c6 b939 9d90 | 9 | 01c8 34ba 1034 |4 4| 01ca b990 34b3 | 4 | 01cc b737 b932 | 7 2| 01ce b210 34b3 | 4 | 01d0 0000 002e | .| 01d2 8000 001d | | 01d4 a837 b9ba | 7 | 01d6 29b1 b934 |) 4| 01d8 b83a 1033 | : 3| 01da 37b9 36b0 |7 6 | 01dc ba3a 34b7 | :4 | 01de 3390 34b9 |3 4 | 01e0 9039 b832 | 9 2| 01e2 b1b4 b334 | 4| 01e4 b2b2 1014 | | 01e6 39b2 b290 |9 | 01e8 3a34 3290 |:42 | 01ea 2337 b936 |#7 6| 01ec b0ba 1037 | 7| 01ee b83a 34b7 | :4 | 01f0 b714 9700 | | 01f2 0000 2e00 | . | 01f4 0000 1e10 | | 01f6 2837 b9ba |(7 | 01f8 29b1 b934 |) 4| 01fa b83a 1033 | : 3| 01fc 37b9 36b0 |7 6 | 01fe ba3a 34b7 | :4 |