|
|
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 - metrics - download
Length: 1024 (0x400)
Notes: 00_class, 5800_R1K_CODE, 74_tag, ELAB_segment_table, 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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 00c8 | | .CONST 0x00c8 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 00c0 | | .CONST 0x00c0 ; Offset to segment table (only in elab segments)
0007 8000 | | .CONST 0x8000 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 000e | | .CONST 0x000e ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0001 | | .CONST 0x0001 ; Number of locals
000b INIT_0008:
000b 029c 0013 | | Declare_Subprogram For_Outer_Call,Visible,INIT_0010
000d 00bf | | Action Accept_Activation
000e BODY_0008:
000e 00bc | | Action Signal_Activated
000f 00bb | | Action Signal_Completion
0010 ; --------------------------------------------------------------------------------------
0010 ; SUBPROGRAM
0010 ; --------------------------------------------------------------------------------------
0010 0015 | | .CONST 0x0015 ; Address of begin
0011 001a | | .CONST 0x001a ; Address of exception handler
0012 0002 | | .CONST 0x0002 ; Number of locals
0013 INIT_0010:
0013 029f 0023 | #| Declare_Subprogram For_Call,INIT_0020
0015 BODY_0010:
0015 8402 | | Call 0x2,0x2
0016 7801 |x | Jump 0x18
0017 0003 | | .XXX[0x1]
0018 006f | o | Action Break_Unconditional
0019 4503 |E | Exit_Subprogram 0x3
001a TRAP_0010:
001a 7801 |x | Jump 0x1c
001b 0003 | | .XXX[0x1]
001c 006f | o | Action Break_Unconditional
001d 00d8 | | Load_Top At_Offset_0
001e 0100 | | Execute Exception,Raise
001f 0000 | | .XXX[0x1]
0020 ; --------------------------------------------------------------------------------------
0020 ; SUBPROGRAM
0020 ; --------------------------------------------------------------------------------------
0020 0082 | | .CONST 0x0082 ; Address of begin
0021 0004 | | .CONST 0x0004 ; Address of exception handler
0022 000d | | .CONST 0x000d ; Number of locals
0023 INIT_0020:
0023 7801 |x | Jump 0x25
0024 0002 | | .XXX[0x1]
0025 006f | o | Action Break_Unconditional
0026 7854 |xT | Jump 0x7b
0027 4800 |H | Short_Literal 0x0
0028 6093 |` | Indirect_Literal Discrete,0xbc,{0x0007590a, 0x000000b0}
0029 02a0 | | Declare_Subprogram Null_Subprogram
002a 038e | | Declare_Type Package,Defined
002b 0387 | | Declare_Variable Package
002c 00d8 | | Load_Top At_Offset_0
002d 190d | | Execute Package,Field_Reference,Field_Number 0xd
002e 6089 |` | Indirect_Literal Discrete,0xb8,{0x00000000, 0x001fac04}
002f e002 | | Load 0x0,0x2
0030 e001 | | Load 0x0,0x1
0031 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0032 6081 |` | Indirect_Literal Discrete,0xb4,{0x00000000, 0x0036c804}
0033 e002 | | Load 0x0,0x2
0034 e001 | | Load 0x0,0x1
0035 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0036 6079 |`y | Indirect_Literal Discrete,0xb0,{0x00000000, 0x003d5804}
0037 e002 | | Load 0x0,0x2
0038 e001 | | Load 0x0,0x1
0039 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
003a 6071 |`q | Indirect_Literal Discrete,0xac,{0x00000000, 0x00372004}
003b e002 | | Load 0x0,0x2
003c e001 | | Load 0x0,0x1
003d 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
003e 190d | | Execute Package,Field_Reference,Field_Number 0xd
003f 6068 |`h | Indirect_Literal Discrete,0xa8,{0x00000000, 0x000b6004}
0040 e002 | | Load 0x0,0x2
0041 e001 | | Load 0x0,0x1
0042 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0043 190d | | Execute Package,Field_Reference,Field_Number 0xd
0044 605f |`_ | Indirect_Literal Discrete,0xa4,{0x00000000, 0x0004bc04}
0045 e002 | | Load 0x0,0x2
0046 e001 | | Load 0x0,0x1
0047 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0048 6057 |`W | Indirect_Literal Discrete,0xa0,{0x00000000, 0x00010804}
0049 e002 | | Load 0x0,0x2
004a e001 | | Load 0x0,0x1
004b 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
004c 604f |`O | Indirect_Literal Discrete,0x9c,{0x00000000, 0x003e1404}
004d e002 | | Load 0x0,0x2
004e e001 | | Load 0x0,0x1
004f 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0050 6047 |`G | Indirect_Literal Discrete,0x98,{0x00000000, 0x003ed004}
0051 e002 | | Load 0x0,0x2
0052 e001 | | Load 0x0,0x1
0053 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0054 603f |`? | Indirect_Literal Discrete,0x94,{0x00000000, 0x003d5404}
0055 e002 | | Load 0x0,0x2
0056 e001 | | Load 0x0,0x1
0057 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0058 4801 |H | Short_Literal 0x1
0059 4800 |H | Short_Literal 0x0
005a 00e5 | | Load_Encached Long_Integer_Cache
005b 02a0 | | Declare_Subprogram Null_Subprogram
005c 4801 |H | Short_Literal 0x1
005d 035d | ] | Declare_Type Array,Defined
005e 0337 | 7 | Declare_Variable Array
005f 6030 |`0 | Indirect_Literal Discrete,0x90,{0x00000001, 0x000206db}
0060 4807 |H | Short_Literal 0x7
0061 e608 | | Load 0x3,0x8
0062 e605 | | Load 0x3,0x5
0063 602c |`, | Indirect_Literal Discrete,0x90,{0x00000001, 0x000206db}
0064 4806 |H | Short_Literal 0x6
0065 e607 | | Load 0x3,0x7
0066 6029 |`) | Indirect_Literal Discrete,0x90,{0x00000001, 0x000206db}
0067 4805 |H | Short_Literal 0x5
0068 6027 |`' | Indirect_Literal Discrete,0x90,{0x00000001, 0x000206db}
0069 4804 |H | Short_Literal 0x4
006a 6025 |`% | Indirect_Literal Discrete,0x90,{0x00000001, 0x000206db}
006b 4803 |H | Short_Literal 0x3
006c 6023 |`# | Indirect_Literal Discrete,0x90,{0x00000001, 0x000206db}
006d 4802 |H | Short_Literal 0x2
006e 6021 |`! | Indirect_Literal Discrete,0x90,{0x00000001, 0x000206db}
006f 4801 |H | Short_Literal 0x1
0070 e60d | | Load 0x3,0xd
0071 e609 | | Load 0x3,0x9
0072 e60b | | Load 0x3,0xb
0073 e60a | | Load 0x3,0xa
0074 e606 | | Load 0x3,0x6
0075 4817 |H | Short_Literal 0x17
0076 e602 | | Load 0x3,0x2
0077 020e | | Execute Module,Augment_Imports
0078 e602 | | Load 0x3,0x2
0079 020f | | Execute Module,Activate
007a 7807 |x | Jump BODY_0020
007b 6010 |` | Indirect_Literal Discrete,0x8c,{0x00000000, 0x00001f40}
007c 600b |` | Indirect_Literal Discrete,0x88,{0x00000000, 0x00190c04}
007d e002 | | Load 0x0,0x2
007e e001 | | Load 0x0,0x1
007f 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0080 180d | | Execute Package,Field_Execute,Field_Number 0xd
0081 7fa5 | | Jump 0x27
0082 BODY_0020:
0082 e5fe | | Load 0x2,-0x2
0083 e5ff | | Load 0x2,-0x1
0084 8603 | | Call 0x3,0x3
0085 4501 |E | Exit_Subprogram 0x1
0086 0000 0000 | | .XXX[0x2]
0088 0000 0000 | | .LITERAL {0x00000000, 0x00190c04}
008c 0000 0000 | | .LITERAL {0x00000000, 0x00001f40}
0090 0000 0001 | | .LITERAL {0x00000001, 0x000206db}
0094 0000 0000 | | .LITERAL {0x00000000, 0x003d5404}
0098 0000 0000 | | .LITERAL {0x00000000, 0x003ed004}
009c 0000 0000 | | .LITERAL {0x00000000, 0x003e1404}
00a0 0000 0000 | | .LITERAL {0x00000000, 0x00010804}
00a4 0000 0000 | | .LITERAL {0x00000000, 0x0004bc04}
00a8 0000 0000 | | .LITERAL {0x00000000, 0x000b6004}
00ac 0000 0000 | | .LITERAL {0x00000000, 0x00372004}
00b0 0000 0000 | | .LITERAL {0x00000000, 0x003d5804}
00b4 0000 0000 | | .LITERAL {0x00000000, 0x0036c804}
00b8 0000 0000 | | .LITERAL {0x00000000, 0x001fac04}
00bc 0007 590a | Y | .LITERAL {0x0007590a, 0x000000b0}
00c0 ; --------------------------------------------------------------------------------------
00c0 ; Segment Table
00c0 ; --------------------------------------------------------------------------------------
00c0 0028 | ( | .XXX[0x1]
00c1 0000 0000 | | .BLANK 0000[0x7]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; Debug Table
00c8 ; --------------------------------------------------------------------------------------
00c8 0004 0002 | | .DEBUG4 0x0004,0x0002,0x06db,0x0000,0x0001,0x0000
00ce 2020 2020 | | .BLANK 2020[0x8]
00d6 4564 6974 |Edit| .XXX[0xc]
00d8 6f72 2e4d |or.M|
00da 6172 6b2e |ark.|
00dc 5072 6576 |Prev|
00de 696f 7573 |ious|
00e0 3b31 002f |;1 /|
00e2 2020 2020 | | .BLANK 2020[0xc]
00ee 7768 656e |when| .XXX[0xd]
00f0 2052 6967 | Rig|
00f2 6874 207c |ht ||
00f4 2053 5f52 | S_R|
00f6 6967 6874 |ight|
00f8 203d 3e2f | =>/|
00fa 002d | - |
00fb 2020 2020 | | .BLANK 2020[0xe]
0109 4564 6974 |Edit| .XXX[0xa]
010b 6f72 2e4d |or.M|
010d 6172 6b2e |ark.|
010f 4e65 7874 |Next|
0111 3b2d 0026 |;- &|
0113 2020 2020 | | .BLANK 2020[0xc]
011f 7768 656e |when| .XXX[0x9]
0121 206f 7468 | oth|
0123 6572 7320 |ers |
0125 3d3e 2600 |=>& |
0127 2120 |! |
0128 2020 2020 | | .BLANK 2020[0xd]
0135 206e 756c | nul| .XXX[0x5]
0137 6c3b 2100 |l;! |
0139 1d20 | |
013a 2020 2020 | | .BLANK 2020[0x9]
0143 2065 6e64 | end| .XXX[0x6]
0145 2063 6173 | cas|
0147 653b 1d00 |e; |
0149 2020 2020 | | .BLANK 2020[0x8]
0151 2077 6865 | whe| .XXX[0xa]
0153 6e20 4265 |n Be|
0155 6769 6e5f |gin_|
0157 4f66 203d |Of =|
0159 3e20 002d |> -|
015b 2020 2020 | | .BLANK 2020[0xa]
0165 4564 6974 |Edit| .XXX[0xe]
0167 6f72 2e4c |or.L|
0169 696e 652e |ine.|
016b 4265 6769 |Begi|
016d 6e6e 696e |nnin|
016f 675f 4f66 |g_Of|
0171 3b2d 001e |;- |
0173 2020 2020 | | .BLANK 2020[0x8]
017b 7768 656e |when| .XXX[0x9]
017d 2045 6e64 | End|
017f 5f4f 6620 |_Of |
0181 3d3e 1e00 |=> |
0183 2720 |' |
0184 2020 2020 | | .BLANK 2020[0x9]
018d 2045 6469 | Edi| .XXX[0xc]
018f 746f 722e |tor.|
0191 4c69 6e65 |Line|
0193 2e45 6e64 |.End|
0195 5f4f 663b |_Of;|
0197 2700 2920 |' ) |
0199 2020 2020 | | .BLANK 2020[0x7]
01a0 2077 6865 | whe| .XXX[0xf]
01a2 6e20 5072 |n Pr|
01a4 6f6d 6f74 |omot|
01a6 207c 2053 | | S|
01a8 5f50 726f |_Pro|
01aa 6d6f 7420 |mot |
01ac 3d3e 2900 |=>) |
01ae 2320 |# |
01af 2020 2020 | | .BLANK 2020[0x9]
01b8 2043 6f6d | Com| .XXX[0xa]
01ba 6d6f 6e2e |mon.|
01bc 5072 6f6d |Prom|
01be 6f74 653b |ote;|
01c0 2300 2920 |# ) |
01c2 2020 2020 | | .BLANK 2020[0x7]
01c9 2077 6865 | whe| .XXX[0xf]
01cb 6e20 436f |n Co|
01cd 6d70 6c74 |mplt|
01cf 207c 2053 | | S|
01d1 5f43 6f6d |_Com|
01d3 706c 7420 |plt |
01d5 3d3e 2900 |=>) |
01d7 2420 |$ |
01d8 2020 2020 | | .BLANK 2020[0x9]
01e1 2043 6f6d | Com| .XXX[0xa]
01e3 6d6f 6e2e |mon.|
01e5 436f 6d70 |Comp|
01e7 6c65 7465 |lete|
01e9 3b24 0029 |;$ )|
01eb 2020 2020 | | .BLANK 2020[0x8]
01f3 7768 656e |when| .XXX[0xd]
01f5 2046 6f72 | For|
01f7 6d61 7420 |mat |
01f9 7c20 535f || S_|
01fb 466f 726d |Form|
01fd 6174 203d |at =|
01ff 3e29 |>) |