|
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 0190 | | .CONST 0x0190 ; 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 e010 | | Load 0x0,0x10
0040 800e | | Call 0x0,0xe
0041 8011 | | Call 0x0,0x11
0042 8012 | | Call 0x0,0x12
0043 4800 |H | Short_Literal 0x0
0044 00da | | Load_Top At_Offset_2
0045 01d6 | | Execute Vector,Field_Write
0046 e00c | | Load 0x0,0xc
0047 01c3 | | Execute Vector,Check_In_Type
0048 8013 | | Call 0x0,0x13
0049 4803 |H | Short_Literal 0x3
004a 00da | | Load_Top At_Offset_2
004b 01d6 | | Execute Vector,Field_Write
004c e014 | | Load 0x0,0x14
004d 0337 | 7 | Declare_Variable Array
004e 8015 | | Call 0x0,0x15
004f 4800 |H | Short_Literal 0x0
0050 00da | | Load_Top At_Offset_2
0051 01d6 | | Execute Vector,Field_Write
0052 e014 | | Load 0x0,0x14
0053 01c3 | | Execute Vector,Check_In_Type
0054 8016 | | Call 0x0,0x16
0055 4804 |H | Short_Literal 0x4
0056 00da | | Load_Top At_Offset_2
0057 01d6 | | Execute Vector,Field_Write
0058 e017 | | Load 0x0,0x17
0059 0337 | 7 | Declare_Variable Array
005a 8015 | | Call 0x0,0x15
005b 4800 |H | Short_Literal 0x0
005c 00da | | Load_Top At_Offset_2
005d 01d6 | | Execute Vector,Field_Write
005e e017 | | Load 0x0,0x17
005f 01c3 | | Execute Vector,Check_In_Type
0060 8018 | | Call 0x0,0x18
0061 4805 |H | Short_Literal 0x5
0062 00da | | Load_Top At_Offset_2
0063 01d6 | | Execute Vector,Field_Write
0064 e019 | | Load 0x0,0x19
0065 0337 | 7 | Declare_Variable Array
0066 8015 | | Call 0x0,0x15
0067 4800 |H | Short_Literal 0x0
0068 00da | | Load_Top At_Offset_2
0069 01d6 | | Execute Vector,Field_Write
006a e019 | | Load 0x0,0x19
006b 01c3 | | Execute Vector,Check_In_Type
006c 801a | | Call 0x0,0x1a
006d 4806 |H | Short_Literal 0x6
006e 00da | | Load_Top At_Offset_2
006f 01d6 | | Execute Vector,Field_Write
0070 e01b | | Load 0x0,0x1b
0071 0337 | 7 | Declare_Variable Array
0072 8015 | | Call 0x0,0x15
0073 4800 |H | Short_Literal 0x0
0074 00da | | Load_Top At_Offset_2
0075 01d6 | | Execute Vector,Field_Write
0076 e01b | | Load 0x0,0x1b
0077 01c3 | | Execute Vector,Check_In_Type
0078 801c | | Call 0x0,0x1c
0079 4807 |H | Short_Literal 0x7
007a 00da | | Load_Top At_Offset_2
007b 01d6 | | Execute Vector,Field_Write
007c e01d | | Load 0x0,0x1d
007d 0337 | 7 | Declare_Variable Array
007e 8015 | | Call 0x0,0x15
007f 4800 |H | Short_Literal 0x0
0080 00da | | Load_Top At_Offset_2
0081 01d6 | | Execute Vector,Field_Write
0082 e01d | | Load 0x0,0x1d
0083 01c3 | | Execute Vector,Check_In_Type
0084 801e | | Call 0x0,0x1e
0085 4808 |H | Short_Literal 0x8
0086 00da | | Load_Top At_Offset_2
0087 01d6 | | Execute Vector,Field_Write
0088 e01f | | Load 0x0,0x1f
0089 0337 | 7 | Declare_Variable Array
008a 8015 | | Call 0x0,0x15
008b 4800 |H | Short_Literal 0x0
008c 00da | | Load_Top At_Offset_2
008d 01d6 | | Execute Vector,Field_Write
008e e01f | | Load 0x0,0x1f
008f 01c3 | | Execute Vector,Check_In_Type
0090 8020 | | Call 0x0,0x20
0091 4809 |H | Short_Literal 0x9
0092 00da | | Load_Top At_Offset_2
0093 01d6 | | Execute Vector,Field_Write
0094 e003 | | Load 0x0,0x3
0095 01c6 | | Execute Vector,Convert_To_Formal
0096 00ca | | Action Exit_Nullary_Function
0097 0000 | | .XXX[0x1]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 0109 | | .CONST 0x0109 ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0019 | | .CONST 0x0019 ; 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 e021 | ! | Load 0x0,0x21
00c0 02ff | | Declare_Variable Variant_Record
00c1 4800 |H | Short_Literal 0x0
00c2 e407 | | Load 0x2,0x7
00c3 8022 | " | Call 0x0,0x22
00c4 00d9 | | Load_Top At_Offset_1
00c5 016d | m | Execute Variant_Record,Structure_Write
00c6 e021 | ! | Load 0x0,0x21
00c7 02ff | | Declare_Variable Variant_Record
00c8 4800 |H | Short_Literal 0x0
00c9 e404 | | Load 0x2,0x4
00ca 8023 | # | Call 0x0,0x23
00cb 00d9 | | Load_Top At_Offset_1
00cc 016d | m | Execute Variant_Record,Structure_Write
00cd e021 | ! | Load 0x0,0x21
00ce 02ff | | Declare_Variable Variant_Record
00cf 4800 |H | Short_Literal 0x0
00d0 e40a | | Load 0x2,0xa
00d1 8024 | $ | Call 0x0,0x24
00d2 00d9 | | Load_Top At_Offset_1
00d3 016d | m | Execute Variant_Record,Structure_Write
00d4 e021 | ! | Load 0x0,0x21
00d5 02ff | | Declare_Variable Variant_Record
00d6 4800 |H | Short_Literal 0x0
00d7 e403 | | Load 0x2,0x3
00d8 8025 | % | Call 0x0,0x25
00d9 00d9 | | Load_Top At_Offset_1
00da 016d | m | Execute Variant_Record,Structure_Write
00db e021 | ! | Load 0x0,0x21
00dc 02ff | | Declare_Variable Variant_Record
00dd 4800 |H | Short_Literal 0x0
00de e405 | | Load 0x2,0x5
00df 8026 | & | Call 0x0,0x26
00e0 00d9 | | Load_Top At_Offset_1
00e1 016d | m | Execute Variant_Record,Structure_Write
00e2 e021 | ! | Load 0x0,0x21
00e3 02ff | | Declare_Variable Variant_Record
00e4 4800 |H | Short_Literal 0x0
00e5 e406 | | Load 0x2,0x6
00e6 8027 | ' | Call 0x0,0x27
00e7 00d9 | | Load_Top At_Offset_1
00e8 016d | m | Execute Variant_Record,Structure_Write
00e9 e021 | ! | Load 0x0,0x21
00ea 02ff | | Declare_Variable Variant_Record
00eb 4800 |H | Short_Literal 0x0
00ec e408 | | Load 0x2,0x8
00ed 8028 | ( | Call 0x0,0x28
00ee 00d9 | | Load_Top At_Offset_1
00ef 016d | m | Execute Variant_Record,Structure_Write
00f0 e021 | ! | Load 0x0,0x21
00f1 02ff | | Declare_Variable Variant_Record
00f2 00d8 | | Load_Top At_Offset_0
00f3 1c00 | | Execute_Immediate Run_Utility,0x0
00f4 e021 | ! | Load 0x0,0x21
00f5 02ff | | Declare_Variable Variant_Record
00f6 00d8 | | Load_Top At_Offset_0
00f7 1c00 | | Execute_Immediate Run_Utility,0x0
00f8 e021 | ! | Load 0x0,0x21
00f9 02ff | | Declare_Variable Variant_Record
00fa 00d8 | | Load_Top At_Offset_0
00fb 1c00 | | Execute_Immediate Run_Utility,0x0
00fc e021 | ! | Load 0x0,0x21
00fd 02ff | | Declare_Variable Variant_Record
00fe 00d8 | | Load_Top At_Offset_0
00ff 1c00 | | Execute_Immediate Run_Utility,0x0
0100 e021 | ! | Load 0x0,0x21
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 e029 | ) | Load 0x0,0x29
0106 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0107 0322 | " | Declare_Variable Record
0108 00e2 | | Load_Encached Integer_Cache
0109 BODY_0098:
0109 e02a | * | Load 0x0,0x2a
010a 4800 |H | Short_Literal 0x0
010b e402 | | Load 0x2,0x2
010c 802b | + | Call 0x0,0x2b
010d e02c | , | Load 0x0,0x2c
010e 802d | - | Call 0x0,0x2d
010f e412 | | Load 0x2,0x12
0110 016d | m | Execute Variant_Record,Structure_Write
0111 e412 | | Load 0x2,0x12
0112 4800 |H | Short_Literal 0x0
0113 e407 | | Load 0x2,0x7
0114 802e | . | Call 0x0,0x2e
0115 e411 | | Load 0x2,0x11
0116 800e | | Call 0x0,0xe
0117 e02c | , | Load 0x0,0x2c
0118 802f | / | Call 0x0,0x2f
0119 e030 | 0 | Load 0x0,0x30
011a 802d | - | Call 0x0,0x2d
011b e416 | | Load 0x2,0x16
011c 016d | m | Execute Variant_Record,Structure_Write
011d 00db | | Load_Top At_Offset_3
011e e412 | | Load 0x2,0x12
011f 8031 | 1 | Call 0x0,0x31
0120 e413 | | Load 0x2,0x13
0121 016d | m | Execute Variant_Record,Structure_Write
0122 e413 | | Load 0x2,0x13
0123 4800 |H | Short_Literal 0x0
0124 e404 | | Load 0x2,0x4
0125 8032 | 2 | Call 0x0,0x32
0126 e40d | | Load 0x2,0xd
0127 e412 | | Load 0x2,0x12
0128 8031 | 1 | Call 0x0,0x31
0129 e414 | | Load 0x2,0x14
012a 016d | m | Execute Variant_Record,Structure_Write
012b e414 | | Load 0x2,0x14
012c 4800 |H | Short_Literal 0x0
012d e403 | | Load 0x2,0x3
012e 8033 | 3 | Call 0x0,0x33
012f e40e | | Load 0x2,0xe
0130 e414 | | Load 0x2,0x14
0131 8031 | 1 | Call 0x0,0x31
0132 e415 | | Load 0x2,0x15
0133 016d | m | Execute Variant_Record,Structure_Write
0134 e415 | | Load 0x2,0x15
0135 4800 |H | Short_Literal 0x0
0136 e405 | | Load 0x2,0x5
0137 8034 | 4 | Call 0x0,0x34
0138 e40f | | Load 0x2,0xf
0139 e415 | | Load 0x2,0x15
013a 8031 | 1 | Call 0x0,0x31
013b 4800 |H | Short_Literal 0x0
013c e406 | | Load 0x2,0x6
013d 8035 | 5 | Call 0x0,0x35
013e e036 | 6 | Load 0x0,0x36
013f 4800 |H | Short_Literal 0x0
0140 e409 | | Load 0x2,0x9
0141 8037 | 7 | Call 0x0,0x37
0142 e411 | | Load 0x2,0x11
0143 8038 | 8 | Call 0x0,0x38
0144 09ff | | Execute_Immediate Binary_Scale,-0x1
0145 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0146 00d8 | | Load_Top At_Offset_0
0147 8039 | 9 | Call 0x0,0x39
0148 4800 |H | Short_Literal 0x0
0149 e408 | | Load 0x2,0x8
014a 803a | : | Call 0x0,0x3a
014b e03b | ; | Load 0x0,0x3b
014c 1814 | | Execute Package,Field_Execute,Field_Number 0x14
014d e03b | ; | Load 0x0,0x3b
014e 1816 | | Execute Package,Field_Execute,Field_Number 0x16
014f e029 | ) | Load 0x0,0x29
0150 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0151 00da | | Load_Top At_Offset_2
0152 017d | } | Execute Record,Structure_Write
0153 00d9 | | Load_Top At_Offset_1
0154 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0155 602e |`. | Indirect_Literal Discrete,0x184,{0x00000000, 0x0000ea60}
0156 0271 | q | Execute Discrete,Times
0157 005b | [ | Store_Top Discrete,At_Offset_3
0158 00da | | Load_Top At_Offset_2
0159 00da | | Load_Top At_Offset_2
015a 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
015b 4be8 |K | Short_Literal 0x3e8
015c 0271 | q | Execute Discrete,Times
015d 0273 | s | Execute Discrete,Plus
015e 005b | [ | Store_Top Discrete,At_Offset_3
015f 00da | | Load_Top At_Offset_2
0160 00da | | Load_Top At_Offset_2
0161 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0162 0273 | s | Execute Discrete,Plus
0163 005b | [ | Store_Top Discrete,At_Offset_3
0164 e03c | < | Load 0x0,0x3c
0165 00db | | Load_Top At_Offset_3
0166 00e0 | | Load_Encached Standard_Cache
0167 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0168 0092 0188 | | Action Push_String_Extended,0x188 ; " "
016a 01cc | | Execute Vector,Catenate
016b e412 | | Load 0x2,0x12
016c 8038 | 8 | Call 0x0,0x38
016d 00e0 | | Load_Encached Standard_Cache
016e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
016f 01cc | | Execute Vector,Catenate
0170 0092 0188 | | Action Push_String_Extended,0x188 ; " "
0172 01cc | | Execute Vector,Catenate
0173 e411 | | Load 0x2,0x11
0174 800e | | Call 0x0,0xe
0175 8038 | 8 | Call 0x0,0x38
0176 00e0 | | Load_Encached Standard_Cache
0177 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0178 01cc | | Execute Vector,Catenate
0179 0092 0188 | | Action Push_String_Extended,0x188 ; " "
017b 01cc | | Execute Vector,Catenate
017c e413 | | Load 0x2,0x13
017d 8038 | 8 | Call 0x0,0x38
017e 00e0 | | Load_Encached Standard_Cache
017f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0180 01cc | | Execute Vector,Catenate
0181 803d | = | Call 0x0,0x3d
0182 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0183 0000 | | .XXX[0x1]
0184 0000 0000 | | .LITERAL {0x00000000, 0x0000ea60}
0188 ; --------------------------------------------------------------------------------------
0188 ; STRING TABLE
0188 ; --------------------------------------------------------------------------------------
0188 0004 | | .STRTAB 0x0004->0x018a ; " "
0189 0003 | | .STREND 0x0003->0x018a
018a 2000 | | .STRTAB_STRINGS
018b 0000 0000 | | .BLANK 0000[0x5]
0190 ; --------------------------------------------------------------------------------------
0190 ; Debug Table
0190 ; --------------------------------------------------------------------------------------
0190 0004 0009 | | .DEBUG4 0x0004,0x0009,0x5298,0x0000,0x0001,0x0004
0196 000b 01a6 | | .DBG4T 0x000b,0x01a6,0x0000,0x0000
019a 0010 01aa | | .DBG4T 0x0010,0x01aa,0x0000,0x0000
019e 001b 01ae | | .DBG4T 0x001b,0x01ae,0x0002,0x0000
01a2 009b 01b1 | | .DBG4T 0x009b,0x01b1,0x0001,0x0000
01a6 ; --------------------------------------------------------------------------------------
01a6 ; Debug chain
01a6 ; --------------------------------------------------------------------------------------
01a6 0002 0000 | | .DBGLEN 0x0002,0x0000
01a8 000b 000d | | .DBGLNO 0x000b,0x000d
01aa ; --------------------------------------------------------------------------------------
01aa ; Debug chain
01aa ; --------------------------------------------------------------------------------------
01aa 0002 0000 | | .DBGLEN 0x0002,0x0000
01ac 0010 0012 | | .DBGLNO 0x0010,0x0012
01ae ; --------------------------------------------------------------------------------------
01ae ; Debug chain
01ae ; --------------------------------------------------------------------------------------
01ae 0000 0001 | | .DBGLEN 0x0000,0x0001
01b0 001b | | .DBGLNO 0x001b
01b1 ; --------------------------------------------------------------------------------------
01b1 ; Debug chain
01b1 ; --------------------------------------------------------------------------------------
01b1 0018 0014 | | .DBGLEN 0x0018,0x0014
01b3 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,0x0109,0x010d,0x0111,0x0115,0x0119,0x011d,0x0122,0x0126,0x012b,0x012f,0x0134,0x0138,0x013e,0x0142,0x0146,0x014b,0x0153,0x0158,0x015f,0x0164
01df 0000 0000 | | .BLANK 0000[0x21]