|
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, 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 00b0 | | .CONST 0x00b0 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 00ac | | .CONST 0x00ac ; 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 INIT_0010,For_Outer_Call,Visible
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 INIT_0020,For_Call
0015 BODY_0010:
0015 8402 | | Call 0x2,0x2
0016 7801 |x | Jump 0x18
0017 0003 | | .XXX[0x1]
0018 006f | o | Action Break_Unconditional
0019 4502 |E | Exit_Suprogram New_Top_Offset 0x2
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 0072 | r | .CONST 0x0072 ; 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 7844 |xD | Jump 0x6b
0027 4800 |H | Short_Literal 0x0
0028 607f |` | Indirect_Literal Discrete,0xa8,{0x0053650a, 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 6075 |`u | Indirect_Literal Discrete,0xa4,{0x00000000, 0x003d6804}
002f e002 | | Load 0x0,0x2
0030 e001 | | Load 0x0,0x1
0031 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0032 606d |`m | Indirect_Literal Discrete,0xa0,{0x00000000, 0x000cb004}
0033 e002 | | Load 0x0,0x2
0034 e001 | | Load 0x0,0x1
0035 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0036 6065 |`e | Indirect_Literal Discrete,0x9c,{0x00000000, 0x003eb804}
0037 e002 | | Load 0x0,0x2
0038 e001 | | Load 0x0,0x1
0039 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
003a 605d |`] | Indirect_Literal Discrete,0x98,{0x00000000, 0x003b6804}
003b e002 | | Load 0x0,0x2
003c e001 | | Load 0x0,0x1
003d 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
003e 6055 |`U | Indirect_Literal Discrete,0x94,{0x00000000, 0x003ec804}
003f e002 | | Load 0x0,0x2
0040 e001 | | Load 0x0,0x1
0041 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0042 604d |`M | Indirect_Literal Discrete,0x90,{0x00000000, 0x003ecc04}
0043 e002 | | Load 0x0,0x2
0044 e001 | | Load 0x0,0x1
0045 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0046 6045 |`E | Indirect_Literal Discrete,0x8c,{0x00000000, 0x003ed404}
0047 e002 | | Load 0x0,0x2
0048 e001 | | Load 0x0,0x1
0049 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
004a 603d |`= | Indirect_Literal Discrete,0x88,{0x00000000, 0x000ca404}
004b e002 | | Load 0x0,0x2
004c e001 | | Load 0x0,0x1
004d 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
004e 6035 |`5 | Indirect_Literal Discrete,0x84,{0x00000000, 0x003d5804}
004f e002 | | Load 0x0,0x2
0050 e001 | | Load 0x0,0x1
0051 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0052 602d |`- | Indirect_Literal Discrete,0x80,{0x00000000, 0x003e9404}
0053 e002 | | Load 0x0,0x2
0054 e001 | | Load 0x0,0x1
0055 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0056 4801 |H | Short_Literal 0x1
0057 4800 |H | Short_Literal 0x0
0058 00e5 | | Load_Encached Long_Integer_Cache
0059 02a0 | | Declare_Subprogram Null_Subprogram
005a 4801 |H | Short_Literal 0x1
005b 035d | ] | Declare_Type Array,Defined
005c 0337 | 7 | Declare_Variable Array
005d 00da | | Load_Top At_Offset_2
005e e609 | | Load 0x3,0x9
005f e60a | | Load 0x3,0xa
0060 e604 | | Load 0x3,0x4
0061 e607 | | Load 0x3,0x7
0062 e605 | | Load 0x3,0x5
0063 e60d | | Load 0x3,0xd
0064 e606 | | Load 0x3,0x6
0065 4809 |H | Short_Literal 0x9
0066 e602 | | Load 0x3,0x2
0067 020e | | Execute Module,Augment_Imports
0068 e602 | | Load 0x3,0x2
0069 020f | | Execute Module,Activate
006a 7807 |x | Jump BODY_0020
006b 6010 |` | Indirect_Literal Discrete,0x7c,{0x00000000, 0x00001f40}
006c 600b |` | Indirect_Literal Discrete,0x78,{0x00000000, 0x00190c04}
006d e002 | | Load 0x0,0x2
006e e001 | | Load 0x0,0x1
006f 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35
0070 180d | | Execute Package,Field_Execute,Field_Number 0xd
0071 7fb5 | | Jump 0x27
0072 BODY_0020:
0072 e5ff | | Load 0x2,-0x1
0073 8603 | | Call 0x3,0x3
0074 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0075 0000 0000 | | .XXX[0x3]
0077 0000 | |
0078 0000 0000 | | .LITERAL {0x00000000, 0x00190c04}
007c 0000 0000 | | .LITERAL {0x00000000, 0x00001f40}
0080 0000 0000 | | .LITERAL {0x00000000, 0x003e9404}
0084 0000 0000 | | .LITERAL {0x00000000, 0x003d5804}
0088 0000 0000 | | .LITERAL {0x00000000, 0x000ca404}
008c 0000 0000 | | .LITERAL {0x00000000, 0x003ed404}
0090 0000 0000 | | .LITERAL {0x00000000, 0x003ecc04}
0094 0000 0000 | | .LITERAL {0x00000000, 0x003ec804}
0098 0000 0000 | | .LITERAL {0x00000000, 0x003b6804}
009c 0000 0000 | | .LITERAL {0x00000000, 0x003eb804}
00a0 0000 0000 | | .LITERAL {0x00000000, 0x000cb004}
00a4 0000 0000 | | .LITERAL {0x00000000, 0x003d6804}
00a8 0053 650a | Se | .LITERAL {0x0053650a, 0x000000b0}
00ac ; --------------------------------------------------------------------------------------
00ac ; Segment Table
00ac ; --------------------------------------------------------------------------------------
00ac 0028 0000 | ( | .XXX[0x4]
00ae 0000 0000 | |
00b0 ; --------------------------------------------------------------------------------------
00b0 ; Debug Table
00b0 ; --------------------------------------------------------------------------------------
00b0 0004 0002 | | .DEBUG4 0x0004,0x0002,0x06d8,0x0000,0x0001,0x0000
00b6 2020 2020 | | .BLANK 2020[0x10]
00c6 576f 726b |Work| .XXX[0xf]
00c8 5f4f 7264 |_Ord|
00ca 6572 203d |er =|
00cc 3e20 223c |> "<|
00ce 4445 4641 |DEFA|
00d0 554c 543e |ULT>|
00d2 222c 3d00 |",= |
00d4 3c20 |< |
00d5 2020 2020 | | .BLANK 2020[0x11]
00e6 5265 7370 |Resp| .XXX[0xe]
00e8 6f6e 7365 |onse|
00ea 203d 3e20 | => |
00ec 223c 5052 |"<PR|
00ee 4f46 494c |OFIL|
00f0 453e 2229 |E>")|
00f2 3b3c 001d |;< |
00f4 2020 2020 | | .BLANK 2020[0x8]
00fc 7768 656e |when| .XXX[0x8]
00fe 2045 7363 | Esc|
0100 5f34 203d |_4 =|
0102 3e1d 003e |> >|
0104 2020 2020 | | .BLANK 2020[0xa]
010e 436d 7663 |Cmvc| .XXX[0x17]
0110 2e43 6865 |.Che|
0112 636b 5f4f |ck_O|
0114 7574 2028 |ut (|
0116 5768 6174 |What|
0118 5f4f 626a |_Obj|
011a 6563 7420 |ect |
011c 3d3e 2022 |=> "|
011e 3c43 5552 |<CUR|
0120 534f 523e |SOR>|
0122 222c 3e00 |",> |
0124 3320 |3 |
0125 2020 2020 | | .BLANK 2020[0x11]
0136 2043 6f6d | Com| .XXX[0xa]
0138 6d65 6e74 |ment|
013a 7320 3d3e |s =>|
013c 2022 222c | "",|
013e 3300 3c20 |3 < |
0140 2020 2020 | | .BLANK 2020[0x11]
0151 2041 6c6c | All| .XXX[0xe]
0153 6f77 5f44 |ow_D|
0155 656d 6f74 |emot|
0157 696f 6e20 |ion |
0159 3d3e 2046 |=> F|
015b 616c 7365 |alse|
015d 2c3c 004a |,< J|
015f 2020 2020 | | .BLANK 2020[0x12]
0171 416c 6c6f |Allo| .XXX[0x15]
0173 775f 496d |w_Im|
0175 706c 6963 |plic|
0177 6974 5f41 |it_A|
0179 6363 6570 |ccep|
017b 745f 4368 |t_Ch|
017d 616e 6765 |ange|
017f 7320 3d3e |s =>|
0181 2054 7275 | Tru|
0183 652c 4a00 |e,J |
0185 4b20 |K |
0186 2020 2020 | | .BLANK 2020[0x11]
0197 2045 7870 | Exp| .XXX[0x16]
0199 6563 7465 |ecte|
019b 645f 4368 |d_Ch|
019d 6563 6b5f |eck_|
019f 496e 5f54 |In_T|
01a1 696d 6520 |ime |
01a3 3d3e 2022 |=> "|
01a5 3c54 4f4d |<TOM|
01a7 4f52 524f |ORRO|
01a9 573e 222c |W>",|
01ab 4b00 3e20 |K > |
01ad 2020 2020 | | .BLANK 2020[0x11]
01be 2057 6f72 | Wor| .XXX[0xf]
01c0 6b5f 4f72 |k_Or|
01c2 6465 7220 |der |
01c4 3d3e 2022 |=> "|
01c6 3c44 4546 |<DEF|
01c8 4155 4c54 |AULT|
01ca 3e22 2c3e |>",>|
01cc 003d | = |
01cd 2020 2020 | | .BLANK 2020[0x12]
01df 5265 7370 |Resp| .XXX[0xe]
01e1 6f6e 7365 |onse|
01e3 203d 3e20 | => |
01e5 223c 5052 |"<PR|
01e7 4f46 494c |OFIL|
01e9 453e 2229 |E>")|
01eb 3b3d 0025 |;= %|
01ed 2020 2020 | | .BLANK 2020[0x8]
01f5 7768 656e |when| .XXX[0xb]
01f7 2045 7363 | Esc|
01f9 5f36 207c |_6 ||
01fb 2045 7363 | Esc|
01fd 5f43 6972 |_Cir|
01ff 6325 |c% |