|
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, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0cc8f6
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0188 | | .CONST 0x0188 ; 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 0014 | | .CONST 0x0014 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 000e | | .CONST 0x000e ; Number of locals
000b INIT_0008:
000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated
000d 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated
000f 00bf | | Action Accept_Activation
0010 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0011 00c7 | | Action Elaborate_Subprogram
0012 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0013 00c7 | | Action Elaborate_Subprogram
0014 BODY_0008:
0014 00bc | | Action Signal_Activated
0015 00bb | | Action Signal_Completion
0016 0000 0000 | | .XXX[0x2]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 001b | | .CONST 0x001b ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 0001 | | .CONST 0x0001 ; Number of locals
001b BODY_0018:
001b INIT_0018:
001b 4801 |H | Short_Literal 0x1
001c 4809 |H | Short_Literal 0x9
001d e003 | | Load 0x0,0x3
001e 035b | [ | Declare_Type Array,Constrained
001f 0337 | 7 | Declare_Variable Array
0020 e004 | | Load 0x0,0x4
0021 0337 | 7 | Declare_Variable Array
0022 e005 | | Load 0x0,0x5
0023 8006 | | Call 0x0,0x6
0024 4800 |H | Short_Literal 0x0
0025 00da | | Load_Top At_Offset_2
0026 01d6 | | Execute Vector,Field_Write
0027 e004 | | Load 0x0,0x4
0028 01c3 | | Execute Vector,Check_In_Type
0029 8007 | | Call 0x0,0x7
002a 4801 |H | Short_Literal 0x1
002b 00da | | Load_Top At_Offset_2
002c 01d6 | | Execute Vector,Field_Write
002d e008 | | Load 0x0,0x8
002e 0337 | 7 | Declare_Variable Array
002f e009 | | Load 0x0,0x9
0030 800a | | Call 0x0,0xa
0031 4800 |H | Short_Literal 0x0
0032 00da | | Load_Top At_Offset_2
0033 01d6 | | Execute Vector,Field_Write
0034 e008 | | Load 0x0,0x8
0035 01c3 | | Execute Vector,Check_In_Type
0036 800b | | Call 0x0,0xb
0037 4802 |H | Short_Literal 0x2
0038 00da | | Load_Top At_Offset_2
0039 01d6 | | Execute Vector,Field_Write
003a e00c | | Load 0x0,0xc
003b 0337 | 7 | Declare_Variable Array
003c e00d | | Load 0x0,0xd
003d 800e | | Call 0x0,0xe
003e 800f | | Call 0x0,0xf
003f 4800 |H | Short_Literal 0x0
0040 00da | | Load_Top At_Offset_2
0041 01d6 | | Execute Vector,Field_Write
0042 e00c | | Load 0x0,0xc
0043 01c3 | | Execute Vector,Check_In_Type
0044 8010 | | Call 0x0,0x10
0045 4803 |H | Short_Literal 0x3
0046 00da | | Load_Top At_Offset_2
0047 01d6 | | Execute Vector,Field_Write
0048 e011 | | Load 0x0,0x11
0049 0337 | 7 | Declare_Variable Array
004a 8012 | | Call 0x0,0x12
004b 4800 |H | Short_Literal 0x0
004c 00da | | Load_Top At_Offset_2
004d 01d6 | | Execute Vector,Field_Write
004e e011 | | Load 0x0,0x11
004f 01c3 | | Execute Vector,Check_In_Type
0050 8013 | | Call 0x0,0x13
0051 4804 |H | Short_Literal 0x4
0052 00da | | Load_Top At_Offset_2
0053 01d6 | | Execute Vector,Field_Write
0054 e014 | | Load 0x0,0x14
0055 0337 | 7 | Declare_Variable Array
0056 8012 | | Call 0x0,0x12
0057 4800 |H | Short_Literal 0x0
0058 00da | | Load_Top At_Offset_2
0059 01d6 | | Execute Vector,Field_Write
005a e014 | | Load 0x0,0x14
005b 01c3 | | Execute Vector,Check_In_Type
005c 8015 | | Call 0x0,0x15
005d 4805 |H | Short_Literal 0x5
005e 00da | | Load_Top At_Offset_2
005f 01d6 | | Execute Vector,Field_Write
0060 e016 | | Load 0x0,0x16
0061 0337 | 7 | Declare_Variable Array
0062 8012 | | Call 0x0,0x12
0063 4800 |H | Short_Literal 0x0
0064 00da | | Load_Top At_Offset_2
0065 01d6 | | Execute Vector,Field_Write
0066 e016 | | Load 0x0,0x16
0067 01c3 | | Execute Vector,Check_In_Type
0068 8017 | | Call 0x0,0x17
0069 4806 |H | Short_Literal 0x6
006a 00da | | Load_Top At_Offset_2
006b 01d6 | | Execute Vector,Field_Write
006c e018 | | Load 0x0,0x18
006d 0337 | 7 | Declare_Variable Array
006e 8012 | | Call 0x0,0x12
006f 4800 |H | Short_Literal 0x0
0070 00da | | Load_Top At_Offset_2
0071 01d6 | | Execute Vector,Field_Write
0072 e018 | | Load 0x0,0x18
0073 01c3 | | Execute Vector,Check_In_Type
0074 8019 | | Call 0x0,0x19
0075 4807 |H | Short_Literal 0x7
0076 00da | | Load_Top At_Offset_2
0077 01d6 | | Execute Vector,Field_Write
0078 e01a | | Load 0x0,0x1a
0079 0337 | 7 | Declare_Variable Array
007a 8012 | | Call 0x0,0x12
007b 4800 |H | Short_Literal 0x0
007c 00da | | Load_Top At_Offset_2
007d 01d6 | | Execute Vector,Field_Write
007e e01a | | Load 0x0,0x1a
007f 01c3 | | Execute Vector,Check_In_Type
0080 801b | | Call 0x0,0x1b
0081 4808 |H | Short_Literal 0x8
0082 00da | | Load_Top At_Offset_2
0083 01d6 | | Execute Vector,Field_Write
0084 e01c | | Load 0x0,0x1c
0085 0337 | 7 | Declare_Variable Array
0086 8012 | | Call 0x0,0x12
0087 4800 |H | Short_Literal 0x0
0088 00da | | Load_Top At_Offset_2
0089 01d6 | | Execute Vector,Field_Write
008a e01c | | Load 0x0,0x1c
008b 01c3 | | Execute Vector,Check_In_Type
008c 801d | | Call 0x0,0x1d
008d 4809 |H | Short_Literal 0x9
008e 00da | | Load_Top At_Offset_2
008f 01d6 | | Execute Vector,Field_Write
0090 e003 | | Load 0x0,0x3
0091 01c6 | | Execute Vector,Convert_To_Formal
0092 00ca | | Action Exit_Nullary_Function
0093 0000 0000 | | .BLANK 0000[0x5]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 0108 | | .CONST 0x0108 ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0018 | | .CONST 0x0018 ; Number of locals
009b INIT_0098:
009b 4801 |H | Short_Literal 0x1
009c 00db | | Load_Top At_Offset_3
009d 01d5 | | Execute Vector,Field_Reference
009e 0007 | | Action Break_Optional
009f 4802 |H | Short_Literal 0x2
00a0 e5ff | | Load 0x2,-0x1
00a1 01d5 | | Execute Vector,Field_Reference
00a2 0007 | | Action Break_Optional
00a3 4803 |H | Short_Literal 0x3
00a4 e5ff | | Load 0x2,-0x1
00a5 01d5 | | Execute Vector,Field_Reference
00a6 0007 | | Action Break_Optional
00a7 4804 |H | Short_Literal 0x4
00a8 e5ff | | Load 0x2,-0x1
00a9 01d5 | | Execute Vector,Field_Reference
00aa 0007 | | Action Break_Optional
00ab 4805 |H | Short_Literal 0x5
00ac e5ff | | Load 0x2,-0x1
00ad 01d5 | | Execute Vector,Field_Reference
00ae 0007 | | Action Break_Optional
00af 4806 |H | Short_Literal 0x6
00b0 e5ff | | Load 0x2,-0x1
00b1 01d5 | | Execute Vector,Field_Reference
00b2 0007 | | Action Break_Optional
00b3 4807 |H | Short_Literal 0x7
00b4 e5ff | | Load 0x2,-0x1
00b5 01d5 | | Execute Vector,Field_Reference
00b6 0007 | | Action Break_Optional
00b7 4808 |H | Short_Literal 0x8
00b8 e5ff | | Load 0x2,-0x1
00b9 01d5 | | Execute Vector,Field_Reference
00ba 0007 | | Action Break_Optional
00bb 4809 |H | Short_Literal 0x9
00bc e5ff | | Load 0x2,-0x1
00bd 01d5 | | Execute Vector,Field_Reference
00be 0007 | | Action Break_Optional
00bf e01e | | Load 0x0,0x1e
00c0 02ff | | Declare_Variable Variant_Record
00c1 4800 |H | Short_Literal 0x0
00c2 e407 | | Load 0x2,0x7
00c3 801f | | Call 0x0,0x1f
00c4 00d9 | | Load_Top At_Offset_1
00c5 016d | m | Execute Variant_Record,Structure_Write
00c6 e01e | | Load 0x0,0x1e
00c7 02ff | | Declare_Variable Variant_Record
00c8 4800 |H | Short_Literal 0x0
00c9 e404 | | Load 0x2,0x4
00ca 8020 | | Call 0x0,0x20
00cb 00d9 | | Load_Top At_Offset_1
00cc 016d | m | Execute Variant_Record,Structure_Write
00cd e01e | | Load 0x0,0x1e
00ce 02ff | | Declare_Variable Variant_Record
00cf 4800 |H | Short_Literal 0x0
00d0 e40a | | Load 0x2,0xa
00d1 8021 | ! | Call 0x0,0x21
00d2 00d9 | | Load_Top At_Offset_1
00d3 016d | m | Execute Variant_Record,Structure_Write
00d4 e01e | | Load 0x0,0x1e
00d5 02ff | | Declare_Variable Variant_Record
00d6 4800 |H | Short_Literal 0x0
00d7 e403 | | Load 0x2,0x3
00d8 8022 | " | Call 0x0,0x22
00d9 00d9 | | Load_Top At_Offset_1
00da 016d | m | Execute Variant_Record,Structure_Write
00db e01e | | Load 0x0,0x1e
00dc 02ff | | Declare_Variable Variant_Record
00dd 4800 |H | Short_Literal 0x0
00de e405 | | Load 0x2,0x5
00df 8023 | # | Call 0x0,0x23
00e0 00d9 | | Load_Top At_Offset_1
00e1 016d | m | Execute Variant_Record,Structure_Write
00e2 e01e | | Load 0x0,0x1e
00e3 02ff | | Declare_Variable Variant_Record
00e4 4800 |H | Short_Literal 0x0
00e5 e406 | | Load 0x2,0x6
00e6 8024 | $ | Call 0x0,0x24
00e7 00d9 | | Load_Top At_Offset_1
00e8 016d | m | Execute Variant_Record,Structure_Write
00e9 e01e | | Load 0x0,0x1e
00ea 02ff | | Declare_Variable Variant_Record
00eb 4800 |H | Short_Literal 0x0
00ec e408 | | Load 0x2,0x8
00ed 8025 | % | Call 0x0,0x25
00ee 00d9 | | Load_Top At_Offset_1
00ef 016d | m | Execute Variant_Record,Structure_Write
00f0 e01e | | Load 0x0,0x1e
00f1 02ff | | Declare_Variable Variant_Record
00f2 00d8 | | Load_Top At_Offset_0
00f3 1c00 | | Execute_Immediate Run_Utility,0x0
00f4 e01e | | Load 0x0,0x1e
00f5 02ff | | Declare_Variable Variant_Record
00f6 00d8 | | Load_Top At_Offset_0
00f7 1c00 | | Execute_Immediate Run_Utility,0x0
00f8 e01e | | Load 0x0,0x1e
00f9 02ff | | Declare_Variable Variant_Record
00fa 00d8 | | Load_Top At_Offset_0
00fb 1c00 | | Execute_Immediate Run_Utility,0x0
00fc e01e | | Load 0x0,0x1e
00fd 02ff | | Declare_Variable Variant_Record
00fe 00d8 | | Load_Top At_Offset_0
00ff 1c00 | | Execute_Immediate Run_Utility,0x0
0100 e01e | | Load 0x0,0x1e
0101 02ff | | Declare_Variable Variant_Record
0102 00d8 | | Load_Top At_Offset_0
0103 1c00 | | Execute_Immediate Run_Utility,0x0
0104 00e2 | | Load_Encached Integer_Cache
0105 e026 | & | Load 0x0,0x26
0106 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0107 0322 | " | Declare_Variable Record
0108 BODY_0098:
0108 e027 | ' | Load 0x0,0x27
0109 4800 |H | Short_Literal 0x0
010a e402 | | Load 0x2,0x2
010b 8028 | ( | Call 0x0,0x28
010c e029 | ) | Load 0x0,0x29
010d 802a | * | Call 0x0,0x2a
010e e412 | | Load 0x2,0x12
010f 016d | m | Execute Variant_Record,Structure_Write
0110 e412 | | Load 0x2,0x12
0111 4800 |H | Short_Literal 0x0
0112 e407 | | Load 0x2,0x7
0113 802b | + | Call 0x0,0x2b
0114 e411 | | Load 0x2,0x11
0115 800e | | Call 0x0,0xe
0116 e029 | ) | Load 0x0,0x29
0117 802c | , | Call 0x0,0x2c
0118 e02d | - | Load 0x0,0x2d
0119 802a | * | Call 0x0,0x2a
011a 00db | | Load_Top At_Offset_3
011b 016d | m | Execute Variant_Record,Structure_Write
011c 00da | | Load_Top At_Offset_2
011d e412 | | Load 0x2,0x12
011e 802e | . | Call 0x0,0x2e
011f e413 | | Load 0x2,0x13
0120 016d | m | Execute Variant_Record,Structure_Write
0121 e413 | | Load 0x2,0x13
0122 4800 |H | Short_Literal 0x0
0123 e404 | | Load 0x2,0x4
0124 802f | / | Call 0x0,0x2f
0125 e40d | | Load 0x2,0xd
0126 e412 | | Load 0x2,0x12
0127 802e | . | Call 0x0,0x2e
0128 e414 | | Load 0x2,0x14
0129 016d | m | Execute Variant_Record,Structure_Write
012a e414 | | Load 0x2,0x14
012b 4800 |H | Short_Literal 0x0
012c e403 | | Load 0x2,0x3
012d 8030 | 0 | Call 0x0,0x30
012e e40e | | Load 0x2,0xe
012f e414 | | Load 0x2,0x14
0130 802e | . | Call 0x0,0x2e
0131 e415 | | Load 0x2,0x15
0132 016d | m | Execute Variant_Record,Structure_Write
0133 00db | | Load_Top At_Offset_3
0134 4800 |H | Short_Literal 0x0
0135 e405 | | Load 0x2,0x5
0136 8031 | 1 | Call 0x0,0x31
0137 e40f | | Load 0x2,0xf
0138 e415 | | Load 0x2,0x15
0139 802e | . | Call 0x0,0x2e
013a 4800 |H | Short_Literal 0x0
013b e406 | | Load 0x2,0x6
013c 8032 | 2 | Call 0x0,0x32
013d e009 | | Load 0x0,0x9
013e 4800 |H | Short_Literal 0x0
013f e409 | | Load 0x2,0x9
0140 8033 | 3 | Call 0x0,0x33
0141 e009 | | Load 0x0,0x9
0142 4800 |H | Short_Literal 0x0
0143 e408 | | Load 0x2,0x8
0144 8034 | 4 | Call 0x0,0x34
0145 e035 | 5 | Load 0x0,0x35
0146 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0147 e035 | 5 | Load 0x0,0x35
0148 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0149 e026 | & | Load 0x0,0x26
014a 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
014b 00d9 | | Load_Top At_Offset_1
014c 017d | } | Execute Record,Structure_Write
014d 00d8 | | Load_Top At_Offset_0
014e 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
014f 6030 |`0 | Indirect_Literal Discrete,0x180,{0x00000000, 0x0000ea60}
0150 0271 | q | Execute Discrete,Times
0151 005a | Z | Store_Top Discrete,At_Offset_2
0152 00d9 | | Load_Top At_Offset_1
0153 00d9 | | Load_Top At_Offset_1
0154 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0155 4be8 |K | Short_Literal 0x3e8
0156 0271 | q | Execute Discrete,Times
0157 0273 | s | Execute Discrete,Plus
0158 005a | Z | Store_Top Discrete,At_Offset_2
0159 00d9 | | Load_Top At_Offset_1
015a 00d9 | | Load_Top At_Offset_1
015b 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
015c 0273 | s | Execute Discrete,Plus
015d 005a | Z | Store_Top Discrete,At_Offset_2
015e e036 | 6 | Load 0x0,0x36
015f 00da | | Load_Top At_Offset_2
0160 00e0 | | Load_Encached Standard_Cache
0161 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0162 0092 0184 | | Action Push_String_Extended,0x184 ; " "
0164 01cc | | Execute Vector,Catenate
0165 e412 | | Load 0x2,0x12
0166 8037 | 7 | Call 0x0,0x37
0167 00e0 | | Load_Encached Standard_Cache
0168 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0169 01cc | | Execute Vector,Catenate
016a 0092 0184 | | Action Push_String_Extended,0x184 ; " "
016c 01cc | | Execute Vector,Catenate
016d e411 | | Load 0x2,0x11
016e 800e | | Call 0x0,0xe
016f 8037 | 7 | Call 0x0,0x37
0170 00e0 | | Load_Encached Standard_Cache
0171 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0172 01cc | | Execute Vector,Catenate
0173 0092 0184 | | Action Push_String_Extended,0x184 ; " "
0175 01cc | | Execute Vector,Catenate
0176 e413 | | Load 0x2,0x13
0177 8037 | 7 | Call 0x0,0x37
0178 00e0 | | Load_Encached Standard_Cache
0179 1818 | | Execute Package,Field_Execute,Field_Number 0x18
017a 01cc | | Execute Vector,Catenate
017b 8038 | 8 | Call 0x0,0x38
017c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
017d 0000 0000 | | .XXX[0x3]
017f 0000 | |
0180 0000 0000 | | .LITERAL {0x00000000, 0x0000ea60}
0184 ; --------------------------------------------------------------------------------------
0184 ; STRING TABLE
0184 ; --------------------------------------------------------------------------------------
0184 0004 | | .STRTAB 0x0004->0x0186 ; " "
0185 0003 | | .STREND 0x0003->0x0186
0186 2000 | | .STRTAB_STRINGS
0187 0000 | | .XXX[0x1]
0188 ; --------------------------------------------------------------------------------------
0188 ; Debug Table
0188 ; --------------------------------------------------------------------------------------
0188 0004 0009 | | .DEBUG4 0x0004,0x0009,0x5296,0x0000,0x0001,0x0004
018e 000b 019e | | .DBG4T 0x000b,0x019e,0x0000,0x0000
0192 0010 01a2 | | .DBG4T 0x0010,0x01a2,0x0000,0x0000
0196 001b 01a6 | | .DBG4T 0x001b,0x01a6,0x0002,0x0000
019a 009b 01a9 | | .DBG4T 0x009b,0x01a9,0x0001,0x0000
019e ; --------------------------------------------------------------------------------------
019e ; Debug chain
019e ; --------------------------------------------------------------------------------------
019e 0002 0000 | | .DBGLEN 0x0002,0x0000
01a0 000b 000d | | .DBGLNO 0x000b,0x000d
01a2 ; --------------------------------------------------------------------------------------
01a2 ; Debug chain
01a2 ; --------------------------------------------------------------------------------------
01a2 0002 0000 | | .DBGLEN 0x0002,0x0000
01a4 0010 0012 | | .DBGLNO 0x0010,0x0012
01a6 ; --------------------------------------------------------------------------------------
01a6 ; Debug chain
01a6 ; --------------------------------------------------------------------------------------
01a6 0000 0001 | | .DBGLEN 0x0000,0x0001
01a8 001b | | .DBGLNO 0x001b
01a9 ; --------------------------------------------------------------------------------------
01a9 ; Debug chain
01a9 ; --------------------------------------------------------------------------------------
01a9 0017 0013 | | .DBGLEN 0x0017,0x0013
01ab 009b 009f | | .DBGLNO 0x009b,0x009f,0x00a3,0x00a7,0x00ab,0x00af,0x00b3,0x00b7,0x00bb,0x00bf,0x00c6,0x00cd,0x00d4,0x00db,0x00e2,0x00e9,0x00f0,0x00f4,0x00f8,0x00fc,0x0100,0x0104,0x0105,0x0108,0x010c,0x0110,0x0114,0x0118,0x011c,0x0121,0x0125,0x012a,0x012e,0x0133,0x0137,0x013d,0x0141,0x0145,0x014d,0x0152,0x0159,0x015e
01d5 0000 0000 | | .BLANK 0000[0x2b]