|
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 0078 | x | .CONST 0x0078 ; 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 0010 | | .CONST 0x0010 ; Number of locals
000b INIT_0008:
000b e001 | | Load 0x0,0x1 ; Debug Table 0x0 = .DEBUG 0x000b,0x00aa,0x8000,0x0000,0x0058,0x7ae5,0x0000,0x0009
; Debug Table 0x0.0x0 = 0xb,0xffff
; Debug Table 0x0.0x1 = 0xb,0xfffe
; Debug Table 0x0.0x2 = 0xb,0xfffd
; Debug Table 0x0.0x3 = 0xb,0xfffc
000c 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
000d 0129 | ) | Execute Any,Make_Visible
000e 4803 |H | Short_Literal 0x3 ; Debug Table 0x0.0x4 = 0xe,0xfffb
000f 604c |`L | Indirect_Literal Discrete,0x5c,{0x0055e40e, 0x00000630}
0010 02a0 | | Declare_Subprogram Null_Subprogram
0011 038d | | Declare_Type Package,Defined,Visible,Not_Elaborated
0012 029a 002b | +| Declare_Subprogram INIT_0028,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x12,0xfffa
0014 00bf | | Action Accept_Activation ; Debug Table 0x0.0x6 = 0x14,0xfff9
0015 4800 |H | Short_Literal 0x0 ; Debug Table 0x1 = .DEBUG 0x0015,0x00ba,0x8000,0x0000,0x0058,0x7d15,0x0000,0x0007
; Debug Table 0x1.0x0 = 0x15,0xffff
0016 00db | | Load_Top At_Offset_3
0017 03f1 | | Declare_Variable Discrete,With_Value
0018 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x1 = 0x18,0xfffd
; Debug Table 0x1.0x2 = 0x18,0xfffc
0019 4801 |H | Short_Literal 0x1
001a e20e | | Load 0x1,0xe
001b 020e | | Execute Module,Augment_Imports
001c 00da | | Load_Top At_Offset_2
001d 020d | | Execute Module,Elaborate
001e 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x3 = 0x1e,0xfffb
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 0033 | 3 | .CONST 0x0033 ; Address of begin
0029 0004 | | .CONST 0x0004 ; Address of exception handler
002a 0006 | | .CONST 0x0006 ; Number of locals
002b INIT_0028:
002b a002 | | Store_Unchecked 0x0,0x2 ; Debug Table 0x2 = .DEBUG 0x002b,0x00c4,0x0001,0x0000,0x0058,0x7ae5,0x0000,0x0056
; Debug Table 0x2.0x0 = 0x2b,0xffff
002c 00c6 | | Action Check_Subprogram_Elaborated
002d e001 | | Load 0x0,0x1
002e 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
002f 00e5 | | Load_Encached Long_Integer_Cache
0030 6027 |`' | Indirect_Literal Discrete,0x58,{0x00000000, 0x00587d15}
0031 487b |H{ | Short_Literal 0x7b
0032 4806 |H | Short_Literal 0x6
0033 BODY_0028:
0033 e210 | | Load 0x1,0x10 ; Debug Table 0x2.0x1 = 0x33,0x1
0034 e402 | | Load 0x2,0x2
0035 e403 | | Load 0x2,0x3
0036 4804 |H | Short_Literal 0x4
0037 4802 |H | Short_Literal 0x2
0038 0099 | | Action Reference_Dynamic
0039 8002 | | Call 0x0,0x2
003a 4800 |H | Short_Literal 0x0
003b e402 | | Load 0x2,0x2
003c e403 | | Load 0x2,0x3
003d 4804 |H | Short_Literal 0x4
003e 4802 |H | Short_Literal 0x2
003f 0099 | | Action Reference_Dynamic
0040 8002 | | Call 0x0,0x2
0041 027e | ~ | Execute Discrete,Not_Equal
0042 6813 |h | Jump_Zero 0x56
0043 e5f9 | | Load 0x2,-0x7 ; Debug Table 0x2.0x2 = 0x43,0x2
0044 e5fa | | Load 0x2,-0x6
0045 e5fb | | Load 0x2,-0x5
0046 e5fc | | Load 0x2,-0x4
0047 e5fd | | Load 0x2,-0x3
0048 e5fe | | Load 0x2,-0x2
0049 e5ff | | Load 0x2,-0x1
004a e210 | | Load 0x1,0x10
004b e003 | | Load 0x0,0x3
004c 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
004d 00d8 | | Load_Top At_Offset_0
004e e003 | | Load 0x0,0x3
004f 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0050 7003 |p | Jump_Nonzero 0x54
0051 e001 | | Load 0x0,0x1
0052 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0053 0257 | W | Execute Discrete,Raise
0054 180f | | Execute Package,Field_Execute,Field_Number 0xf
0055 c5f9 | | Store 0x2,-0x7
0056 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0057 0000 | | .XXX[0x1]
0058 0000 0000 | | .LITERAL {0x00000000, 0x00587d15}
005c 0055 e40e | U | .LITERAL {0x0055e40e, 0x00000630}
0060 0066 0004 | f | .XXX[0x3]
0062 0010 | |
0063 029c 0073 | s| Declare_Subprogram INIT_0070,For_Outer_Call,Visible ; Debug Table 0x3 = .DEBUG 0x0063,0x00cc,0x4000,0x0000,0x0058,0x7ae5,0x0000,0x001f
; Debug Table 0x3.0x0 = 0x63,0xffff
0065 00bf | | Action Accept_Activation ; Debug Table 0x3.0x1 = 0x65,0xfffe
0066 8210 | | Call 0x1,0x10 ; Debug Table 0x4 = .DEBUG 0x0066,0x00d2,0x4000,0x0000,0x0058,0x7d15,0x0000,0x004c
; Debug Table 0x4.0x0 = 0x66,0x1
0067 c001 | | Store 0x0,0x1
0068 00bc | | Action Signal_Activated
0069 00bb | | Action Signal_Completion
006a 0000 0000 | | .BLANK 0000[0x6]
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 00b6 | | Action Make_Scope ; Debug Table 0x5 = .DEBUG 0x0073,0x00d6,0x1002,0x0000,0x0058,0x7ae5,0x0000,0x0049
0074 020a | | Execute Module,Get_Name
0075 00ca | | Action Exit_Nullary_Function
0076 0000 0000 | | .XXX[0x2]
0078 ; --------------------------------------------------------------------------------------
0078 ; Debug Table
0078 ; --------------------------------------------------------------------------------------
0078 0003 0006 | | .CONST 0x0003,0x0006
007a 000b 00aa | | .DEBUG 0x000b,0x00aa,0x8000,0x0000,0x0058,0x7ae5,0x0000,0x0009
0082 0015 00ba | | .DEBUG 0x0015,0x00ba,0x8000,0x0000,0x0058,0x7d15,0x0000,0x0007
008a 002b 00c4 | + | .DEBUG 0x002b,0x00c4,0x0001,0x0000,0x0058,0x7ae5,0x0000,0x0056
0092 0063 00cc | c | .DEBUG 0x0063,0x00cc,0x4000,0x0000,0x0058,0x7ae5,0x0000,0x001f
009a 0066 00d2 | f | .DEBUG 0x0066,0x00d2,0x4000,0x0000,0x0058,0x7d15,0x0000,0x004c
00a2 0073 00d6 | s | .DEBUG 0x0073,0x00d6,0x1002,0x0000,0x0058,0x7ae5,0x0000,0x0049
00aa ; --------------------------------------------------------------------------------------
00aa ; Debug3 Subtable 0x0
00aa ; --------------------------------------------------------------------------------------
00aa 0007 0000 | | .DBG3TAB 0x0007,0x0000
00ac 000b ffff | | .CONST 0x000b,0xffff
00ae 000b fffe | | .CONST 0x000b,0xfffe
00b0 000b fffd | | .CONST 0x000b,0xfffd
00b2 000b fffc | | .CONST 0x000b,0xfffc
00b4 000e fffb | | .CONST 0x000e,0xfffb
00b6 0012 fffa | | .CONST 0x0012,0xfffa
00b8 0014 fff9 | | .CONST 0x0014,0xfff9
00ba ; --------------------------------------------------------------------------------------
00ba ; Debug3 Subtable 0x1
00ba ; --------------------------------------------------------------------------------------
00ba 0004 0000 | | .DBG3TAB 0x0004,0x0000
00bc 0015 ffff | | .CONST 0x0015,0xffff
00be 0018 fffd | | .CONST 0x0018,0xfffd
00c0 0018 fffc | | .CONST 0x0018,0xfffc
00c2 001e fffb | | .CONST 0x001e,0xfffb
00c4 ; --------------------------------------------------------------------------------------
00c4 ; Debug3 Subtable 0x2
00c4 ; --------------------------------------------------------------------------------------
00c4 0001 0002 | | .DBG3TAB 0x0001,0x0002
00c6 002b ffff | + | .CONST 0x002b,0xffff
00c8 0033 0001 | 3 | .CONST 0x0033,0x0001
00ca 0043 0002 | C | .CONST 0x0043,0x0002
00cc ; --------------------------------------------------------------------------------------
00cc ; Debug3 Subtable 0x3
00cc ; --------------------------------------------------------------------------------------
00cc 0002 0000 | | .DBG3TAB 0x0002,0x0000
00ce 0063 ffff | c | .CONST 0x0063,0xffff
00d0 0065 fffe | e | .CONST 0x0065,0xfffe
00d2 ; --------------------------------------------------------------------------------------
00d2 ; Debug3 Subtable 0x4
00d2 ; --------------------------------------------------------------------------------------
00d2 0000 0001 | | .DBG3TAB 0x0000,0x0001
00d4 0066 0001 | f | .CONST 0x0066,0x0001
00d6 ; --------------------------------------------------------------------------------------
00d6 ; Debug3 Subtable 0x5
00d6 ; --------------------------------------------------------------------------------------
00d6 0000 0000 | | .DBG3TAB 0x0000,0x0000
00d8 0000 0000 | | .BLANK 0000[0x128]