|
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 0090 | | .CONST 0x0090 ; 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 0021 | ! | .CONST 0x0021 ; Address of begin 0019 0034 | 4 | .CONST 0x0034 ; Address of exception handler 001a 0004 | | .CONST 0x0004 ; Number of locals 001b INIT_0018: 001b 0092 0037 | 7| Action Push_String_Extended,0x37 ; "$$.Lists.Freeze_For_Subsystems" 001d 0092 0038 | 8| Action Push_String_Extended,0x38 ; "$$.Lists.Demote_For_Subsystems" 001f 0092 0039 | 9| Action Push_String_Extended,0x39 ; "$$.Lists.Promote_For_Subsystems" 0021 BODY_0018: 0021 4800 |H | Short_Literal 0x0 0022 0092 003a | :| Action Push_String_Extended,0x3a ; "Computing demotion and repromotion closure of old and new activities" 0024 8001 | | Call 0x0,0x1 0025 00da | | Load_Top At_Offset_2 0026 00d9 | | Load_Top At_Offset_1 0027 00db | | Load_Top At_Offset_3 0028 e5ff | | Load 0x2,-0x1 0029 e5fe | | Load 0x2,-0x2 002a e002 | | Load 0x0,0x2 002b 180e | | Execute Package,Field_Execute,Field_Number 0xe 002c 00d8 | | Load_Top At_Offset_0 002d 00da | | Load_Top At_Offset_2 002e e402 | | Load 0x2,0x2 002f e5fd | | Load 0x2,-0x3 0030 e5fe | | Load 0x2,-0x2 0031 e5ff | | Load 0x2,-0x1 0032 8003 | | Call 0x0,0x3 0033 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0034 TRAP_0018: 0034 0007 | | Action Break_Optional 0035 00d8 | | Load_Top At_Offset_0 0036 0101 | | Execute Exception,Reraise 0037 ; -------------------------------------------------------------------------------------- 0037 ; STRING TABLE 0037 ; -------------------------------------------------------------------------------------- 0037 000a | | .STRTAB 0x000a->0x003c ; "$$.Lists.Freeze_For_Subsystems" 0038 0026 | & | .STRTAB 0x0026->0x004b ; "$$.Lists.Demote_For_Subsystems" 0039 0042 | B | .STRTAB 0x0042->0x005a ; "$$.Lists.Promote_For_Subsystems" 003a 005f | _ | .STRTAB 0x005f->0x0069 ; "Computing demotion and repromotion closure of old and new activities" 003b 00a1 | | .STREND 0x00a1->0x008b 003c 2424 2e4c |$$.L| .STRTAB_STRINGS 008c 0000 0000 | | .BLANK 0000[0x4] 0090 ; -------------------------------------------------------------------------------------- 0090 ; Debug Table 0090 ; -------------------------------------------------------------------------------------- 0090 0004 000d | | .DEBUG4 0x0004,0x000d,0x96ab,0x0000,0x0001,0x0000 0096 a5b5 9481 | | .XXX[0x93] 0098 8da1 85b9 | | 009a 9d95 9081 | | 009c d1bc 8080 | | 009e 8080 8081 | | 00a0 39d5 b589 |9 | 00a2 95c9 7d3d | }=| 00a4 997d 0985 | } | 00a6 8dad d5c1 | | 00a8 cc81 cd95 | | 00aa d081 d1bd | | 00ac 41bd cda5 |A | 00ae d1a5 bdb9 | | 00b0 a5b9 9c81 | | 00b2 d185 c194 | | 00b4 81d1 bc81 | | 00b6 0985 8dad | | 00b8 d5c0 8111 | | 00ba 85d1 8541 | A| 00bc c9bd 8d95 | | 00be cdcd a5b9 | | 00c0 9c81 0985 | | 00c2 8dad d5c0 | | 00c4 8111 85d1 | | 00c6 8555 b9b1 | U | 00c8 bd85 91a5 | | 00ca b99c 8109 | | 00cc 858d add5 | | 00ce c081 25b9 | % | 00d0 9195 e081 | | 00d2 d185 c195 | | 00d4 4dc1 858d |M | 00d6 9481 25b9 | % | 00d8 99bc 8159 | Y| 00da bdb1 4995 | I | 00dc c5d5 95cd | | 00de d1a5 b99c | | 00e0 81bd c195 | | 00e2 c985 d1bd | | 00e4 c881 d1bc | | 00e6 81b5 bdd5 | | 00e8 b9d0 80c5 | | 00ea cdd0 8109 | | 00ec 858d add5 | | 00ee c081 1185 | | 00f0 d184 81d1 | | 00f2 85c1 94c5 | | 00f4 4d50 8109 |MP | 00f6 050d 2d55 | -U| 00f8 4081 1105 |@ | 00fa 5104 8151 |Q Q| 00fc 0541 1480 | A | 00fe 8081 09b1 | | 0100 bd8d ac81 | | 0102 25b9 99bc |% | 0104 8159 bdb1 | Y | 0106 09b1 bd8d | | 0108 ac81 1185 | | 010a d184 8159 | Y| 010c bdb1 0905 | | 010e 0d2d 5540 | -U@| 0110 8125 3911 | %9 | 0112 1560 8151 | ` Q| 0114 0541 1480 | A | 0116 a189 b1d5 | | 0118 9481 d185 | | 011a c194 a480 | | 011c 8081 39bd | 9 | 011e d081 8481 | | 0120 0985 8dad | | 0122 d5c0 8125 | %| 0124 b991 95e0 | | 0126 8151 85c1 | Q | 0128 9400 | | 0129 0000 0000 | | .BLANK 0000[0x6] 012f 0010 003a | :| .XXX[0xc] 0131 91fc 0000 | | 0133 0004 0000 | | 0135 0000 0008 | | 0137 80c0 0400 | | 0139 0000 8200 | | 013b 0000 0000 | | .BLANK 0000[0x11] 014c 3559 1549 |5Y I| .XXX[0xb4] 014e 2519 657d |% e}| 0150 0905 0d2d | -| 0152 5540 f4b0 |U@ | 0154 0000 0000 | | 0156 0880 c000 | | 0158 0000 0004 | | 015a 0000 0008 | | 015c 80c0 0000 | | 015e 0008 80c0 | | 0160 0000 0000 | | 0162 0008 80c0 | | 0164 0000 0008 | | 0166 80c0 0000 | | 0168 0008 b4c4 | | 016a 0000 0014 | | 016c 80e0 c0c0 | | 016e c000 0400 | | 0170 0000 3559 | 5Y| 0172 1549 2519 | I% | 0174 657d 0905 |e} | 0176 0d2d 5541 | -UA| 0178 20b0 0000 | | 017a 0000 2080 | | 017c c4c4 d8e0 | | 017e d8d0 d004 | | 0180 0400 0000 | | 0182 0c80 c8d4 | | 0184 0404 0000 | | 0186 000c 80e4 | | 0188 c404 0400 | | 018a 0000 1080 | | 018c c4d8 cc04 | | 018e 0400 0000 | | 0190 1080 c4d0 | | 0192 e404 0400 | | 0194 0000 1080 | | 0196 c4c0 d804 | | 0198 0400 0000 | | 019a 1080 c4d0 | | 019c c404 0400 | | 019e 0000 1080 | | 01a0 c4c0 d404 | | 01a2 0400 0000 | | 01a4 0c80 c8c4 | | 01a6 0404 0000 | | 01a8 000c 80e0 | | 01aa c804 0400 | | 01ac 0000 1080 | | 01ae c4dc e004 | | 01b0 0400 0000 | | 01b2 0c80 cce0 | | 01b4 0404 0000 | | 01b6 000c 80e0 | | 01b8 c404 0400 | | 01ba 0000 1080 | | 01bc c4c0 e004 | | 01be 0400 0000 | | 01c0 0c80 dcdc | | 01c2 0404 0000 | | 01c4 0010 80c4 | | 01c6 d8d8 0404 | | 01c8 0000 0010 | | 01ca 80c4 ccc4 | | 01cc 0000 0400 | | 01ce 0400 0000 | | 01d0 0c80 dcdc | | 01d2 0000 0008 | | 01d4 80c0 0400 | | 01d6 0400 0000 | | 01d8 1080 c4d8 | | 01da d800 0000 | | 01dc 0880 c004 | | 01de 0004 0000 | | 01e0 000c 80e4 | | 01e2 c400 0000 | | 01e4 0880 c004 | | 01e6 0004 0000 | | 01e8 000c 80e0 | | 01ea c400 0000 | | 01ec 0880 c004 | | 01ee 0004 0000 | | 01f0 0010 80c4 | | 01f2 ccc4 0000 | | 01f4 0008 80c0 | | 01f6 0400 0400 | | 01f8 0000 1080 | | 01fa c4d0 e400 | | 01fc 0000 0880 | | 01fe c004 0004 | |