|
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 0068 | h | .CONST 0x0068 ; 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 0020 | | .CONST 0x0020 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0013 | | .CONST 0x0013 ; Number of locals
000b INIT_0008:
000b 029a 002b | +| Declare_Subprogram INIT_0028,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x0092,0x4000,0x0000,0x0056,0xd9d5,0x0000,0x01f0
; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 003b | ;| Declare_Subprogram INIT_0038,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 0053 | S| Declare_Subprogram INIT_0050,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 00bf | | Action Accept_Activation
0012 604d |`M | Indirect_Literal Discrete,0x60,{0x00000000, 0x0056dd05} ; Debug Table 0x1 = .DEBUG 0x0012,0x009a,0x4000,0x0000,0x0056,0xdd05,0x0000,0x0004
; Debug Table 0x1.0x0 = 0x12,0xffff
0013 4805 |H | Short_Literal 0x5
0014 e20f | | Load 0x1,0xf
0015 e001 | | Load 0x0,0x1
0016 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
0017 0387 | | Declare_Variable Package
0018 00d8 | | Load_Top At_Offset_0
0019 020f | | Execute Module,Activate
001a 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x1 = 0x1a,0xfffe
001b 00c7 | | Action Elaborate_Subprogram
001c 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x2 = 0x1c,0xfffd
001d 00c7 | | Action Elaborate_Subprogram
001e 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x3 = 0x1e,0xfffc
001f 00c7 | | Action Elaborate_Subprogram
0020 BODY_0008:
0020 00bc | | Action Signal_Activated
0021 00bb | | Action Signal_Completion
0022 0000 0000 | | .BLANK 0000[0x6]
0028 ; --------------------------------------------------------------------------------------
0028 ; SUBPROGRAM
0028 ; --------------------------------------------------------------------------------------
0028 002b | + | .CONST 0x002b ; Address of begin
0029 0004 | | .CONST 0x0004 ; Address of exception handler
002a 0001 | | .CONST 0x0001 ; Number of locals
002b BODY_0028:
002b INIT_0028:
002b 00db | | Load_Top At_Offset_3 ; Debug Table 0x2 = .DEBUG 0x002b,0x00a4,0x1002,0x0000,0x0056,0xd9d5,0x0000,0x01f6
; Debug Table 0x2.0x0 = 0x2b,0x1
002c 00db | | Load_Top At_Offset_3
002d 8002 | | Call 0x0,0x2
002e 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x1 = 0x2e,0x2
002f 00db | | Load_Top At_Offset_3
0030 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0031 e213 | | Load 0x1,0x13
0032 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0033 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0034 0000 0000 | | .BLANK 0000[0x4]
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 003b | ; | .CONST 0x003b ; Address of begin
0039 004a | J | .CONST 0x004a ; Address of exception handler
003a 0001 | | .CONST 0x0001 ; Number of locals
003b BODY_0038:
003b INIT_0038:
003b 00db | | Load_Top At_Offset_3 ; Debug Table 0x3 = .DEBUG 0x003b,0x00aa,0x1002,0x0000,0x0056,0xd9d5,0x0000,0x0203
; Debug Table 0x3.0x0 = 0x3b,0x1
003c 00db | | Load_Top At_Offset_3
003d 8002 | | Call 0x0,0x2
003e 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x1 = 0x3e,0x2
003f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0040 0e01 | | Execute_Immediate Not_Equal,0x1
0041 8003 | | Call 0x0,0x3
0042 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x2 = 0x42,0x3
0043 00db | | Load_Top At_Offset_3
0044 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0045 e213 | | Load 0x1,0x13
0046 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0047 e20f | | Load 0x1,0xf
0048 0119 | | Execute Any,Check_In_Formal_Type
0049 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
004a TRAP_0038:
004a 010e | | Execute Exception,Is_Constraint_Error
004b 6802 |h | Jump_Zero 0x4e
004c 4960 |I` | Short_Literal 0x160 ; Debug Table 0x3.0x3 = 0x4c,0x4
004d 0257 | W | Execute Discrete,Raise
004e 0100 | | Execute Exception,Raise
004f 0000 | | .XXX[0x1]
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 00da | | Load_Top At_Offset_2 ; Debug Table 0x4 = .DEBUG 0x0053,0x00b4,0x1001,0x0000,0x0056,0xd9d5,0x0000,0x0210
; Debug Table 0x4.0x0 = 0x53,0x1
0054 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0055 0e00 | | Execute_Immediate Not_Equal,0x0
0056 8003 | | Call 0x0,0x3
0057 e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x1 = 0x57,0x2
0058 e20f | | Load 0x1,0xf
0059 0119 | | Execute Any,Check_In_Formal_Type
005a e5fe | | Load 0x2,-0x2
005b e5ff | | Load 0x2,-0x1
005c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
005d e213 | | Load 0x1,0x13
005e 1812 | | Execute Package,Field_Execute,Field_Number 0x12
005f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0060 0000 0000 | | .LITERAL {0x00000000, 0x0056dd05}
0064 0000 0000 | | .BLANK 0000[0x4]
0068 ; --------------------------------------------------------------------------------------
0068 ; Debug Table
0068 ; --------------------------------------------------------------------------------------
0068 0003 0005 | | .CONST 0x0003,0x0005
006a 000b 0092 | | .DEBUG 0x000b,0x0092,0x4000,0x0000,0x0056,0xd9d5,0x0000,0x01f0
0072 0012 009a | | .DEBUG 0x0012,0x009a,0x4000,0x0000,0x0056,0xdd05,0x0000,0x0004
007a 002b 00a4 | + | .DEBUG 0x002b,0x00a4,0x1002,0x0000,0x0056,0xd9d5,0x0000,0x01f6
0082 003b 00aa | ; | .DEBUG 0x003b,0x00aa,0x1002,0x0000,0x0056,0xd9d5,0x0000,0x0203
008a 0053 00b4 | S | .DEBUG 0x0053,0x00b4,0x1001,0x0000,0x0056,0xd9d5,0x0000,0x0210
0092 ; --------------------------------------------------------------------------------------
0092 ; Debug3 Subtable 0x0
0092 ; --------------------------------------------------------------------------------------
0092 0003 0000 | | .DBG3TAB 0x0003,0x0000
0094 000b ffff | | .CONST 0x000b,0xffff
0096 000d fffe | | .CONST 0x000d,0xfffe
0098 000f fffd | | .CONST 0x000f,0xfffd
009a ; --------------------------------------------------------------------------------------
009a ; Debug3 Subtable 0x1
009a ; --------------------------------------------------------------------------------------
009a 0004 0000 | | .DBG3TAB 0x0004,0x0000
009c 0012 ffff | | .CONST 0x0012,0xffff
009e 001a fffe | | .CONST 0x001a,0xfffe
00a0 001c fffd | | .CONST 0x001c,0xfffd
00a2 001e fffc | | .CONST 0x001e,0xfffc
00a4 ; --------------------------------------------------------------------------------------
00a4 ; Debug3 Subtable 0x2
00a4 ; --------------------------------------------------------------------------------------
00a4 0000 0002 | | .DBG3TAB 0x0000,0x0002
00a6 002b 0001 | + | .CONST 0x002b,0x0001
00a8 002e 0002 | . | .CONST 0x002e,0x0002
00aa ; --------------------------------------------------------------------------------------
00aa ; Debug3 Subtable 0x3
00aa ; --------------------------------------------------------------------------------------
00aa 0000 0004 | | .DBG3TAB 0x0000,0x0004
00ac 003b 0001 | ; | .CONST 0x003b,0x0001
00ae 003e 0002 | > | .CONST 0x003e,0x0002
00b0 0042 0003 | B | .CONST 0x0042,0x0003
00b2 004c 0004 | L | .CONST 0x004c,0x0004
00b4 ; --------------------------------------------------------------------------------------
00b4 ; Debug3 Subtable 0x4
00b4 ; --------------------------------------------------------------------------------------
00b4 0000 0002 | | .DBG3TAB 0x0000,0x0002
00b6 0053 0001 | S | .CONST 0x0053,0x0001
00b8 0057 0002 | W | .CONST 0x0057,0x0002
00ba 0000 0000 | | .BLANK 0000[0x146]