|
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: 3072 (0xc00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_191cd7
└─⟦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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0410 | | .CONST 0x0410 ; 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 0002 | | .CONST 0x0002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0276 | v | .CONST 0x0276 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 005f | _ | .CONST 0x005f ; Number of locals
000b INIT_0008:
000b e002 | | Load 0x0,0x2
000c 02a0 | | Declare_Subprogram Null_Subprogram
000d 4801 |H | Short_Literal 0x1
000e 032e | . | Declare_Type Record,Defined,Visible
000f e003 | | Load 0x0,0x3
0010 0266 | f | Execute Discrete,Bounds
0011 00da | | Load_Top At_Offset_2
0012 02a0 | | Declare_Subprogram Null_Subprogram
0013 4801 |H | Short_Literal 0x1
0014 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
0015 00d8 | | Load_Top At_Offset_0
0016 02a0 | | Declare_Subprogram Null_Subprogram
0017 4818 |H | Short_Literal 0x18
0018 03d4 | | Declare_Type Access,Defined,Visible,Accesses_Protected
0019 00d8 | | Load_Top At_Offset_0
001a 0221 | ! | Execute Access,Allow_Deallocate
001b 0007 | | Action Break_Optional
001c 00da | | Load_Top At_Offset_2
001d 0322 | " | Declare_Variable Record
001e 4800 |H | Short_Literal 0x0
001f 00d9 | | Load_Top At_Offset_1
0020 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0021 0129 | ) | Execute Any,Make_Visible
0022 0007 | | Action Break_Optional
0023 00db | | Load_Top At_Offset_3
0024 0322 | " | Declare_Variable Record
0025 4800 |H | Short_Literal 0x0
0026 00d9 | | Load_Top At_Offset_1
0027 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0028 0129 | ) | Execute Any,Make_Visible
0029 a004 | | Store_Unchecked 0x0,0x4
002a 00c6 | | Action Check_Subprogram_Elaborated
002b 00db | | Load_Top At_Offset_3
002c 0129 | ) | Execute Any,Make_Visible
002d 00db | | Load_Top At_Offset_3
002e 0129 | ) | Execute Any,Make_Visible
002f e005 | | Load 0x0,0x5
0030 0129 | ) | Execute Any,Make_Visible
0031 e006 | | Load 0x0,0x6
0032 0129 | ) | Execute Any,Make_Visible
0033 4800 |H | Short_Literal 0x0
0034 0129 | ) | Execute Any,Make_Visible
0035 e003 | | Load 0x0,0x3
0036 0266 | f | Execute Discrete,Bounds
0037 e003 | | Load 0x0,0x3
0038 03f9 | | Declare_Type Discrete,Constrained,Visible
0039 0007 | | Action Break_Optional
003a e002 | | Load 0x0,0x2
003b 02a0 | | Declare_Subprogram Null_Subprogram
003c 4801 |H | Short_Literal 0x1
003d 032e | . | Declare_Type Record,Defined,Visible
003e 00d8 | | Load_Top At_Offset_0
003f 0322 | " | Declare_Variable Record
0040 4800 |H | Short_Literal 0x0
0041 00d9 | | Load_Top At_Offset_1
0042 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0043 0129 | ) | Execute Any,Make_Visible
0044 00d9 | | Load_Top At_Offset_1
0045 0322 | " | Declare_Variable Record
0046 4800 |H | Short_Literal 0x0
0047 00d9 | | Load_Top At_Offset_1
0048 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0049 0129 | ) | Execute Any,Make_Visible
004a 00da | | Load_Top At_Offset_2
004b 0322 | " | Declare_Variable Record
004c 4801 |H | Short_Literal 0x1
004d 00d9 | | Load_Top At_Offset_1
004e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
004f 0129 | ) | Execute Any,Make_Visible
0050 00db | | Load_Top At_Offset_3
0051 02a0 | | Declare_Subprogram Null_Subprogram
0052 4801 |H | Short_Literal 0x1
0053 032e | . | Declare_Type Record,Defined,Visible
0054 00d8 | | Load_Top At_Offset_0
0055 0322 | " | Declare_Variable Record
0056 00d8 | | Load_Top At_Offset_0
0057 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0058 4800 |H | Short_Literal 0x0
0059 00d0 | | Action Swap_Control
005a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
005b 0129 | ) | Execute Any,Make_Visible
005c e003 | | Load 0x0,0x3
005d 0266 | f | Execute Discrete,Bounds
005e 00db | | Load_Top At_Offset_3
005f 02a0 | | Declare_Subprogram Null_Subprogram
0060 4801 |H | Short_Literal 0x1
0061 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
0062 00d8 | | Load_Top At_Offset_0
0063 02a0 | | Declare_Subprogram Null_Subprogram
0064 4818 |H | Short_Literal 0x18
0065 03d4 | | Declare_Type Access,Defined,Visible,Accesses_Protected
0066 00d8 | | Load_Top At_Offset_0
0067 0221 | ! | Execute Access,Allow_Deallocate
0068 0007 | | Action Break_Optional
0069 0007 | | Action Break_Optional
006a a004 | | Store_Unchecked 0x0,0x4
006b 00c6 | | Action Check_Subprogram_Elaborated
006c 00d9 | | Load_Top At_Offset_1
006d 0129 | ) | Execute Any,Make_Visible
006e 00d9 | | Load_Top At_Offset_1
006f 0129 | ) | Execute Any,Make_Visible
0070 e007 | | Load 0x0,0x7
0071 0129 | ) | Execute Any,Make_Visible
0072 e008 | | Load 0x0,0x8
0073 0129 | ) | Execute Any,Make_Visible
0074 4800 |H | Short_Literal 0x0
0075 0129 | ) | Execute Any,Make_Visible
0076 4800 |H | Short_Literal 0x0
0077 481f |H | Short_Literal 0x1f
0078 029f 027b | {| Declare_Subprogram INIT_0278,For_Call
007a 03fe | | Declare_Type Discrete,Defined,Visible
007b 00d8 | | Load_Top At_Offset_0
007c 0266 | f | Execute Discrete,Bounds
007d 00e1 | | Load_Encached Boolean_Cache
007e 02a0 | | Declare_Subprogram Null_Subprogram
007f 4801 |H | Short_Literal 0x1
0080 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
0081 4800 |H | Short_Literal 0x0
0082 481f |H | Short_Literal 0x1f
0083 00da | | Load_Top At_Offset_2
0084 035c | \ | Declare_Type Array,Constrained,Visible
0085 4810 |H | Short_Literal 0x10
0086 481f |H | Short_Literal 0x1f
0087 00db | | Load_Top At_Offset_3
0088 035c | \ | Declare_Type Array,Constrained,Visible
0089 00d9 | | Load_Top At_Offset_1
008a 0336 | 6 | Declare_Variable Array,Visible
008b 00d8 | | Load_Top At_Offset_0
008c 0335 | 5 | Declare_Variable Array,Duplicate
008d 00cd | | Action Spare6_Action
008e 481f |H | Short_Literal 0x1f
008f 4800 |H | Short_Literal 0x0
0090 4800 |H | Short_Literal 0x0
0091 00d9 | | Load_Top At_Offset_1
0092 e22a | * | Load 0x1,0x2a
0093 01d6 | | Execute Vector,Field_Write
0094 3ffb |? | Loop_Increasing 0x90
0095 00d9 | | Load_Top At_Offset_1
0096 01d4 | | Execute Vector,Structure_Write
0097 00da | | Load_Top At_Offset_2
0098 0337 | 7 | Declare_Variable Array
0099 4801 |H | Short_Literal 0x1
009a 4819 |H | Short_Literal 0x19
009b 00da | | Load_Top At_Offset_2
009c 01d6 | | Execute Vector,Field_Write
009d 4801 |H | Short_Literal 0x1
009e 4818 |H | Short_Literal 0x18
009f 00da | | Load_Top At_Offset_2
00a0 01d6 | | Execute Vector,Field_Write
00a1 4801 |H | Short_Literal 0x1
00a2 4812 |H | Short_Literal 0x12
00a3 00da | | Load_Top At_Offset_2
00a4 01d6 | | Execute Vector,Field_Write
00a5 4811 |H | Short_Literal 0x11
00a6 4800 |H | Short_Literal 0x0
00a7 4800 |H | Short_Literal 0x0
00a8 00d9 | | Load_Top At_Offset_1
00a9 e22a | * | Load 0x1,0x2a
00aa 01d6 | | Execute Vector,Field_Write
00ab 3ffb |? | Loop_Increasing 0xa7
00ac 4817 |H | Short_Literal 0x17
00ad 4813 |H | Short_Literal 0x13
00ae 4800 |H | Short_Literal 0x0
00af 00d9 | | Load_Top At_Offset_1
00b0 e22a | * | Load 0x1,0x2a
00b1 01d6 | | Execute Vector,Field_Write
00b2 3ffb |? | Loop_Increasing 0xae
00b3 481f |H | Short_Literal 0x1f
00b4 481a |H | Short_Literal 0x1a
00b5 4800 |H | Short_Literal 0x0
00b6 00d9 | | Load_Top At_Offset_1
00b7 e22a | * | Load 0x1,0x2a
00b8 01d6 | | Execute Vector,Field_Write
00b9 3ffb |? | Loop_Increasing 0xb5
00ba 00db | | Load_Top At_Offset_3
00bb 01c3 | | Execute Vector,Check_In_Type
00bc 0129 | ) | Execute Any,Make_Visible
00bd 00db | | Load_Top At_Offset_3
00be 0337 | 7 | Declare_Variable Array
00bf 4801 |H | Short_Literal 0x1
00c0 4817 |H | Short_Literal 0x17
00c1 00da | | Load_Top At_Offset_2
00c2 01d6 | | Execute Vector,Field_Write
00c3 4801 |H | Short_Literal 0x1
00c4 4816 |H | Short_Literal 0x16
00c5 00da | | Load_Top At_Offset_2
00c6 01d6 | | Execute Vector,Field_Write
00c7 4801 |H | Short_Literal 0x1
00c8 4815 |H | Short_Literal 0x15
00c9 00da | | Load_Top At_Offset_2
00ca 01d6 | | Execute Vector,Field_Write
00cb 4801 |H | Short_Literal 0x1
00cc 4814 |H | Short_Literal 0x14
00cd 00da | | Load_Top At_Offset_2
00ce 01d6 | | Execute Vector,Field_Write
00cf 4801 |H | Short_Literal 0x1
00d0 4813 |H | Short_Literal 0x13
00d1 00da | | Load_Top At_Offset_2
00d2 01d6 | | Execute Vector,Field_Write
00d3 4812 |H | Short_Literal 0x12
00d4 4800 |H | Short_Literal 0x0
00d5 4800 |H | Short_Literal 0x0
00d6 00d9 | | Load_Top At_Offset_1
00d7 e22b | + | Load 0x1,0x2b
00d8 01d6 | | Execute Vector,Field_Write
00d9 3ffb |? | Loop_Increasing 0xd5
00da 481f |H | Short_Literal 0x1f
00db 4818 |H | Short_Literal 0x18
00dc 4800 |H | Short_Literal 0x0
00dd 00d9 | | Load_Top At_Offset_1
00de e22b | + | Load 0x1,0x2b
00df 01d6 | | Execute Vector,Field_Write
00e0 3ffb |? | Loop_Increasing 0xdc
00e1 e227 | ' | Load 0x1,0x27
00e2 01c3 | | Execute Vector,Check_In_Type
00e3 0129 | ) | Execute Any,Make_Visible
00e4 e227 | ' | Load 0x1,0x27
00e5 0337 | 7 | Declare_Variable Array
00e6 4800 |H | Short_Literal 0x0
00e7 4800 |H | Short_Literal 0x0
00e8 00da | | Load_Top At_Offset_2
00e9 01d6 | | Execute Vector,Field_Write
00ea 4800 |H | Short_Literal 0x0
00eb 4801 |H | Short_Literal 0x1
00ec 00da | | Load_Top At_Offset_2
00ed 01d6 | | Execute Vector,Field_Write
00ee 4800 |H | Short_Literal 0x0
00ef 4802 |H | Short_Literal 0x2
00f0 00da | | Load_Top At_Offset_2
00f1 01d6 | | Execute Vector,Field_Write
00f2 4800 |H | Short_Literal 0x0
00f3 4803 |H | Short_Literal 0x3
00f4 00da | | Load_Top At_Offset_2
00f5 01d6 | | Execute Vector,Field_Write
00f6 4800 |H | Short_Literal 0x0
00f7 4804 |H | Short_Literal 0x4
00f8 00da | | Load_Top At_Offset_2
00f9 01d6 | | Execute Vector,Field_Write
00fa 4800 |H | Short_Literal 0x0
00fb 4805 |H | Short_Literal 0x5
00fc 00da | | Load_Top At_Offset_2
00fd 01d6 | | Execute Vector,Field_Write
00fe 4800 |H | Short_Literal 0x0
00ff 4806 |H | Short_Literal 0x6
0100 00da | | Load_Top At_Offset_2
0101 01d6 | | Execute Vector,Field_Write
0102 4801 |H | Short_Literal 0x1
0103 4807 |H | Short_Literal 0x7
0104 00da | | Load_Top At_Offset_2
0105 01d6 | | Execute Vector,Field_Write
0106 4801 |H | Short_Literal 0x1
0107 4808 |H | Short_Literal 0x8
0108 00da | | Load_Top At_Offset_2
0109 01d6 | | Execute Vector,Field_Write
010a 4801 |H | Short_Literal 0x1
010b 4809 |H | Short_Literal 0x9
010c 00da | | Load_Top At_Offset_2
010d 01d6 | | Execute Vector,Field_Write
010e 4801 |H | Short_Literal 0x1
010f 480a |H | Short_Literal 0xa
0110 00da | | Load_Top At_Offset_2
0111 01d6 | | Execute Vector,Field_Write
0112 4801 |H | Short_Literal 0x1
0113 480b |H | Short_Literal 0xb
0114 00da | | Load_Top At_Offset_2
0115 01d6 | | Execute Vector,Field_Write
0116 4801 |H | Short_Literal 0x1
0117 480c |H | Short_Literal 0xc
0118 00da | | Load_Top At_Offset_2
0119 01d6 | | Execute Vector,Field_Write
011a 4801 |H | Short_Literal 0x1
011b 480d |H | Short_Literal 0xd
011c 00da | | Load_Top At_Offset_2
011d 01d6 | | Execute Vector,Field_Write
011e 4801 |H | Short_Literal 0x1
011f 480e |H | Short_Literal 0xe
0120 00da | | Load_Top At_Offset_2
0121 01d6 | | Execute Vector,Field_Write
0122 4801 |H | Short_Literal 0x1
0123 480f |H | Short_Literal 0xf
0124 00da | | Load_Top At_Offset_2
0125 01d6 | | Execute Vector,Field_Write
0126 4801 |H | Short_Literal 0x1
0127 4810 |H | Short_Literal 0x10
0128 00da | | Load_Top At_Offset_2
0129 01d6 | | Execute Vector,Field_Write
012a 4801 |H | Short_Literal 0x1
012b 4811 |H | Short_Literal 0x11
012c 00da | | Load_Top At_Offset_2
012d 01d6 | | Execute Vector,Field_Write
012e 4801 |H | Short_Literal 0x1
012f 4812 |H | Short_Literal 0x12
0130 00da | | Load_Top At_Offset_2
0131 01d6 | | Execute Vector,Field_Write
0132 4801 |H | Short_Literal 0x1
0133 4813 |H | Short_Literal 0x13
0134 00da | | Load_Top At_Offset_2
0135 01d6 | | Execute Vector,Field_Write
0136 4801 |H | Short_Literal 0x1
0137 4814 |H | Short_Literal 0x14
0138 00da | | Load_Top At_Offset_2
0139 01d6 | | Execute Vector,Field_Write
013a 4801 |H | Short_Literal 0x1
013b 4815 |H | Short_Literal 0x15
013c 00da | | Load_Top At_Offset_2
013d 01d6 | | Execute Vector,Field_Write
013e 4801 |H | Short_Literal 0x1
013f 4816 |H | Short_Literal 0x16
0140 00da | | Load_Top At_Offset_2
0141 01d6 | | Execute Vector,Field_Write
0142 4801 |H | Short_Literal 0x1
0143 4817 |H | Short_Literal 0x17
0144 00da | | Load_Top At_Offset_2
0145 01d6 | | Execute Vector,Field_Write
0146 4801 |H | Short_Literal 0x1
0147 4818 |H | Short_Literal 0x18
0148 00da | | Load_Top At_Offset_2
0149 01d6 | | Execute Vector,Field_Write
014a 4801 |H | Short_Literal 0x1
014b 4819 |H | Short_Literal 0x19
014c 00da | | Load_Top At_Offset_2
014d 01d6 | | Execute Vector,Field_Write
014e 4801 |H | Short_Literal 0x1
014f 481a |H | Short_Literal 0x1a
0150 00da | | Load_Top At_Offset_2
0151 01d6 | | Execute Vector,Field_Write
0152 4801 |H | Short_Literal 0x1
0153 481b |H | Short_Literal 0x1b
0154 00da | | Load_Top At_Offset_2
0155 01d6 | | Execute Vector,Field_Write
0156 4801 |H | Short_Literal 0x1
0157 481c |H | Short_Literal 0x1c
0158 00da | | Load_Top At_Offset_2
0159 01d6 | | Execute Vector,Field_Write
015a 4801 |H | Short_Literal 0x1
015b 481d |H | Short_Literal 0x1d
015c 00da | | Load_Top At_Offset_2
015d 01d6 | | Execute Vector,Field_Write
015e 4801 |H | Short_Literal 0x1
015f 481e |H | Short_Literal 0x1e
0160 00da | | Load_Top At_Offset_2
0161 01d6 | | Execute Vector,Field_Write
0162 4801 |H | Short_Literal 0x1
0163 481f |H | Short_Literal 0x1f
0164 00da | | Load_Top At_Offset_2
0165 01d6 | | Execute Vector,Field_Write
0166 e227 | ' | Load 0x1,0x27
0167 01c3 | | Execute Vector,Check_In_Type
0168 0129 | ) | Execute Any,Make_Visible
0169 029a 02a3 | | Declare_Subprogram INIT_02a0,For_Outer_Call,Visible,Unelaborated
016b 0007 | | Action Break_Optional
016c e003 | | Load 0x0,0x3
016d 0266 | f | Execute Discrete,Bounds
016e e002 | | Load 0x0,0x2
016f 02a0 | | Declare_Subprogram Null_Subprogram
0170 4801 |H | Short_Literal 0x1
0171 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
0172 00d8 | | Load_Top At_Offset_0
0173 02a0 | | Declare_Subprogram Null_Subprogram
0174 4818 |H | Short_Literal 0x18
0175 03d4 | | Declare_Type Access,Defined,Visible,Accesses_Protected
0176 00d8 | | Load_Top At_Offset_0
0177 0221 | ! | Execute Access,Allow_Deallocate
0178 0007 | | Action Break_Optional
0179 0007 | | Action Break_Optional
017a 0007 | | Action Break_Optional
017b a004 | | Store_Unchecked 0x0,0x4
017c 00c6 | | Action Check_Subprogram_Elaborated
017d 00d9 | | Load_Top At_Offset_1
017e 0129 | ) | Execute Any,Make_Visible
017f 00d9 | | Load_Top At_Offset_1
0180 0129 | ) | Execute Any,Make_Visible
0181 e009 | | Load 0x0,0x9
0182 0129 | ) | Execute Any,Make_Visible
0183 e00a | | Load 0x0,0xa
0184 0129 | ) | Execute Any,Make_Visible
0185 4800 |H | Short_Literal 0x0
0186 0129 | ) | Execute Any,Make_Visible
0187 e21c | | Load 0x1,0x1c
0188 02a0 | | Declare_Subprogram Null_Subprogram
0189 4801 |H | Short_Literal 0x1
018a 032e | . | Declare_Type Record,Defined,Visible
018b 00d8 | | Load_Top At_Offset_0
018c 0322 | " | Declare_Variable Record
018d 00d8 | | Load_Top At_Offset_0
018e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
018f 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0190 4800 |H | Short_Literal 0x0
0191 00d0 | | Action Swap_Control
0192 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0193 0129 | ) | Execute Any,Make_Visible
0194 00d9 | | Load_Top At_Offset_1
0195 0322 | " | Declare_Variable Record
0196 00d8 | | Load_Top At_Offset_0
0197 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0198 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0199 4800 |H | Short_Literal 0x0
019a 00d0 | | Action Swap_Control
019b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
019c 0129 | ) | Execute Any,Make_Visible
019d 00da | | Load_Top At_Offset_2
019e 0322 | " | Declare_Variable Record
019f 00d8 | | Load_Top At_Offset_0
01a0 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01a1 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01a2 4801 |H | Short_Literal 0x1
01a3 00d0 | | Action Swap_Control
01a4 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01a5 0129 | ) | Execute Any,Make_Visible
01a6 0007 | | Action Break_Optional
01a7 e003 | | Load 0x0,0x3
01a8 0266 | f | Execute Discrete,Bounds
01a9 e002 | | Load 0x0,0x2
01aa 02a0 | | Declare_Subprogram Null_Subprogram
01ab 4801 |H | Short_Literal 0x1
01ac 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
01ad 00d8 | | Load_Top At_Offset_0
01ae 02a0 | | Declare_Subprogram Null_Subprogram
01af 4818 |H | Short_Literal 0x18
01b0 03d4 | | Declare_Type Access,Defined,Visible,Accesses_Protected
01b1 00d8 | | Load_Top At_Offset_0
01b2 0221 | ! | Execute Access,Allow_Deallocate
01b3 0007 | | Action Break_Optional
01b4 0007 | | Action Break_Optional
01b5 0007 | | Action Break_Optional
01b6 0007 | | Action Break_Optional
01b7 0007 | | Action Break_Optional
01b8 a004 | | Store_Unchecked 0x0,0x4
01b9 00c6 | | Action Check_Subprogram_Elaborated
01ba 00d9 | | Load_Top At_Offset_1
01bb 0129 | ) | Execute Any,Make_Visible
01bc 00d9 | | Load_Top At_Offset_1
01bd 0129 | ) | Execute Any,Make_Visible
01be e00b | | Load 0x0,0xb
01bf 0129 | ) | Execute Any,Make_Visible
01c0 e00c | | Load 0x0,0xc
01c1 0129 | ) | Execute Any,Make_Visible
01c2 4800 |H | Short_Literal 0x0
01c3 0129 | ) | Execute Any,Make_Visible
01c4 0007 | | Action Break_Optional
01c5 0007 | | Action Break_Optional
01c6 0007 | | Action Break_Optional
01c7 0007 | | Action Break_Optional
01c8 0007 | | Action Break_Optional
01c9 e218 | | Load 0x1,0x18
01ca 02a0 | | Declare_Subprogram Null_Subprogram
01cb 4801 |H | Short_Literal 0x1
01cc 032e | . | Declare_Type Record,Defined,Visible
01cd e003 | | Load 0x0,0x3
01ce 0266 | f | Execute Discrete,Bounds
01cf 00da | | Load_Top At_Offset_2
01d0 02a0 | | Declare_Subprogram Null_Subprogram
01d1 4801 |H | Short_Literal 0x1
01d2 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
01d3 00d8 | | Load_Top At_Offset_0
01d4 02a0 | | Declare_Subprogram Null_Subprogram
01d5 4818 |H | Short_Literal 0x18
01d6 03d4 | | Declare_Type Access,Defined,Visible,Accesses_Protected
01d7 00d8 | | Load_Top At_Offset_0
01d8 0221 | ! | Execute Access,Allow_Deallocate
01d9 0007 | | Action Break_Optional
01da 00da | | Load_Top At_Offset_2
01db 0322 | " | Declare_Variable Record
01dc 00d8 | | Load_Top At_Offset_0
01dd 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01de 4800 |H | Short_Literal 0x0
01df 00d0 | | Action Swap_Control
01e0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01e1 0129 | ) | Execute Any,Make_Visible
01e2 0007 | | Action Break_Optional
01e3 00db | | Load_Top At_Offset_3
01e4 0322 | " | Declare_Variable Record
01e5 00d8 | | Load_Top At_Offset_0
01e6 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01e7 4800 |H | Short_Literal 0x0
01e8 00d0 | | Action Swap_Control
01e9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01ea 0129 | ) | Execute Any,Make_Visible
01eb a004 | | Store_Unchecked 0x0,0x4
01ec 00c6 | | Action Check_Subprogram_Elaborated
01ed 00db | | Load_Top At_Offset_3
01ee 0129 | ) | Execute Any,Make_Visible
01ef 00db | | Load_Top At_Offset_3
01f0 0129 | ) | Execute Any,Make_Visible
01f1 e00d | | Load 0x0,0xd
01f2 0129 | ) | Execute Any,Make_Visible
01f3 e00e | | Load 0x0,0xe
01f4 0129 | ) | Execute Any,Make_Visible
01f5 4800 |H | Short_Literal 0x0
01f6 0129 | ) | Execute Any,Make_Visible
01f7 e218 | | Load 0x1,0x18
01f8 02a0 | | Declare_Subprogram Null_Subprogram
01f9 4801 |H | Short_Literal 0x1
01fa 032e | . | Declare_Type Record,Defined,Visible
01fb 00d8 | | Load_Top At_Offset_0
01fc 0322 | " | Declare_Variable Record
01fd 00d8 | | Load_Top At_Offset_0
01fe 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
01ff 4800 |H | Short_Literal 0x0
0200 00d0 | | Action Swap_Control
0201 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0202 0129 | ) | Execute Any,Make_Visible
0203 e218 | | Load 0x1,0x18
0204 02a0 | | Declare_Subprogram Null_Subprogram
0205 4801 |H | Short_Literal 0x1
0206 032e | . | Declare_Type Record,Defined,Visible
0207 00d8 | | Load_Top At_Offset_0
0208 0322 | " | Declare_Variable Record
0209 00d8 | | Load_Top At_Offset_0
020a 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
020b 4800 |H | Short_Literal 0x0
020c 00d0 | | Action Swap_Control
020d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
020e 0129 | ) | Execute Any,Make_Visible
020f 0007 | | Action Break_Optional
0210 e218 | | Load 0x1,0x18
0211 02a0 | | Declare_Subprogram Null_Subprogram
0212 4801 |H | Short_Literal 0x1
0213 032e | . | Declare_Type Record,Defined,Visible
0214 00d8 | | Load_Top At_Offset_0
0215 0322 | " | Declare_Variable Record
0216 00d8 | | Load_Top At_Offset_0
0217 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0218 4800 |H | Short_Literal 0x0
0219 00d0 | | Action Swap_Control
021a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
021b 0129 | ) | Execute Any,Make_Visible
021c 4800 |H | Short_Literal 0x0
021d 4801 |H | Short_Literal 0x1
021e 029f 02bb | | Declare_Subprogram INIT_02b8,For_Call
0220 03fe | | Declare_Type Discrete,Defined,Visible
0221 e002 | | Load 0x0,0x2
0222 02a0 | | Declare_Subprogram Null_Subprogram
0223 4801 |H | Short_Literal 0x1
0224 032e | . | Declare_Type Record,Defined,Visible
0225 00d8 | | Load_Top At_Offset_0
0226 0322 | " | Declare_Variable Record
0227 4800 |H | Short_Literal 0x0
0228 00d9 | | Load_Top At_Offset_1
0229 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
022a 0129 | ) | Execute Any,Make_Visible
022b 00d9 | | Load_Top At_Offset_1
022c 0322 | " | Declare_Variable Record
022d 4800 |H | Short_Literal 0x0
022e 00d9 | | Load_Top At_Offset_1
022f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0230 0129 | ) | Execute Any,Make_Visible
0231 e21c | | Load 0x1,0x1c
0232 02a0 | | Declare_Subprogram Null_Subprogram
0233 4801 |H | Short_Literal 0x1
0234 032e | . | Declare_Type Record,Defined,Visible
0235 e003 | | Load 0x0,0x3
0236 0266 | f | Execute Discrete,Bounds
0237 00da | | Load_Top At_Offset_2
0238 02a0 | | Declare_Subprogram Null_Subprogram
0239 4801 |H | Short_Literal 0x1
023a 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
023b 00d8 | | Load_Top At_Offset_0
023c 02a0 | | Declare_Subprogram Null_Subprogram
023d 4818 |H | Short_Literal 0x18
023e 03d4 | | Declare_Type Access,Defined,Visible,Accesses_Protected
023f 00d8 | | Load_Top At_Offset_0
0240 0221 | ! | Execute Access,Allow_Deallocate
0241 0007 | | Action Break_Optional
0242 00da | | Load_Top At_Offset_2
0243 0322 | " | Declare_Variable Record
0244 00d8 | | Load_Top At_Offset_0
0245 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0246 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0247 4800 |H | Short_Literal 0x0
0248 00d0 | | Action Swap_Control
0249 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
024a 0129 | ) | Execute Any,Make_Visible
024b 00db | | Load_Top At_Offset_3
024c 0322 | " | Declare_Variable Record
024d 00d8 | | Load_Top At_Offset_0
024e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
024f 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0250 4801 |H | Short_Literal 0x1
0251 00d0 | | Action Swap_Control
0252 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0253 0129 | ) | Execute Any,Make_Visible
0254 e254 | T | Load 0x1,0x54
0255 0322 | " | Declare_Variable Record
0256 00d8 | | Load_Top At_Offset_0
0257 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0258 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0259 4801 |H | Short_Literal 0x1
025a 00d0 | | Action Swap_Control
025b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
025c 0129 | ) | Execute Any,Make_Visible
025d e254 | T | Load 0x1,0x54
025e 0322 | " | Declare_Variable Record
025f 00d8 | | Load_Top At_Offset_0
0260 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0261 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0262 4800 |H | Short_Literal 0x0
0263 00d0 | | Action Swap_Control
0264 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0265 0129 | ) | Execute Any,Make_Visible
0266 0007 | | Action Break_Optional
0267 a004 | | Store_Unchecked 0x0,0x4
0268 00c6 | | Action Check_Subprogram_Elaborated
0269 e255 | U | Load 0x1,0x55
026a 0129 | ) | Execute Any,Make_Visible
026b e256 | V | Load 0x1,0x56
026c 0129 | ) | Execute Any,Make_Visible
026d e00f | | Load 0x0,0xf
026e 0129 | ) | Execute Any,Make_Visible
026f e010 | | Load 0x0,0x10
0270 0129 | ) | Execute Any,Make_Visible
0271 4800 |H | Short_Literal 0x0
0272 0129 | ) | Execute Any,Make_Visible
0273 00bf | | Action Accept_Activation
0274 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d
0275 00c7 | | Action Elaborate_Subprogram
0276 BODY_0008:
0276 00bc | | Action Signal_Activated
0277 00bb | | Action Signal_Completion
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027b | { | .CONST 0x027b ; Address of begin
0279 0004 | | .CONST 0x0004 ; Address of exception handler
027a 0001 | | .CONST 0x0001 ; Number of locals
027b BODY_0278:
027b INIT_0278:
027b 4607 |F | Jump_Case 0x8
027c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
027d 7807 |x | Jump 0x285 ; case 0x1
027e 780a |x | Jump 0x289 ; case 0x2
027f 780e |x | Jump 0x28e ; case 0x3
0280 7811 |x | Jump 0x292 ; case 0x4
0281 7812 |x | Jump 0x294 ; case 0x5
0282 7813 |x | Jump 0x296 ; case 0x6
0283 7816 |x | Jump 0x29a ; case 0x7
0284 4302 |C | .XXX[0x1]
0285 00da | | Load_Top At_Offset_2
0286 0091 02de | | Action Push_String_Extended_Indexed,0x2de ; "XEMI31"
0288 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0289 00db | | Load_Top At_Offset_3
028a 00db | | Load_Top At_Offset_3
028b 00e0 | | Load_Encached Standard_Cache
028c 181b | | Execute Package,Field_Execute,Field_Number 0x1b
028d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
028e 00da | | Load_Top At_Offset_2
028f 00e0 | | Load_Encached Standard_Cache
0290 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0291 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0292 00db | | Load_Top At_Offset_3
0293 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0294 00db | | Load_Top At_Offset_3
0295 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0296 e225 | % | Load 0x1,0x25
0297 00dc | | Load_Top At_Offset_4
0298 0267 | g | Execute Discrete,Predecessor
0299 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
029a e225 | % | Load 0x1,0x25
029b 00dc | | Load_Top At_Offset_4
029c 0268 | h | Execute Discrete,Successor
029d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
029e 0000 0000 | | .XXX[0x2]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a3 | | .CONST 0x02a3 ; Address of begin
02a1 0004 | | .CONST 0x0004 ; Address of exception handler
02a2 0001 | | .CONST 0x0001 ; Number of locals
02a3 BODY_02a0:
02a3 INIT_02a0:
02a3 4800 |H | Short_Literal 0x0
02a4 480f |H | Short_Literal 0xf
02a5 e226 | & | Load 0x1,0x26
02a6 0334 | 4 | Declare_Variable Array,With_Constraint
02a7 480f |H | Short_Literal 0xf
02a8 4800 |H | Short_Literal 0x0
02a9 4800 |H | Short_Literal 0x0
02aa 00d9 | | Load_Top At_Offset_1
02ab e402 | | Load 0x2,0x2
02ac 01d6 | | Execute Vector,Field_Write
02ad 3ffb |? | Loop_Increasing 0x2a9
02ae 00db | | Load_Top At_Offset_3
02af 01cc | | Execute Vector,Catenate
02b0 e227 | ' | Load 0x1,0x27
02b1 01c7 | | Execute Vector,Convert
02b2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02b3 0000 0000 | | .BLANK 0000[0x5]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bb | | .CONST 0x02bb ; Address of begin
02b9 0004 | | .CONST 0x0004 ; Address of exception handler
02ba 0001 | | .CONST 0x0001 ; Number of locals
02bb BODY_02b8:
02bb INIT_02b8:
02bb 4607 |F | Jump_Case 0x8
02bc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
02bd 7807 |x | Jump 0x2c5 ; case 0x1
02be 780a |x | Jump 0x2c9 ; case 0x2
02bf 780e |x | Jump 0x2ce ; case 0x3
02c0 7811 |x | Jump 0x2d2 ; case 0x4
02c1 7812 |x | Jump 0x2d4 ; case 0x5
02c2 7813 |x | Jump 0x2d6 ; case 0x6
02c3 7816 |x | Jump 0x2da ; case 0x7
02c4 4302 |C | .XXX[0x1]
02c5 00da | | Load_Top At_Offset_2
02c6 0091 02fe | | Action Push_String_Extended_Indexed,0x2fe ; "FAILED"
02c8 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
02c9 00db | | Load_Top At_Offset_3
02ca 00db | | Load_Top At_Offset_3
02cb 00e0 | | Load_Encached Standard_Cache
02cc 181b | | Execute Package,Field_Execute,Field_Number 0x1b
02cd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
02ce 00da | | Load_Top At_Offset_2
02cf 00e0 | | Load_Encached Standard_Cache
02d0 181c | | Execute Package,Field_Execute,Field_Number 0x1c
02d1 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
02d2 00db | | Load_Top At_Offset_3
02d3 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
02d4 00db | | Load_Top At_Offset_3
02d5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
02d6 e250 | P | Load 0x1,0x50
02d7 00dc | | Load_Top At_Offset_4
02d8 0267 | g | Execute Discrete,Predecessor
02d9 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
02da e250 | P | Load 0x1,0x50
02db 00dc | | Load_Top At_Offset_4
02dc 0268 | h | Execute Discrete,Successor
02dd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
02de ; --------------------------------------------------------------------------------------
02de ; STRING TABLE
02de ; --------------------------------------------------------------------------------------
02de 0046 | F | .STRTAB 0x0046->0x0301 ; "XEMI31"
02df 004a | J | .STRTAB 0x004a->0x0304 ; "XEMI30"
02e0 004e | N | .STRTAB 0x004e->0x0307 ; "XEMI29"
02e1 0052 | R | .STRTAB 0x0052->0x030a ; "XEMI28"
02e2 0056 | V | .STRTAB 0x0056->0x030d ; "XEMI27"
02e3 005a | Z | .STRTAB 0x005a->0x0310 ; "XEMI26"
02e4 005e | ^ | .STRTAB 0x005e->0x0313 ; "XEMI25"
02e5 0062 | b | .STRTAB 0x0062->0x0316 ; "OWNER_GRAB_BUTTON_MASK"
02e6 0076 | v | .STRTAB 0x0076->0x0321 ; "COLORMAP_CHANGE_MASK"
02e7 0088 | | .STRTAB 0x0088->0x032b ; "PROPERTY_CHANGE_MASK"
02e8 009a | | .STRTAB 0x009a->0x0335 ; "FOCUS_CHANGE_MASK"
02e9 00a9 | | .STRTAB 0x00a9->0x033d ; "SUBSTRUCTURE_REDIRECT_MASK"
02ea 00c1 | | .STRTAB 0x00c1->0x034a ; "SUBSTRUCTURE_NOTIFY_MASK"
02eb 00d7 | | .STRTAB 0x00d7->0x0356 ; "RESIZE_REDIRECT_MASK"
02ec 00e9 | | .STRTAB 0x00e9->0x0360 ; "STRUCTURE_NOTIFY_MASK"
02ed 00fc | | .STRTAB 0x00fc->0x036b ; "VISIBILITY_CHANGE_MASK"
02ee 0110 | | .STRTAB 0x0110->0x0376 ; "EXPOSURE_MASK"
02ef 011b | | .STRTAB 0x011b->0x037c ; "KEYMAP_STATE_MASK"
02f0 012a | * | .STRTAB 0x012a->0x0385 ; "BUTTON_MOTION_MASK"
02f1 013a | : | .STRTAB 0x013a->0x038e ; "BUTTON_5_MOTION_MASK"
02f2 014c | L | .STRTAB 0x014c->0x0398 ; "BUTTON_4_MOTION_MASK"
02f3 015e | ^ | .STRTAB 0x015e->0x03a2 ; "BUTTON_3_MOTION_MASK"
02f4 0170 | p | .STRTAB 0x0170->0x03ac ; "BUTTON_2_MOTION_MASK"
02f5 0182 | | .STRTAB 0x0182->0x03b6 ; "BUTTON_1_MOTION_MASK"
02f6 0194 | | .STRTAB 0x0194->0x03c0 ; "POINTER_MOTION_HINT_MASK"
02f7 01aa | | .STRTAB 0x01aa->0x03cc ; "POINTER_MOTION_MASK"
02f8 01bb | | .STRTAB 0x01bb->0x03d5 ; "LEAVE_WINDOW_MASK"
02f9 01ca | | .STRTAB 0x01ca->0x03de ; "ENTER_WINDOW_MASK"
02fa 01d9 | | .STRTAB 0x01d9->0x03e6 ; "BUTTON_RELEASE_MASK"
02fb 01ea | | .STRTAB 0x01ea->0x03f0 ; "BUTTON_PRESS_MASK"
02fc 01f9 | | .STRTAB 0x01f9->0x03f8 ; "KEY_RELEASE_MASK"
02fd 0207 | | .STRTAB 0x0207->0x0400 ; "KEY_PRESS_MASK"
02fe 0213 | | .STRTAB 0x0213->0x0407 ; "FAILED"
02ff 0217 | | .STRTAB 0x0217->0x040a ; "SUCCESSFUL"
0300 021f | | .STREND 0x021f->0x040f
0301 5845 4d49 |XEMI| .STRTAB_STRINGS
0410 ; --------------------------------------------------------------------------------------
0410 ; Debug Table
0410 ; --------------------------------------------------------------------------------------
0410 0004 0000 | | .DEBUG4 0x0004,0x0000,0x4909,0x0000,0x0001,0x0005
0416 000b 042a | *| .DBG4T 0x000b,0x042a,0x8000,0x0000
041a 0274 0480 | t | .DBG4T 0x0274,0x0480,0x8000,0x0000
041e 027b 0000 | { | .DBG4T 0x027b,0x0000,0x0005,0x0000
0422 02a3 0483 | | .DBG4T 0x02a3,0x0483,0x0002,0x0000
0426 02bb 0000 | | .DBG4T 0x02bb,0x0000,0x0005,0x0000
042a ; --------------------------------------------------------------------------------------
042a ; Debug chain
042a ; --------------------------------------------------------------------------------------
042a 0054 0000 | T | .DBGLEN 0x0054,0x0000
042c 000b 000f | | .DBGLNO 0x000b,0x000f,0x0015,0x001b,0x001c,0x0022,0x0023,0x0029,0x0035,0x0039,0x003a,0x003e,0x0044,0x004a,0x0050,0x0054,0x005c,0x0062,0x0068,0x0069,0x006a,0x0076,0x007b,0x0081,0x0085,0x0089,0x0097,0x00bd,0x00e4,0x0169,0x016b,0x016c,0x0172,0x0178,0x0179,0x017a,0x017b,0x0187,0x018b,0x0194,0x019d,0x01a6,0x01a7,0x01ad,0x01b3,0x01b4,0x01b5,0x01b6,0x01b7,0x01b8,0x01c4,0x01c5,0x01c6,0x01c7,0x01c8,0x01c9,0x01cd,0x01d3,0x01d9,0x01da,0x01e2,0x01e3,0x01eb,0x01f7,0x01fb,0x0203,0x0207,0x020f,0x0210,0x0214,0x021c,0x0221,0x0225,0x022b,0x0231,0x0235,0x023b,0x0241,0x0242,0x024b,0x0254,0x025d,0x0266,0x0267
0480 ; --------------------------------------------------------------------------------------
0480 ; Debug chain
0480 ; --------------------------------------------------------------------------------------
0480 0001 0000 | | .DBGLEN 0x0001,0x0000
0482 0274 | t | .DBGLNO 0x0274
0483 ; --------------------------------------------------------------------------------------
0483 ; Debug chain
0483 ; --------------------------------------------------------------------------------------
0483 0000 0001 | | .DBGLEN 0x0000,0x0001
0485 02a3 | | .DBGLNO 0x02a3
0486 0000 0000 | | .BLANK 0000[0x17a]