|
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, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦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 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 00f8 | | .CONST 0x00f8 ; 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 0000 | | .CONST 0x0000 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0066 | f | .CONST 0x0066 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 001e | | .CONST 0x001e ; Number of locals 000b INIT_0008: 000b 029a 006b | k| Declare_Subprogram INIT_0068,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x0152,0x0000,0x0000,0x0056,0xb4b5,0x0000,0x1c24 ; Debug Table 0x0.0x0 = 0xb,0xffff 000d 029a 0073 | s| Declare_Subprogram INIT_0070,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe 000f 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xf,0xfffd 0011 029a 0083 | | Declare_Subprogram INIT_0080,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x11,0xfffc 0013 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x13,0xfffb 0015 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x15,0xfffa 0017 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x17,0xfff9 0019 029a 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x19,0xfff8 001b 029a 00ab | | Declare_Subprogram INIT_00a8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x1b,0xfff7 001d 00bf | | Action Accept_Activation 001e 00ed | | Load_Encached Diana_Symbol_Rep_Cache ; Debug Table 0x1 = .DEBUG 0x001e,0x0166,0x0000,0x0000,0x0056,0xbab5,0x0000,0x0004 ; Debug Table 0x1.0x0 = 0x1e,0xffff ; Debug Table 0x1.0x1 = 0x1e,0xfffe 001f 0092 00ad | | Action Push_String_Extended,0xad ; "ACCESS_CHECK" 0021 00eb | | Load_Encached Diana_Cache 0022 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 0023 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0024 00ed | | Load_Encached Diana_Symbol_Rep_Cache ; Debug Table 0x1.0x2 = 0x24,0xfffd 0025 0092 00ae | | Action Push_String_Extended,0xae ; "DISCRIMINANT_CHECK" 0027 00eb | | Load_Encached Diana_Cache 0028 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 0029 0031 | 1 | Store_Top Heap_Access,At_Offset_1 002a 00ed | | Load_Encached Diana_Symbol_Rep_Cache ; Debug Table 0x1.0x3 = 0x2a,0xfffc 002b 0092 00af | | Action Push_String_Extended,0xaf ; "INDEX_CHECK" 002d 00eb | | Load_Encached Diana_Cache 002e 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 002f 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0030 00ed | | Load_Encached Diana_Symbol_Rep_Cache ; Debug Table 0x1.0x4 = 0x30,0xfffb 0031 0092 00b0 | | Action Push_String_Extended,0xb0 ; "LENGTH_CHECK" 0033 00eb | | Load_Encached Diana_Cache 0034 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 0035 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0036 00ed | | Load_Encached Diana_Symbol_Rep_Cache ; Debug Table 0x1.0x5 = 0x36,0xfffa 0037 0092 00b1 | | Action Push_String_Extended,0xb1 ; "RANGE_CHECK" 0039 00eb | | Load_Encached Diana_Cache 003a 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 003b 0031 | 1 | Store_Top Heap_Access,At_Offset_1 003c 00ed | | Load_Encached Diana_Symbol_Rep_Cache ; Debug Table 0x1.0x6 = 0x3c,0xfff9 003d 0092 00b2 | | Action Push_String_Extended,0xb2 ; "DIVISION_CHECK" 003f 00eb | | Load_Encached Diana_Cache 0040 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 0041 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0042 00ed | | Load_Encached Diana_Symbol_Rep_Cache ; Debug Table 0x1.0x7 = 0x42,0xfff8 0043 0092 00b3 | | Action Push_String_Extended,0xb3 ; "OVERFLOW_CHECK" 0045 00eb | | Load_Encached Diana_Cache 0046 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 0047 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0048 00ed | | Load_Encached Diana_Symbol_Rep_Cache ; Debug Table 0x1.0x8 = 0x48,0xfff7 0049 0092 00b4 | | Action Push_String_Extended,0xb4 ; "ELABORATION_CHECK" 004b 00eb | | Load_Encached Diana_Cache 004c 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 004d 0031 | 1 | Store_Top Heap_Access,At_Offset_1 004e 00ed | | Load_Encached Diana_Symbol_Rep_Cache ; Debug Table 0x1.0x9 = 0x4e,0xfff6 004f 0092 00b5 | | Action Push_String_Extended,0xb5 ; "STORAGE_CHECK" 0051 00eb | | Load_Encached Diana_Cache 0052 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 0053 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0054 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0xa = 0x54,0xfff5 0055 00c7 | | Action Elaborate_Subprogram 0056 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0xb = 0x56,0xfff4 0057 00c7 | | Action Elaborate_Subprogram 0058 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0xc = 0x58,0xfff3 0059 00c7 | | Action Elaborate_Subprogram 005a 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0xd = 0x5a,0xfff2 005b 00c7 | | Action Elaborate_Subprogram 005c 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0xe = 0x5c,0xfff1 005d 00c7 | | Action Elaborate_Subprogram 005e 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0xf = 0x5e,0xfff0 005f 00c7 | | Action Elaborate_Subprogram 0060 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x10 = 0x60,0xffef 0061 00c7 | | Action Elaborate_Subprogram 0062 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x11 = 0x62,0xffee 0063 00c7 | | Action Elaborate_Subprogram 0064 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x12 = 0x64,0xffed 0065 00c7 | | Action Elaborate_Subprogram 0066 BODY_0008: 0066 00bc | | Action Signal_Activated 0067 00bb | | Action Signal_Completion 0068 ; -------------------------------------------------------------------------------------- 0068 ; SUBPROGRAM 0068 ; -------------------------------------------------------------------------------------- 0068 006b | k | .CONST 0x006b ; Address of begin 0069 0004 | | .CONST 0x0004 ; Address of exception handler 006a 0001 | | .CONST 0x0001 ; Number of locals 006b BODY_0068: 006b INIT_0068: 006b e216 | | Load 0x1,0x16 ; Debug Table 0x2 = .DEBUG 0x006b,0x018e,0x0002,0x0000,0x0056,0xb4b5,0x0000,0x1c25 ; Debug Table 0x2.0x0 = 0x6b,0x1 006c 00ca | | Action Exit_Nullary_Function 006d 0000 0000 | | .XXX[0x3] 006f 0000 | | 0070 ; -------------------------------------------------------------------------------------- 0070 ; SUBPROGRAM 0070 ; -------------------------------------------------------------------------------------- 0070 0073 | s | .CONST 0x0073 ; Address of begin 0071 0004 | | .CONST 0x0004 ; Address of exception handler 0072 0001 | | .CONST 0x0001 ; Number of locals 0073 BODY_0070: 0073 INIT_0070: 0073 e217 | | Load 0x1,0x17 ; Debug Table 0x3 = .DEBUG 0x0073,0x0192,0x0002,0x0000,0x0056,0xb4b5,0x0000,0x1c2a ; Debug Table 0x3.0x0 = 0x73,0x1 0074 00ca | | Action Exit_Nullary_Function 0075 0000 0000 | | .XXX[0x3] 0077 0000 | | 0078 ; -------------------------------------------------------------------------------------- 0078 ; SUBPROGRAM 0078 ; -------------------------------------------------------------------------------------- 0078 007b | { | .CONST 0x007b ; Address of begin 0079 0004 | | .CONST 0x0004 ; Address of exception handler 007a 0001 | | .CONST 0x0001 ; Number of locals 007b BODY_0078: 007b INIT_0078: 007b e218 | | Load 0x1,0x18 ; Debug Table 0x4 = .DEBUG 0x007b,0x0196,0x0002,0x0000,0x0056,0xb4b5,0x0000,0x1c2f ; Debug Table 0x4.0x0 = 0x7b,0x1 007c 00ca | | Action Exit_Nullary_Function 007d 0000 0000 | | .XXX[0x3] 007f 0000 | | 0080 ; -------------------------------------------------------------------------------------- 0080 ; SUBPROGRAM 0080 ; -------------------------------------------------------------------------------------- 0080 0083 | | .CONST 0x0083 ; Address of begin 0081 0004 | | .CONST 0x0004 ; Address of exception handler 0082 0001 | | .CONST 0x0001 ; Number of locals 0083 BODY_0080: 0083 INIT_0080: 0083 e219 | | Load 0x1,0x19 ; Debug Table 0x5 = .DEBUG 0x0083,0x019a,0x0002,0x0000,0x0056,0xb4b5,0x0000,0x1c34 ; Debug Table 0x5.0x0 = 0x83,0x1 0084 00ca | | Action Exit_Nullary_Function 0085 0000 0000 | | .XXX[0x3] 0087 0000 | | 0088 ; -------------------------------------------------------------------------------------- 0088 ; SUBPROGRAM 0088 ; -------------------------------------------------------------------------------------- 0088 008b | | .CONST 0x008b ; Address of begin 0089 0004 | | .CONST 0x0004 ; Address of exception handler 008a 0001 | | .CONST 0x0001 ; Number of locals 008b BODY_0088: 008b INIT_0088: 008b e21a | | Load 0x1,0x1a ; Debug Table 0x6 = .DEBUG 0x008b,0x019e,0x0002,0x0000,0x0056,0xb4b5,0x0000,0x1c39 ; Debug Table 0x6.0x0 = 0x8b,0x1 008c 00ca | | Action Exit_Nullary_Function 008d 0000 0000 | | .XXX[0x3] 008f 0000 | | 0090 ; -------------------------------------------------------------------------------------- 0090 ; SUBPROGRAM 0090 ; -------------------------------------------------------------------------------------- 0090 0093 | | .CONST 0x0093 ; Address of begin 0091 0004 | | .CONST 0x0004 ; Address of exception handler 0092 0001 | | .CONST 0x0001 ; Number of locals 0093 BODY_0090: 0093 INIT_0090: 0093 e21b | | Load 0x1,0x1b ; Debug Table 0x7 = .DEBUG 0x0093,0x01a2,0x0002,0x0000,0x0056,0xb4b5,0x0000,0x1c3e ; Debug Table 0x7.0x0 = 0x93,0x1 0094 00ca | | Action Exit_Nullary_Function 0095 0000 0000 | | .XXX[0x3] 0097 0000 | | 0098 ; -------------------------------------------------------------------------------------- 0098 ; SUBPROGRAM 0098 ; -------------------------------------------------------------------------------------- 0098 009b | | .CONST 0x009b ; Address of begin 0099 0004 | | .CONST 0x0004 ; Address of exception handler 009a 0001 | | .CONST 0x0001 ; Number of locals 009b BODY_0098: 009b INIT_0098: 009b e21c | | Load 0x1,0x1c ; Debug Table 0x8 = .DEBUG 0x009b,0x01a6,0x0002,0x0000,0x0056,0xb4b5,0x0000,0x1c43 ; Debug Table 0x8.0x0 = 0x9b,0x1 009c 00ca | | Action Exit_Nullary_Function 009d 0000 0000 | | .XXX[0x3] 009f 0000 | | 00a0 ; -------------------------------------------------------------------------------------- 00a0 ; SUBPROGRAM 00a0 ; -------------------------------------------------------------------------------------- 00a0 00a3 | | .CONST 0x00a3 ; Address of begin 00a1 0004 | | .CONST 0x0004 ; Address of exception handler 00a2 0001 | | .CONST 0x0001 ; Number of locals 00a3 BODY_00a0: 00a3 INIT_00a0: 00a3 e21d | | Load 0x1,0x1d ; Debug Table 0x9 = .DEBUG 0x00a3,0x01aa,0x0002,0x0000,0x0056,0xb4b5,0x0000,0x1c48 ; Debug Table 0x9.0x0 = 0xa3,0x1 00a4 00ca | | Action Exit_Nullary_Function 00a5 0000 0000 | | .XXX[0x3] 00a7 0000 | | 00a8 ; -------------------------------------------------------------------------------------- 00a8 ; SUBPROGRAM 00a8 ; -------------------------------------------------------------------------------------- 00a8 00ab | | .CONST 0x00ab ; Address of begin 00a9 0004 | | .CONST 0x0004 ; Address of exception handler 00aa 0001 | | .CONST 0x0001 ; Number of locals 00ab BODY_00a8: 00ab INIT_00a8: 00ab e21e | | Load 0x1,0x1e ; Debug Table 0xa = .DEBUG 0x00ab,0x01ae,0x0002,0x0000,0x0056,0xb4b5,0x0000,0x1c4d ; Debug Table 0xa.0x0 = 0xab,0x1 00ac 00ca | | Action Exit_Nullary_Function 00ad ; -------------------------------------------------------------------------------------- 00ad ; STRING TABLE 00ad ; -------------------------------------------------------------------------------------- 00ad 0014 | | .STRTAB 0x0014->0x00b7 ; "ACCESS_CHECK" 00ae 001e | | .STRTAB 0x001e->0x00bd ; "DISCRIMINANT_CHECK" 00af 002e | . | .STRTAB 0x002e->0x00c6 ; "INDEX_CHECK" 00b0 0037 | 7 | .STRTAB 0x0037->0x00cb ; "LENGTH_CHECK" 00b1 0041 | A | .STRTAB 0x0041->0x00d1 ; "RANGE_CHECK" 00b2 004a | J | .STRTAB 0x004a->0x00d7 ; "DIVISION_CHECK" 00b3 0056 | V | .STRTAB 0x0056->0x00de ; "OVERFLOW_CHECK" 00b4 0062 | b | .STRTAB 0x0062->0x00e5 ; "ELABORATION_CHECK" 00b5 0071 | q | .STRTAB 0x0071->0x00ed ; "STORAGE_CHECK" 00b6 007c | | | .STREND 0x007c->0x00f4 00b7 4143 4345 |ACCE| .STRTAB_STRINGS 00f4 0000 0000 | | .BLANK 0000[0x4] 00f8 ; -------------------------------------------------------------------------------------- 00f8 ; Debug Table 00f8 ; -------------------------------------------------------------------------------------- 00f8 0003 000b | | .CONST 0x0003,0x000b 00fa 000b 0152 | R| .DEBUG 0x000b,0x0152,0x0000,0x0000,0x0056,0xb4b5,0x0000,0x1c24 0102 001e 0166 | f| .DEBUG 0x001e,0x0166,0x0000,0x0000,0x0056,0xbab5,0x0000,0x0004 010a 006b 018e | k | .DEBUG 0x006b,0x018e,0x0002,0x0000,0x0056,0xb4b5,0x0000,0x1c25 0112 0073 0192 | s | .DEBUG 0x0073,0x0192,0x0002,0x0000,0x0056,0xb4b5,0x0000,0x1c2a 011a 007b 0196 | { | .DEBUG 0x007b,0x0196,0x0002,0x0000,0x0056,0xb4b5,0x0000,0x1c2f 0122 0083 019a | | .DEBUG 0x0083,0x019a,0x0002,0x0000,0x0056,0xb4b5,0x0000,0x1c34 012a 008b 019e | | .DEBUG 0x008b,0x019e,0x0002,0x0000,0x0056,0xb4b5,0x0000,0x1c39 0132 0093 01a2 | | .DEBUG 0x0093,0x01a2,0x0002,0x0000,0x0056,0xb4b5,0x0000,0x1c3e 013a 009b 01a6 | | .DEBUG 0x009b,0x01a6,0x0002,0x0000,0x0056,0xb4b5,0x0000,0x1c43 0142 00a3 01aa | | .DEBUG 0x00a3,0x01aa,0x0002,0x0000,0x0056,0xb4b5,0x0000,0x1c48 014a 00ab 01ae | | .DEBUG 0x00ab,0x01ae,0x0002,0x0000,0x0056,0xb4b5,0x0000,0x1c4d 0152 ; -------------------------------------------------------------------------------------- 0152 ; Debug3 Subtable 0x0 0152 ; -------------------------------------------------------------------------------------- 0152 0009 0000 | | .DBG3TAB 0x0009,0x0000 0154 000b ffff | | .CONST 0x000b,0xffff 0156 000d fffe | | .CONST 0x000d,0xfffe 0158 000f fffd | | .CONST 0x000f,0xfffd 015a 0011 fffc | | .CONST 0x0011,0xfffc 015c 0013 fffb | | .CONST 0x0013,0xfffb 015e 0015 fffa | | .CONST 0x0015,0xfffa 0160 0017 fff9 | | .CONST 0x0017,0xfff9 0162 0019 fff8 | | .CONST 0x0019,0xfff8 0164 001b fff7 | | .CONST 0x001b,0xfff7 0166 ; -------------------------------------------------------------------------------------- 0166 ; Debug3 Subtable 0x1 0166 ; -------------------------------------------------------------------------------------- 0166 0013 0000 | | .DBG3TAB 0x0013,0x0000 0168 001e ffff | | .CONST 0x001e,0xffff 016a 001e fffe | | .CONST 0x001e,0xfffe 016c 0024 fffd | $ | .CONST 0x0024,0xfffd 016e 002a fffc | * | .CONST 0x002a,0xfffc 0170 0030 fffb | 0 | .CONST 0x0030,0xfffb 0172 0036 fffa | 6 | .CONST 0x0036,0xfffa 0174 003c fff9 | < | .CONST 0x003c,0xfff9 0176 0042 fff8 | B | .CONST 0x0042,0xfff8 0178 0048 fff7 | H | .CONST 0x0048,0xfff7 017a 004e fff6 | N | .CONST 0x004e,0xfff6 017c 0054 fff5 | T | .CONST 0x0054,0xfff5 017e 0056 fff4 | V | .CONST 0x0056,0xfff4 0180 0058 fff3 | X | .CONST 0x0058,0xfff3 0182 005a fff2 | Z | .CONST 0x005a,0xfff2 0184 005c fff1 | \ | .CONST 0x005c,0xfff1 0186 005e fff0 | ^ | .CONST 0x005e,0xfff0 0188 0060 ffef | ` | .CONST 0x0060,0xffef 018a 0062 ffee | b | .CONST 0x0062,0xffee 018c 0064 ffed | d | .CONST 0x0064,0xffed 018e ; -------------------------------------------------------------------------------------- 018e ; Debug3 Subtable 0x2 018e ; -------------------------------------------------------------------------------------- 018e 0000 0001 | | .DBG3TAB 0x0000,0x0001 0190 006b 0001 | k | .CONST 0x006b,0x0001 0192 ; -------------------------------------------------------------------------------------- 0192 ; Debug3 Subtable 0x3 0192 ; -------------------------------------------------------------------------------------- 0192 0000 0001 | | .DBG3TAB 0x0000,0x0001 0194 0073 0001 | s | .CONST 0x0073,0x0001 0196 ; -------------------------------------------------------------------------------------- 0196 ; Debug3 Subtable 0x4 0196 ; -------------------------------------------------------------------------------------- 0196 0000 0001 | | .DBG3TAB 0x0000,0x0001 0198 007b 0001 | { | .CONST 0x007b,0x0001 019a ; -------------------------------------------------------------------------------------- 019a ; Debug3 Subtable 0x5 019a ; -------------------------------------------------------------------------------------- 019a 0000 0001 | | .DBG3TAB 0x0000,0x0001 019c 0083 0001 | | .CONST 0x0083,0x0001 019e ; -------------------------------------------------------------------------------------- 019e ; Debug3 Subtable 0x6 019e ; -------------------------------------------------------------------------------------- 019e 0000 0001 | | .DBG3TAB 0x0000,0x0001 01a0 008b 0001 | | .CONST 0x008b,0x0001 01a2 ; -------------------------------------------------------------------------------------- 01a2 ; Debug3 Subtable 0x7 01a2 ; -------------------------------------------------------------------------------------- 01a2 0000 0001 | | .DBG3TAB 0x0000,0x0001 01a4 0093 0001 | | .CONST 0x0093,0x0001 01a6 ; -------------------------------------------------------------------------------------- 01a6 ; Debug3 Subtable 0x8 01a6 ; -------------------------------------------------------------------------------------- 01a6 0000 0001 | | .DBG3TAB 0x0000,0x0001 01a8 009b 0001 | | .CONST 0x009b,0x0001 01aa ; -------------------------------------------------------------------------------------- 01aa ; Debug3 Subtable 0x9 01aa ; -------------------------------------------------------------------------------------- 01aa 0000 0001 | | .DBG3TAB 0x0000,0x0001 01ac 00a3 0001 | | .CONST 0x00a3,0x0001 01ae ; -------------------------------------------------------------------------------------- 01ae ; Debug3 Subtable 0xa 01ae ; -------------------------------------------------------------------------------------- 01ae 0000 0001 | | .DBG3TAB 0x0000,0x0001 01b0 00ab 0001 | | .CONST 0x00ab,0x0001 01b2 0000 0000 | | .BLANK 0000[0x4e]