|
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, 5811_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df
└─⟦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 5811 |X | .CONST 0x5811 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 00d8 | | .CONST 0x00d8 ; 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 004c | L | .CONST 0x004c ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 001d | | .CONST 0x001d ; Number of locals
000b INIT_0008:
000b 0007 | | Action Break_Optional ; Debug Table 0x0 = .DEBUG 0x000b,0x012a,0xc000,0x0000,0x0037,0x57a4,0x0000,0x0007
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0007 | | Action Break_Optional ; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 00e9 | | Load_Encached String_Cache ; Debug Table 0x0.0x2 = 0xd,0xfffd
000e 0129 | ) | Execute Any,Make_Visible
000f 60c0 |` | Indirect_Literal Discrete,0xd0,{0x00000000, 0x003757a4} ; Debug Table 0x0.0x3 = 0xf,0xfffc
0010 4830 |H0 | Short_Literal 0x30
0011 00db | | Load_Top At_Offset_3
0012 e20f | | Load 0x1,0xf
0013 e001 | | Load 0x0,0x1
0014 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0015 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0016 e002 | | Load 0x0,0x2
0017 0386 | | Declare_Variable Package,Visible
0018 00d8 | | Load_Top At_Offset_0
0019 020f | | Execute Module,Activate
001a 4802 |H | Short_Literal 0x2 ; Debug Table 0x0.0x4 = 0x1a,0xfffb
001b 032b | + | Declare_Type Record,Incomplete,Visible
001c 029a 0053 | S| Declare_Subprogram INIT_0050,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x1c,0xfffa
001e 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x1e,0xfff9
0020 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x20,0xfff8
0022 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x22,0xfff7
0024 0007 | | Action Break_Optional ; Debug Table 0x0.0x9 = 0x24,0xfff6
0025 0007 | | Action Break_Optional ; Debug Table 0x0.0xa = 0x25,0xfff5
0026 4804 |H | Short_Literal 0x4 ; Debug Table 0x0.0xb = 0x26,0xfff4
0027 032b | + | Declare_Type Record,Incomplete,Visible
0028 029a 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xc = 0x28,0xfff3
002a 029a 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xd = 0x2a,0xfff2
002c 029a 00bb | | Declare_Subprogram INIT_00b8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xe = 0x2c,0xfff1
002e 029a 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xf = 0x2e,0xfff0
0030 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x10 = 0x30,0xffef
0031 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0032 e213 | | Load 0x1,0x13
0033 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0034 02a0 | | Declare_Subprogram Null_Subprogram
0035 e214 | | Load 0x1,0x14
0036 0326 | & | Complete_Type Record,By_Defining
0037 e213 | | Load 0x1,0x13 ; Debug Table 0x0.0x11 = 0x37,0xffee
0038 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
0039 e219 | | Load 0x1,0x19
003a 0325 | % | Complete_Type Record,By_Renaming
003b 00bf | | Action Accept_Activation
003c 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1 = .DEBUG 0x003c,0x0150,0xc000,0x0000,0x0037,0x5944,0x0000,0x0003
; Debug Table 0x1.0x0 = 0x3c,0xffff
003d 00c7 | | Action Elaborate_Subprogram
003e 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x1 = 0x3e,0xfffe
003f 00c7 | | Action Elaborate_Subprogram
0040 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0x2 = 0x40,0xfffd
0041 00c7 | | Action Elaborate_Subprogram
0042 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0x3 = 0x42,0xfffc
0043 00c7 | | Action Elaborate_Subprogram
0044 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0x4 = 0x44,0xfffb
0045 00c7 | | Action Elaborate_Subprogram
0046 1d1b | | Execute_Immediate Reference_Lex_1,0x1b ; Debug Table 0x1.0x5 = 0x46,0xfffa
0047 00c7 | | Action Elaborate_Subprogram
0048 1d1c | | Execute_Immediate Reference_Lex_1,0x1c ; Debug Table 0x1.0x6 = 0x48,0xfff9
0049 00c7 | | Action Elaborate_Subprogram
004a 1d1d | | Execute_Immediate Reference_Lex_1,0x1d ; Debug Table 0x1.0x7 = 0x4a,0xfff8
004b 00c7 | | Action Elaborate_Subprogram
004c BODY_0008:
004c 00bc | | Action Signal_Activated
004d 00bb | | Action Signal_Completion
004e 0000 0000 | | .XXX[0x2]
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 0053 | S | .CONST 0x0053 ; Address of begin
0051 0004 | | .CONST 0x0004 ; Address of exception handler
0052 0001 | | .CONST 0x0001 ; Number of locals
0053 BODY_0050:
0053 INIT_0050:
0053 00db | | Load_Top At_Offset_3 ; Debug Table 0x2 = .DEBUG 0x0053,0x0162,0x1002,0x0000,0x0037,0x57a4,0x0000,0x0047
; Debug Table 0x2.0x0 = 0x53,0x1
0054 e20f | | Load 0x1,0xf
0055 0119 | | Execute Any,Check_In_Formal_Type
0056 00db | | Load_Top At_Offset_3
0057 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0058 e213 | | Load 0x1,0x13
0059 1815 | | Execute Package,Field_Execute,Field_Number 0x15
005a e001 | | Load 0x0,0x1
005b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
005c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
005d 0000 0000 | | .XXX[0x3]
005f 0000 | |
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0063 | c | .CONST 0x0063 ; Address of begin
0061 0004 | | .CONST 0x0004 ; Address of exception handler
0062 0001 | | .CONST 0x0001 ; Number of locals
0063 BODY_0060:
0063 INIT_0060:
0063 e213 | | Load 0x1,0x13 ; Debug Table 0x3 = .DEBUG 0x0063,0x0166,0x1001,0x0000,0x0037,0x57a4,0x0000,0x0054
; Debug Table 0x3.0x0 = 0x63,0x1
0064 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0065 e213 | | Load 0x1,0x13
0066 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0067 00e4 | | Load_Encached Positive_Cache
0068 025b | [ | Execute Discrete,Check_In_Type
0069 e213 | | Load 0x1,0x13
006a 181a | | Execute Package,Field_Execute,Field_Number 0x1a
006b e5fe | | Load 0x2,-0x2
006c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
006d 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x1 = 0x6d,0x2
006e e001 | | Load 0x0,0x1
006f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0070 e5fe | | Load 0x2,-0x2
0071 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0072 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0073 0000 0000 | | .BLANK 0000[0x5]
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007d | } | .CONST 0x007d ; Address of begin
0079 0004 | | .CONST 0x0004 ; Address of exception handler
007a 0002 | | .CONST 0x0002 ; Number of locals
007b INIT_0078:
007b e001 | | Load 0x0,0x1 ; Debug Table 0x4 = .DEBUG 0x007b,0x016c,0x1001,0x0000,0x0037,0x57a4,0x0000,0x0061
; Debug Table 0x4.0x0 = 0x7b,0xffff
007c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
007d BODY_0078:
007d 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x1 = 0x7d,0x1
007e e5fc | | Load 0x2,-0x4
007f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0080 e5fe | | Load 0x2,-0x2
0081 e001 | | Load 0x0,0x1
0082 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0083 0039 | 9 | Store_Top Access,At_Offset_1
0084 e5fc | | Load 0x2,-0x4 ; Debug Table 0x4.0x2 = 0x84,0x2
0085 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0086 e5fd | | Load 0x2,-0x3
0087 00da | | Load_Top At_Offset_2
0088 e5ff | | Load 0x2,-0x1
0089 e20f | | Load 0x1,0xf
008a 0119 | | Execute Any,Check_In_Formal_Type
008b e213 | | Load 0x1,0x13
008c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
008d e5fc | | Load 0x2,-0x4
008e 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
008f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
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 00db | | Load_Top At_Offset_3 ; Debug Table 0x5 = .DEBUG 0x0093,0x0174,0x1001,0x0000,0x0037,0x57a4,0x0000,0x0076
; Debug Table 0x5.0x0 = 0x93,0x1
0094 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0095 00db | | Load_Top At_Offset_3
0096 e20f | | Load 0x1,0xf
0097 0119 | | Execute Any,Check_In_Formal_Type
0098 e213 | | Load 0x1,0x13
0099 1819 | | Execute Package,Field_Execute,Field_Number 0x19
009a e5fe | | Load 0x2,-0x2
009b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
009c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
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 00db | | Load_Top At_Offset_3 ; Debug Table 0x6 = .DEBUG 0x00a3,0x0178,0x1001,0x0000,0x0037,0x57a4,0x0000,0x0094
; Debug Table 0x6.0x0 = 0xa3,0x1
00a4 00db | | Load_Top At_Offset_3
00a5 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00a6 e213 | | Load 0x1,0x13
00a7 181f | | Execute Package,Field_Execute,Field_Number 0x1f
00a8 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00a9 0000 0000 | | .BLANK 0000[0x7]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3 | | .CONST 0x00b3 ; Address of begin
00b1 0004 | | .CONST 0x0004 ; Address of exception handler
00b2 0001 | | .CONST 0x0001 ; Number of locals
00b3 BODY_00b0:
00b3 INIT_00b0:
00b3 00da | | Load_Top At_Offset_2 ; Debug Table 0x7 = .DEBUG 0x00b3,0x017c,0x1001,0x0000,0x0037,0x57a4,0x0000,0x00a0
; Debug Table 0x7.0x0 = 0xb3,0x1
00b4 e213 | | Load 0x1,0x13
00b5 1820 | | Execute Package,Field_Execute,Field_Number 0x20
00b6 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00b7 0000 | | .XXX[0x1]
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00bb | | .CONST 0x00bb ; Address of begin
00b9 0004 | | .CONST 0x0004 ; Address of exception handler
00ba 0001 | | .CONST 0x0001 ; Number of locals
00bb BODY_00b8:
00bb INIT_00b8:
00bb 00da | | Load_Top At_Offset_2 ; Debug Table 0x8 = .DEBUG 0x00bb,0x0180,0x1002,0x0000,0x0037,0x57a4,0x0000,0x00a8
; Debug Table 0x8.0x0 = 0xbb,0x1
00bc e213 | | Load 0x1,0x13
00bd 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
00be e20f | | Load 0x1,0xf
00bf 0119 | | Execute Any,Check_In_Formal_Type
00c0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00c1 0000 0000 | | .BLANK 0000[0x7]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb | | .CONST 0x00cb ; Address of begin
00c9 0004 | | .CONST 0x0004 ; Address of exception handler
00ca 0001 | | .CONST 0x0001 ; Number of locals
00cb BODY_00c8:
00cb INIT_00c8:
00cb 00da | | Load_Top At_Offset_2 ; Debug Table 0x9 = .DEBUG 0x00cb,0x0184,0x1002,0x0000,0x0037,0x57a4,0x0000,0x00b1
; Debug Table 0x9.0x0 = 0xcb,0x1
00cc e213 | | Load 0x1,0x13
00cd 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
00ce 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00cf 0000 | | .XXX[0x1]
00d0 0000 0000 | | .LITERAL {0x00000000, 0x003757a4}
00d4 0000 0000 | | .BLANK 0000[0x4]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; Debug Table
00d8 ; --------------------------------------------------------------------------------------
00d8 0003 000a | | .CONST 0x0003,0x000a
00da 000b 012a | *| .DEBUG 0x000b,0x012a,0xc000,0x0000,0x0037,0x57a4,0x0000,0x0007
00e2 003c 0150 | < P| .DEBUG 0x003c,0x0150,0xc000,0x0000,0x0037,0x5944,0x0000,0x0003
00ea 0053 0162 | S b| .DEBUG 0x0053,0x0162,0x1002,0x0000,0x0037,0x57a4,0x0000,0x0047
00f2 0063 0166 | c f| .DEBUG 0x0063,0x0166,0x1001,0x0000,0x0037,0x57a4,0x0000,0x0054
00fa 007b 016c | { l| .DEBUG 0x007b,0x016c,0x1001,0x0000,0x0037,0x57a4,0x0000,0x0061
0102 0093 0174 | t| .DEBUG 0x0093,0x0174,0x1001,0x0000,0x0037,0x57a4,0x0000,0x0076
010a 00a3 0178 | x| .DEBUG 0x00a3,0x0178,0x1001,0x0000,0x0037,0x57a4,0x0000,0x0094
0112 00b3 017c | || .DEBUG 0x00b3,0x017c,0x1001,0x0000,0x0037,0x57a4,0x0000,0x00a0
011a 00bb 0180 | | .DEBUG 0x00bb,0x0180,0x1002,0x0000,0x0037,0x57a4,0x0000,0x00a8
0122 00cb 0184 | | .DEBUG 0x00cb,0x0184,0x1002,0x0000,0x0037,0x57a4,0x0000,0x00b1
012a ; --------------------------------------------------------------------------------------
012a ; Debug3 Subtable 0x0
012a ; --------------------------------------------------------------------------------------
012a 0012 0000 | | .DBG3TAB 0x0012,0x0000
012c 000b ffff | | .CONST 0x000b,0xffff
012e 000c fffe | | .CONST 0x000c,0xfffe
0130 000d fffd | | .CONST 0x000d,0xfffd
0132 000f fffc | | .CONST 0x000f,0xfffc
0134 001a fffb | | .CONST 0x001a,0xfffb
0136 001c fffa | | .CONST 0x001c,0xfffa
0138 001e fff9 | | .CONST 0x001e,0xfff9
013a 0020 fff8 | | .CONST 0x0020,0xfff8
013c 0022 fff7 | " | .CONST 0x0022,0xfff7
013e 0024 fff6 | $ | .CONST 0x0024,0xfff6
0140 0025 fff5 | % | .CONST 0x0025,0xfff5
0142 0026 fff4 | & | .CONST 0x0026,0xfff4
0144 0028 fff3 | ( | .CONST 0x0028,0xfff3
0146 002a fff2 | * | .CONST 0x002a,0xfff2
0148 002c fff1 | , | .CONST 0x002c,0xfff1
014a 002e fff0 | . | .CONST 0x002e,0xfff0
014c 0030 ffef | 0 | .CONST 0x0030,0xffef
014e 0037 ffee | 7 | .CONST 0x0037,0xffee
0150 ; --------------------------------------------------------------------------------------
0150 ; Debug3 Subtable 0x1
0150 ; --------------------------------------------------------------------------------------
0150 0008 0000 | | .DBG3TAB 0x0008,0x0000
0152 003c ffff | < | .CONST 0x003c,0xffff
0154 003e fffe | > | .CONST 0x003e,0xfffe
0156 0040 fffd | @ | .CONST 0x0040,0xfffd
0158 0042 fffc | B | .CONST 0x0042,0xfffc
015a 0044 fffb | D | .CONST 0x0044,0xfffb
015c 0046 fffa | F | .CONST 0x0046,0xfffa
015e 0048 fff9 | H | .CONST 0x0048,0xfff9
0160 004a fff8 | J | .CONST 0x004a,0xfff8
0162 ; --------------------------------------------------------------------------------------
0162 ; Debug3 Subtable 0x2
0162 ; --------------------------------------------------------------------------------------
0162 0000 0001 | | .DBG3TAB 0x0000,0x0001
0164 0053 0001 | S | .CONST 0x0053,0x0001
0166 ; --------------------------------------------------------------------------------------
0166 ; Debug3 Subtable 0x3
0166 ; --------------------------------------------------------------------------------------
0166 0000 0002 | | .DBG3TAB 0x0000,0x0002
0168 0063 0001 | c | .CONST 0x0063,0x0001
016a 006d 0002 | m | .CONST 0x006d,0x0002
016c ; --------------------------------------------------------------------------------------
016c ; Debug3 Subtable 0x4
016c ; --------------------------------------------------------------------------------------
016c 0001 0002 | | .DBG3TAB 0x0001,0x0002
016e 007b ffff | { | .CONST 0x007b,0xffff
0170 007d 0001 | } | .CONST 0x007d,0x0001
0172 0084 0002 | | .CONST 0x0084,0x0002
0174 ; --------------------------------------------------------------------------------------
0174 ; Debug3 Subtable 0x5
0174 ; --------------------------------------------------------------------------------------
0174 0000 0001 | | .DBG3TAB 0x0000,0x0001
0176 0093 0001 | | .CONST 0x0093,0x0001
0178 ; --------------------------------------------------------------------------------------
0178 ; Debug3 Subtable 0x6
0178 ; --------------------------------------------------------------------------------------
0178 0000 0001 | | .DBG3TAB 0x0000,0x0001
017a 00a3 0001 | | .CONST 0x00a3,0x0001
017c ; --------------------------------------------------------------------------------------
017c ; Debug3 Subtable 0x7
017c ; --------------------------------------------------------------------------------------
017c 0000 0001 | | .DBG3TAB 0x0000,0x0001
017e 00b3 0001 | | .CONST 0x00b3,0x0001
0180 ; --------------------------------------------------------------------------------------
0180 ; Debug3 Subtable 0x8
0180 ; --------------------------------------------------------------------------------------
0180 0000 0001 | | .DBG3TAB 0x0000,0x0001
0182 00bb 0001 | | .CONST 0x00bb,0x0001
0184 ; --------------------------------------------------------------------------------------
0184 ; Debug3 Subtable 0x9
0184 ; --------------------------------------------------------------------------------------
0184 0000 0001 | | .DBG3TAB 0x0000,0x0001
0186 00cb 0001 | | .CONST 0x00cb,0x0001
0188 0000 0000 | | .BLANK 0000[0x78]