|
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 00e0 | | .CONST 0x00e0 ; 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 002a | * | .CONST 0x002a ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0013 | | .CONST 0x0013 ; Number of locals
000b INIT_0008:
000b 029a 0033 | 3| Declare_Subprogram INIT_0030,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x011a,0x8000,0x0000,0x0058,0x6c05,0x0000,0x0009
; Debug Table 0x0.0x0 = 0xb,0xffff
000d 00bf | | Action Accept_Activation
000e 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x000e,0x011e,0x8000,0x0000,0x0058,0x7505,0x0000,0x001b
; Debug Table 0x1.0x0 = 0xe,0xffff
000f 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0xf,0xfffe
0010 4801 |H | Short_Literal 0x1 ; Debug Table 0x1.0x2 = 0x10,0xfffd
0011 4802 |H | Short_Literal 0x2
0012 e001 | | Load 0x0,0x1
0013 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0014 029d 008b | | Declare_Subprogram INIT_0088,For_Outer_Call ; Debug Table 0x1.0x3 = 0x14,0xfffc
0016 029d 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call ; Debug Table 0x1.0x4 = 0x16,0xfffb
0018 029d 009b | | Declare_Subprogram INIT_0098,For_Outer_Call ; Debug Table 0x1.0x5 = 0x18,0xfffa
001a 029d 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call ; Debug Table 0x1.0x6 = 0x1a,0xfff9
001c 60af |` | Indirect_Literal Discrete,0xcc,{0x00000000, 0x00587505} ; Debug Table 0x1.0x7 = 0x1c,0xfff8
001d 48fc |H | Short_Literal 0xfc
001e e002 | | Load 0x0,0x2
001f 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0020 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0021 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0022 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0023 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0024 e003 | | Load 0x0,0x3
0025 0387 | | Declare_Variable Package
0026 00d8 | | Load_Top At_Offset_0
0027 020f | | Execute Module,Activate
0028 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x8 = 0x28,0xfff7
0029 00c7 | | Action Elaborate_Subprogram
002a BODY_0008:
002a 00bc | | Action Signal_Activated
002b 00bb | | Action Signal_Completion
002c 0000 0000 | | .BLANK 0000[0x4]
0030 ; --------------------------------------------------------------------------------------
0030 ; SUBPROGRAM
0030 ; --------------------------------------------------------------------------------------
0030 003d | = | .CONST 0x003d ; Address of begin
0031 0074 | t | .CONST 0x0074 ; Address of exception handler
0032 0005 | | .CONST 0x0005 ; Number of locals
0033 INIT_0030:
0033 e004 | | Load 0x0,0x4 ; Debug Table 0x2 = .DEBUG 0x0033,0x0132,0x0002,0x0000,0x0058,0x6c05,0x0000,0x000a
; Debug Table 0x2.0x0 = 0x33,0xffff
0034 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0035 0337 | 7 | Declare_Variable Array
0036 00d8 | | Load_Top At_Offset_0
0037 1c00 | | Execute_Immediate Run_Utility,0x0
0038 e005 | | Load 0x0,0x5 ; Debug Table 0x2.0x1 = 0x38,0xfffe
0039 1b11 | | Execute Package,Field_Read,Field_Number 0x11
003a 00f0 | | Load_Encached Segment_Cache ; Debug Table 0x2.0x2 = 0x3a,0xfffd
003b e002 | | Load 0x0,0x2 ; Debug Table 0x2.0x3 = 0x3b,0xfffc
003c 1b12 | | Execute Package,Field_Read,Field_Number 0x12
003d BODY_0030:
003d 00f0 | | Load_Encached Segment_Cache ; Debug Table 0x2.0x4 = 0x3d,0x1
003e 48f6 |H | Short_Literal 0xf6
003f e006 | | Load 0x0,0x6
0040 180d | | Execute Package,Field_Execute,Field_Number 0xd
0041 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0042 e002 | | Load 0x0,0x2 ; Debug Table 0x2.0x5 = 0x42,0x2
0043 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0044 00da | | Load_Top At_Offset_2
0045 039c | | Declare_Variable Heap_Access,By_Allocation
0046 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0047 0007 | | Action Break_Optional ; Debug Table 0x2.0x6 = 0x47,0x3
0048 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0x7 = 0x48,0x4
0049 00d9 | | Load_Top At_Offset_1
004a 0217 | | Execute Heap_Access,All_Reference
004b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
004c e002 | | Load 0x0,0x2 ; Debug Table 0x2.0x8 = 0x4c,0x5
004d 1b10 | | Execute Package,Field_Read,Field_Number 0x10
004e 00d9 | | Load_Top At_Offset_1
004f 0217 | | Execute Heap_Access,All_Reference
0050 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0051 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x9 = 0x51,0x6
0052 e005 | | Load 0x0,0x5
0053 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0054 e402 | | Load 0x2,0x2
0055 e002 | | Load 0x0,0x2
0056 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0057 e007 | | Load 0x0,0x7
0058 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0059 e5ff | | Load 0x2,-0x1
005a e213 | | Load 0x1,0x13
005b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
005c 00d1 | | Pop_Control Pop_Count_1
005d c403 | | Store 0x2,0x3
005e 0031 | 1 | Store_Top Heap_Access,At_Offset_1
005f 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0xa = 0x5f,0x7
0060 e005 | | Load 0x0,0x5
0061 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0062 700b |p | Jump_Nonzero 0x6e
0063 e5fe | | Load 0x2,-0x2 ; Debug Table 0x2.0xb = 0x63,0x8
0064 0092 00d0 | | Action Push_String_Extended,0xd0 ; "archiving work_order_list "
0066 e5ff | | Load 0x2,-0x1
0067 e008 | | Load 0x0,0x8
0068 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0069 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
006a 01cc | | Execute Vector,Catenate
006b e403 | | Load 0x2,0x3
006c e009 | | Load 0x0,0x9
006d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
006e e20e | | Load 0x1,0xe ; Debug Table 0x2.0xc = 0x6e,0x9
006f 00d9 | | Load_Top At_Offset_1
0070 e001 | | Load 0x0,0x1
0071 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0072 01cc | | Execute Vector,Catenate
0073 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0074 TRAP_0030:
0074 e005 | | Load 0x0,0x5
0075 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0076 010f | | Execute Exception,Equal
0077 6806 |h | Jump_Zero 0x7e
0078 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0xd = 0x78,0xa
0079 e006 | | Load 0x0,0x6
007a 180f | | Execute Package,Field_Execute,Field_Number 0xf
007b e00a | | Load 0x0,0xa ; Debug Table 0x2.0xe = 0x7b,0xb
007c 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
007d 0257 | W | Execute Discrete,Raise
007e 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0xf = 0x7e,0xc
007f e006 | | Load 0x0,0x6
0080 180f | | Execute Package,Field_Execute,Field_Number 0xf
0081 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x10 = 0x81,0xd
0082 0101 | | Execute Exception,Reraise
0083 0000 0000 | | .BLANK 0000[0x5]
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 00da | | Load_Top At_Offset_2 ; Debug Table 0x3 = .DEBUG 0x008b,0x0156,0x0002,0x0000,0x0058,0x7505,0x0000,0x0050
; Debug Table 0x3.0x0 = 0x8b,0x1
008c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
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 e008 | | Load 0x0,0x8 ; Debug Table 0x4 = .DEBUG 0x0093,0x015a,0x0001,0x0000,0x0058,0x7505,0x0000,0x0065
; Debug Table 0x4.0x0 = 0x93,0x1
0094 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0095 c5ff | | Store 0x2,-0x1
0096 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0097 0000 | | .XXX[0x1]
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 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x5 = .DEBUG 0x009b,0x015e,0x0001,0x0000,0x0058,0x7505,0x0000,0x007e
; Debug Table 0x5.0x0 = 0x9b,0x1
009c 0000 0000 | | .BLANK 0000[0x4]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a7 | | .CONST 0x00a7 ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0003 | | .CONST 0x0003 ; Number of locals
00a3 INIT_00a0:
00a3 e002 | | Load 0x0,0x2 ; Debug Table 0x6 = .DEBUG 0x00a3,0x0162,0x0001,0x0000,0x0058,0x7505,0x0000,0x0099
; Debug Table 0x6.0x0 = 0xa3,0xffff
00a4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00a5 e002 | | Load 0x0,0x2 ; Debug Table 0x6.0x1 = 0xa5,0xfffe
00a6 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00a7 BODY_00a0:
00a7 e5fe | | Load 0x2,-0x2 ; Debug Table 0x6.0x2 = 0xa7,0x1
00a8 e001 | | Load 0x0,0x1
00a9 180e | | Execute Package,Field_Execute,Field_Number 0xe
00aa e002 | | Load 0x0,0x2
00ab 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00ac e5fb | | Load 0x2,-0x5
00ad 0217 | | Execute Heap_Access,All_Reference
00ae 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00af 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
00b0 0032 | 2 | Store_Top Heap_Access,At_Offset_2
00b1 0007 | | Action Break_Optional ; Debug Table 0x6.0x3 = 0xb1,0x2
00b2 e002 | | Load 0x0,0x2 ; Debug Table 0x6.0x4 = 0xb2,0x3
00b3 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00b4 e5fb | | Load 0x2,-0x5
00b5 0217 | | Execute Heap_Access,All_Reference
00b6 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00b7 039c | | Declare_Variable Heap_Access,By_Allocation
00b8 0031 | 1 | Store_Top Heap_Access,At_Offset_1
00b9 0007 | | Action Break_Optional ; Debug Table 0x6.0x5 = 0xb9,0x4
00ba 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x6.0x6 = 0xba,0x5
00bb 00d9 | | Load_Top At_Offset_1
00bc 0217 | | Execute Heap_Access,All_Reference
00bd 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00be e5fb | | Load 0x2,-0x5 ; Debug Table 0x6.0x7 = 0xbe,0x6
00bf 0217 | | Execute Heap_Access,All_Reference
00c0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00c1 00d9 | | Load_Top At_Offset_1
00c2 0217 | | Execute Heap_Access,All_Reference
00c3 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00c4 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x8 = 0xc4,0x7
00c5 e5fb | | Load 0x2,-0x5
00c6 0217 | | Execute Heap_Access,All_Reference
00c7 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00c8 4505 |E | Exit_Suprogram New_Top_Offset 0x5
00c9 0000 0000 | | .XXX[0x3]
00cb 0000 | |
00cc 0000 0000 | | .LITERAL {0x00000000, 0x00587505}
00d0 ; --------------------------------------------------------------------------------------
00d0 ; STRING TABLE
00d0 ; --------------------------------------------------------------------------------------
00d0 0004 | | .STRTAB 0x0004->0x00d2 ; "archiving work_order_list "
00d1 001c | | .STREND 0x001c->0x00df
00d2 6172 6368 |arch| .STRTAB_STRINGS
00df 0000 | | .XXX[0x1]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; Debug Table
00e0 ; --------------------------------------------------------------------------------------
00e0 0003 0007 | | .CONST 0x0003,0x0007
00e2 000b 011a | | .DEBUG 0x000b,0x011a,0x8000,0x0000,0x0058,0x6c05,0x0000,0x0009
00ea 000e 011e | | .DEBUG 0x000e,0x011e,0x8000,0x0000,0x0058,0x7505,0x0000,0x001b
00f2 0033 0132 | 3 2| .DEBUG 0x0033,0x0132,0x0002,0x0000,0x0058,0x6c05,0x0000,0x000a
00fa 008b 0156 | V| .DEBUG 0x008b,0x0156,0x0002,0x0000,0x0058,0x7505,0x0000,0x0050
0102 0093 015a | Z| .DEBUG 0x0093,0x015a,0x0001,0x0000,0x0058,0x7505,0x0000,0x0065
010a 009b 015e | ^| .DEBUG 0x009b,0x015e,0x0001,0x0000,0x0058,0x7505,0x0000,0x007e
0112 00a3 0162 | b| .DEBUG 0x00a3,0x0162,0x0001,0x0000,0x0058,0x7505,0x0000,0x0099
011a ; --------------------------------------------------------------------------------------
011a ; Debug3 Subtable 0x0
011a ; --------------------------------------------------------------------------------------
011a 0001 0000 | | .DBG3TAB 0x0001,0x0000
011c 000b ffff | | .CONST 0x000b,0xffff
011e ; --------------------------------------------------------------------------------------
011e ; Debug3 Subtable 0x1
011e ; --------------------------------------------------------------------------------------
011e 0009 0000 | | .DBG3TAB 0x0009,0x0000
0120 000e ffff | | .CONST 0x000e,0xffff
0122 000f fffe | | .CONST 0x000f,0xfffe
0124 0010 fffd | | .CONST 0x0010,0xfffd
0126 0014 fffc | | .CONST 0x0014,0xfffc
0128 0016 fffb | | .CONST 0x0016,0xfffb
012a 0018 fffa | | .CONST 0x0018,0xfffa
012c 001a fff9 | | .CONST 0x001a,0xfff9
012e 001c fff8 | | .CONST 0x001c,0xfff8
0130 0028 fff7 | ( | .CONST 0x0028,0xfff7
0132 ; --------------------------------------------------------------------------------------
0132 ; Debug3 Subtable 0x2
0132 ; --------------------------------------------------------------------------------------
0132 0004 000d | | .DBG3TAB 0x0004,0x000d
0134 0033 ffff | 3 | .CONST 0x0033,0xffff
0136 0038 fffe | 8 | .CONST 0x0038,0xfffe
0138 003a fffd | : | .CONST 0x003a,0xfffd
013a 003b fffc | ; | .CONST 0x003b,0xfffc
013c 003d 0001 | = | .CONST 0x003d,0x0001
013e 0042 0002 | B | .CONST 0x0042,0x0002
0140 0047 0003 | G | .CONST 0x0047,0x0003
0142 0048 0004 | H | .CONST 0x0048,0x0004
0144 004c 0005 | L | .CONST 0x004c,0x0005
0146 0051 0006 | Q | .CONST 0x0051,0x0006
0148 005f 0007 | _ | .CONST 0x005f,0x0007
014a 0063 0008 | c | .CONST 0x0063,0x0008
014c 006e 0009 | n | .CONST 0x006e,0x0009
014e 0078 000a | x | .CONST 0x0078,0x000a
0150 007b 000b | { | .CONST 0x007b,0x000b
0152 007e 000c | ~ | .CONST 0x007e,0x000c
0154 0081 000d | | .CONST 0x0081,0x000d
0156 ; --------------------------------------------------------------------------------------
0156 ; Debug3 Subtable 0x3
0156 ; --------------------------------------------------------------------------------------
0156 0000 0001 | | .DBG3TAB 0x0000,0x0001
0158 008b 0001 | | .CONST 0x008b,0x0001
015a ; --------------------------------------------------------------------------------------
015a ; Debug3 Subtable 0x4
015a ; --------------------------------------------------------------------------------------
015a 0000 0001 | | .DBG3TAB 0x0000,0x0001
015c 0093 0001 | | .CONST 0x0093,0x0001
015e ; --------------------------------------------------------------------------------------
015e ; Debug3 Subtable 0x5
015e ; --------------------------------------------------------------------------------------
015e 0000 0001 | | .DBG3TAB 0x0000,0x0001
0160 009b 0001 | | .CONST 0x009b,0x0001
0162 ; --------------------------------------------------------------------------------------
0162 ; Debug3 Subtable 0x6
0162 ; --------------------------------------------------------------------------------------
0162 0002 0007 | | .DBG3TAB 0x0002,0x0007
0164 00a3 ffff | | .CONST 0x00a3,0xffff
0166 00a5 fffe | | .CONST 0x00a5,0xfffe
0168 00a7 0001 | | .CONST 0x00a7,0x0001
016a 00b1 0002 | | .CONST 0x00b1,0x0002
016c 00b2 0003 | | .CONST 0x00b2,0x0003
016e 00b9 0004 | | .CONST 0x00b9,0x0004
0170 00ba 0005 | | .CONST 0x00ba,0x0005
0172 00be 0006 | | .CONST 0x00be,0x0006
0174 00c4 0007 | | .CONST 0x00c4,0x0007
0176 0000 0000 | | .BLANK 0000[0x8a]