|
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: 3072 (0xc00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03b8fe
└─⟦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 0508 | | .CONST 0x0508 ; 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 8002 | | .CONST 0x8002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 01b0 | | .CONST 0x01b0 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0034 | 4 | .CONST 0x0034 ; Number of locals
000b INIT_0008:
000b 4801 |H | Short_Literal 0x1
000c 4802 |H | Short_Literal 0x2
000d e001 | | Load 0x0,0x1
000e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
000f 02a0 | | Declare_Subprogram Null_Subprogram
0010 4801 |H | Short_Literal 0x1
0011 035e | ^ | Declare_Type Array,Defined,Visible
0012 4801 |H | Short_Literal 0x1
0013 4804 |H | Short_Literal 0x4
0014 e001 | | Load 0x0,0x1
0015 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0016 02a0 | | Declare_Subprogram Null_Subprogram
0017 4801 |H | Short_Literal 0x1
0018 035e | ^ | Declare_Type Array,Defined,Visible
0019 4801 |H | Short_Literal 0x1
001a 4806 |H | Short_Literal 0x6
001b e001 | | Load 0x0,0x1
001c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
001d 02a0 | | Declare_Subprogram Null_Subprogram
001e 4801 |H | Short_Literal 0x1
001f 035e | ^ | Declare_Type Array,Defined,Visible
0020 00c4 | | Action Make_Default
0021 00c4 | | Action Make_Default
0022 00c4 | | Action Make_Default
0023 00c4 | | Action Make_Default
0024 00c4 | | Action Make_Default
0025 00c4 | | Action Make_Default
0026 00c4 | | Action Make_Default
0027 00c4 | | Action Make_Default
0028 00c4 | | Action Make_Default
0029 00c4 | | Action Make_Default
002a 00c4 | | Action Make_Default
002b 00c4 | | Action Make_Default
002c 00c4 | | Action Make_Default
002d 00c4 | | Action Make_Default
002e 00c4 | | Action Make_Default
002f 00c4 | | Action Make_Default
0030 00c4 | | Action Make_Default
0031 00c4 | | Action Make_Default
0032 00c4 | | Action Make_Default
0033 00c4 | | Action Make_Default
0034 00c4 | | Action Make_Default
0035 00c4 | | Action Make_Default
0036 00c4 | | Action Make_Default
0037 00c4 | | Action Make_Default
0038 00c4 | | Action Make_Default
0039 00c4 | | Action Make_Default
003a 00c4 | | Action Make_Default
003b 00c4 | | Action Make_Default
003c 00c4 | | Action Make_Default
003d 00c4 | | Action Make_Default
003e 00c4 | | Action Make_Default
003f 00c4 | | Action Make_Default
0040 00c4 | | Action Make_Default
0041 00c4 | | Action Make_Default
0042 00c4 | | Action Make_Default
0043 00c4 | | Action Make_Default
0044 00c4 | | Action Make_Default
0045 4801 |H | Short_Literal 0x1
0046 480f |H | Short_Literal 0xf
0047 e001 | | Load 0x0,0x1
0048 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0049 02a0 | | Declare_Subprogram Null_Subprogram
004a 4801 |H | Short_Literal 0x1
004b 035e | ^ | Declare_Type Array,Defined,Visible
004c c230 | 0 | Store 0x1,0x30
004d 4801 |H | Short_Literal 0x1
004e 4a70 |Jp | Short_Literal 0x270
004f e001 | | Load 0x0,0x1
0050 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0051 02a0 | | Declare_Subprogram Null_Subprogram
0052 4801 |H | Short_Literal 0x1
0053 035e | ^ | Declare_Type Array,Defined,Visible
0054 c210 | | Store 0x1,0x10
0055 4801 |H | Short_Literal 0x1
0056 485c |H\ | Short_Literal 0x5c
0057 e001 | | Load 0x0,0x1
0058 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0059 02a0 | | Declare_Subprogram Null_Subprogram
005a 4801 |H | Short_Literal 0x1
005b 035e | ^ | Declare_Type Array,Defined,Visible
005c c212 | | Store 0x1,0x12
005d 4801 |H | Short_Literal 0x1
005e 4860 |H` | Short_Literal 0x60
005f e001 | | Load 0x0,0x1
0060 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0061 02a0 | | Declare_Subprogram Null_Subprogram
0062 4801 |H | Short_Literal 0x1
0063 035e | ^ | Declare_Type Array,Defined,Visible
0064 c213 | | Store 0x1,0x13
0065 4800 |H | Short_Literal 0x0
0066 4bdd |K | Short_Literal 0x3dd
0067 e001 | | Load 0x0,0x1
0068 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0069 02a0 | | Declare_Subprogram Null_Subprogram
006a 4801 |H | Short_Literal 0x1
006b 035e | ^ | Declare_Type Array,Defined,Visible
006c c234 | 4 | Store 0x1,0x34
006d 4801 |H | Short_Literal 0x1
006e 6175 |au | Indirect_Literal Discrete,0x1e4,{0x00000000, 0x00000400}
006f e001 | | Load 0x0,0x1
0070 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0071 02a0 | | Declare_Subprogram Null_Subprogram
0072 4801 |H | Short_Literal 0x1
0073 035e | ^ | Declare_Type Array,Defined,Visible
0074 c214 | | Store 0x1,0x14
0075 4801 |H | Short_Literal 0x1
0076 480d |H | Short_Literal 0xd
0077 e001 | | Load 0x0,0x1
0078 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0079 02a0 | | Declare_Subprogram Null_Subprogram
007a 4801 |H | Short_Literal 0x1
007b 035e | ^ | Declare_Type Array,Defined,Visible
007c c215 | | Store 0x1,0x15
007d 4801 |H | Short_Literal 0x1
007e 480e |H | Short_Literal 0xe
007f e001 | | Load 0x0,0x1
0080 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0081 02a0 | | Declare_Subprogram Null_Subprogram
0082 4801 |H | Short_Literal 0x1
0083 035e | ^ | Declare_Type Array,Defined,Visible
0084 c216 | | Store 0x1,0x16
0085 4801 |H | Short_Literal 0x1
0086 4810 |H | Short_Literal 0x10
0087 e001 | | Load 0x0,0x1
0088 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0089 02a0 | | Declare_Subprogram Null_Subprogram
008a 4801 |H | Short_Literal 0x1
008b 035e | ^ | Declare_Type Array,Defined,Visible
008c c217 | | Store 0x1,0x17
008d 4801 |H | Short_Literal 0x1
008e 4818 |H | Short_Literal 0x18
008f e001 | | Load 0x0,0x1
0090 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0091 02a0 | | Declare_Subprogram Null_Subprogram
0092 4801 |H | Short_Literal 0x1
0093 035e | ^ | Declare_Type Array,Defined,Visible
0094 c218 | | Store 0x1,0x18
0095 4801 |H | Short_Literal 0x1
0096 481c |H | Short_Literal 0x1c
0097 e001 | | Load 0x0,0x1
0098 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0099 02a0 | | Declare_Subprogram Null_Subprogram
009a 4801 |H | Short_Literal 0x1
009b 035e | ^ | Declare_Type Array,Defined,Visible
009c c219 | | Store 0x1,0x19
009d 4801 |H | Short_Literal 0x1
009e 481e |H | Short_Literal 0x1e
009f e001 | | Load 0x0,0x1
00a0 1b15 | | Execute Package,Field_Read,Field_Number 0x15
00a1 02a0 | | Declare_Subprogram Null_Subprogram
00a2 4801 |H | Short_Literal 0x1
00a3 035e | ^ | Declare_Type Array,Defined,Visible
00a4 c21a | | Store 0x1,0x1a
00a5 4801 |H | Short_Literal 0x1
00a6 4820 |H | Short_Literal 0x20
00a7 e001 | | Load 0x0,0x1
00a8 1b15 | | Execute Package,Field_Read,Field_Number 0x15
00a9 02a0 | | Declare_Subprogram Null_Subprogram
00aa 4801 |H | Short_Literal 0x1
00ab 035e | ^ | Declare_Type Array,Defined,Visible
00ac c21b | | Store 0x1,0x1b
00ad 00e2 | | Load_Encached Integer_Cache
00ae 00e2 | | Load_Encached Integer_Cache
00af 00e2 | | Load_Encached Integer_Cache
00b0 00e2 | | Load_Encached Integer_Cache
00b1 02a0 | | Declare_Subprogram Null_Subprogram
00b2 4804 |H | Short_Literal 0x4
00b3 032e | . | Declare_Type Record,Defined,Visible
00b4 c233 | 3 | Store 0x1,0x33
00b5 4800 |H | Short_Literal 0x0
00b6 0093 0473 | s| PushFullAddress InMicrocode,INIT_0470
00b8 02a0 | | Declare_Subprogram Null_Subprogram
00b9 038f | | Declare_Type Package,Defined,Visible
00ba e001 | | Load 0x0,0x1
00bb 00b6 | | Action Make_Scope
00bc 4802 |H | Short_Literal 0x2
00bd 00db | | Load_Top At_Offset_3
00be 020e | | Execute Module,Augment_Imports
00bf 0386 | | Declare_Variable Package,Visible
00c0 c21c | | Store 0x1,0x1c
00c1 4800 |H | Short_Literal 0x0
00c2 0093 0453 | S| PushFullAddress InMicrocode,INIT_0450
00c4 02a0 | | Declare_Subprogram Null_Subprogram
00c5 038f | | Declare_Type Package,Defined,Visible
00c6 e001 | | Load 0x0,0x1
00c7 00b6 | | Action Make_Scope
00c8 4802 |H | Short_Literal 0x2
00c9 00db | | Load_Top At_Offset_3
00ca 020e | | Execute Module,Augment_Imports
00cb 0386 | | Declare_Variable Package,Visible
00cc c21d | | Store 0x1,0x1d
00cd 4800 |H | Short_Literal 0x0
00ce 0093 043b | ;| PushFullAddress InMicrocode,INIT_0438
00d0 02a0 | | Declare_Subprogram Null_Subprogram
00d1 038f | | Declare_Type Package,Defined,Visible
00d2 e002 | | Load 0x0,0x2
00d3 4801 |H | Short_Literal 0x1
00d4 00da | | Load_Top At_Offset_2
00d5 020e | | Execute Module,Augment_Imports
00d6 0386 | | Declare_Variable Package,Visible
00d7 c21e | | Store 0x1,0x1e
00d8 4800 |H | Short_Literal 0x0
00d9 0093 03e3 | | PushFullAddress InMicrocode,INIT_03e0
00db 02a0 | | Declare_Subprogram Null_Subprogram
00dc 038f | | Declare_Type Package,Defined,Visible
00dd e001 | | Load 0x0,0x1
00de 00b6 | | Action Make_Scope
00df 4802 |H | Short_Literal 0x2
00e0 00db | | Load_Top At_Offset_3
00e1 020e | | Execute Module,Augment_Imports
00e2 0386 | | Declare_Variable Package,Visible
00e3 c21f | | Store 0x1,0x1f
00e4 4800 |H | Short_Literal 0x0
00e5 0093 03bb | | PushFullAddress InMicrocode,INIT_03b8
00e7 02a0 | | Declare_Subprogram Null_Subprogram
00e8 038f | | Declare_Type Package,Defined,Visible
00e9 e001 | | Load 0x0,0x1
00ea 00b6 | | Action Make_Scope
00eb 4802 |H | Short_Literal 0x2
00ec 00db | | Load_Top At_Offset_3
00ed 020e | | Execute Module,Augment_Imports
00ee 0386 | | Declare_Variable Package,Visible
00ef c220 | | Store 0x1,0x20
00f0 4800 |H | Short_Literal 0x0
00f1 0093 037b | {| PushFullAddress InMicrocode,INIT_0378
00f3 02a0 | | Declare_Subprogram Null_Subprogram
00f4 038f | | Declare_Type Package,Defined,Visible
00f5 e001 | | Load 0x0,0x1
00f6 00b6 | | Action Make_Scope
00f7 4802 |H | Short_Literal 0x2
00f8 00db | | Load_Top At_Offset_3
00f9 020e | | Execute Module,Augment_Imports
00fa 0386 | | Declare_Variable Package,Visible
00fb c221 | ! | Store 0x1,0x21
00fc e001 | | Load 0x0,0x1
00fd 1b14 | | Execute Package,Field_Read,Field_Number 0x14
00fe e001 | | Load 0x0,0x1
00ff 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0100 02a0 | | Declare_Subprogram Null_Subprogram
0101 4802 |H | Short_Literal 0x2
0102 032e | . | Declare_Type Record,Defined,Visible
0103 c222 | " | Store 0x1,0x22
0104 4800 |H | Short_Literal 0x0
0105 480f |H | Short_Literal 0xf
0106 e222 | " | Load 0x1,0x22
0107 02a0 | | Declare_Subprogram Null_Subprogram
0108 4801 |H | Short_Literal 0x1
0109 035e | ^ | Declare_Type Array,Defined,Visible
010a c223 | # | Store 0x1,0x23
010b 4800 |H | Short_Literal 0x0
010c 0093 034b | K| PushFullAddress InMicrocode,INIT_0348
010e 02a0 | | Declare_Subprogram Null_Subprogram
010f 038f | | Declare_Type Package,Defined,Visible
0110 e001 | | Load 0x0,0x1
0111 00b6 | | Action Make_Scope
0112 4802 |H | Short_Literal 0x2
0113 00db | | Load_Top At_Offset_3
0114 020e | | Execute Module,Augment_Imports
0115 0386 | | Declare_Variable Package,Visible
0116 c224 | $ | Store 0x1,0x24
0117 4800 |H | Short_Literal 0x0
0118 0093 031b | | PushFullAddress InMicrocode,INIT_0318
011a 02a0 | | Declare_Subprogram Null_Subprogram
011b 038f | | Declare_Type Package,Defined,Visible
011c e001 | | Load 0x0,0x1
011d 00b6 | | Action Make_Scope
011e 4802 |H | Short_Literal 0x2
011f 00db | | Load_Top At_Offset_3
0120 020e | | Execute Module,Augment_Imports
0121 0386 | | Declare_Variable Package,Visible
0122 c225 | % | Store 0x1,0x25
0123 4800 |H | Short_Literal 0x0
0124 0093 02f3 | | PushFullAddress InMicrocode,INIT_02f0
0126 02a0 | | Declare_Subprogram Null_Subprogram
0127 038f | | Declare_Type Package,Defined,Visible
0128 e001 | | Load 0x0,0x1
0129 00b6 | | Action Make_Scope
012a 4802 |H | Short_Literal 0x2
012b 00db | | Load_Top At_Offset_3
012c 020e | | Execute Module,Augment_Imports
012d 0386 | | Declare_Variable Package,Visible
012e c226 | & | Store 0x1,0x26
012f 4800 |H | Short_Literal 0x0
0130 0093 02d3 | | PushFullAddress InMicrocode,INIT_02d0
0132 02a0 | | Declare_Subprogram Null_Subprogram
0133 038f | | Declare_Type Package,Defined,Visible
0134 e001 | | Load 0x0,0x1
0135 4801 |H | Short_Literal 0x1
0136 00da | | Load_Top At_Offset_2
0137 020e | | Execute Module,Augment_Imports
0138 0386 | | Declare_Variable Package,Visible
0139 c227 | ' | Store 0x1,0x27
013a 4800 |H | Short_Literal 0x0
013b 480f |H | Short_Literal 0xf
013c e001 | | Load 0x0,0x1
013d 1b15 | | Execute Package,Field_Read,Field_Number 0x15
013e 02a0 | | Declare_Subprogram Null_Subprogram
013f 4801 |H | Short_Literal 0x1
0140 035e | ^ | Declare_Type Array,Defined,Visible
0141 c228 | ( | Store 0x1,0x28
0142 4800 |H | Short_Literal 0x0
0143 480f |H | Short_Literal 0xf
0144 e001 | | Load 0x0,0x1
0145 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0146 02a0 | | Declare_Subprogram Null_Subprogram
0147 4801 |H | Short_Literal 0x1
0148 035e | ^ | Declare_Type Array,Defined,Visible
0149 c229 | ) | Store 0x1,0x29
014a 4800 |H | Short_Literal 0x0
014b 0093 028b | | PushFullAddress InMicrocode,INIT_0288
014d 02a0 | | Declare_Subprogram Null_Subprogram
014e 038f | | Declare_Type Package,Defined,Visible
014f 00b6 | | Action Make_Scope
0150 e001 | | Load 0x0,0x1
0151 4802 |H | Short_Literal 0x2
0152 00db | | Load_Top At_Offset_3
0153 020e | | Execute Module,Augment_Imports
0154 0386 | | Declare_Variable Package,Visible
0155 c22a | * | Store 0x1,0x2a
0156 4800 |H | Short_Literal 0x0
0157 0093 026b | k| PushFullAddress InMicrocode,INIT_0268
0159 02a0 | | Declare_Subprogram Null_Subprogram
015a 038f | | Declare_Type Package,Defined,Visible
015b e001 | | Load 0x0,0x1
015c 4801 |H | Short_Literal 0x1
015d 00da | | Load_Top At_Offset_2
015e 020e | | Execute Module,Augment_Imports
015f 0386 | | Declare_Variable Package,Visible
0160 c22b | + | Store 0x1,0x2b
0161 4800 |H | Short_Literal 0x0
0162 0093 01eb | | PushFullAddress InMicrocode,INIT_01e8
0164 02a0 | | Declare_Subprogram Null_Subprogram
0165 038f | | Declare_Type Package,Defined,Visible
0166 e001 | | Load 0x0,0x1
0167 00b6 | | Action Make_Scope
0168 4802 |H | Short_Literal 0x2
0169 00db | | Load_Top At_Offset_3
016a 020e | | Execute Module,Augment_Imports
016b 0386 | | Declare_Variable Package,Visible
016c c22c | , | Store 0x1,0x2c
016d e21c | | Load 0x1,0x1c
016e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
016f e21d | | Load 0x1,0x1d
0170 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0171 e21f | | Load 0x1,0x1f
0172 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0173 e220 | | Load 0x1,0x20
0174 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0175 e221 | ! | Load 0x1,0x21
0176 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0177 e224 | $ | Load 0x1,0x24
0178 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0179 e225 | % | Load 0x1,0x25
017a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
017b e226 | & | Load 0x1,0x26
017c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
017d e227 | ' | Load 0x1,0x27
017e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
017f e22a | * | Load 0x1,0x2a
0180 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0181 e22b | + | Load 0x1,0x2b
0182 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0183 e22c | , | Load 0x1,0x2c
0184 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0185 e21e | | Load 0x1,0x1e
0186 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0187 02a0 | | Declare_Subprogram Null_Subprogram
0188 480d |H | Short_Literal 0xd
0189 032e | . | Declare_Type Record,Defined,Visible
018a c22d | - | Store 0x1,0x2d
018b e22d | - | Load 0x1,0x2d
018c 02a0 | | Declare_Subprogram Null_Subprogram
018d 4818 |H | Short_Literal 0x18
018e 03d6 | | Declare_Type Access,Defined,Visible
018f c22e | . | Store 0x1,0x2e
0190 029a 01bb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01b8
0192 c22f | / | Store 0x1,0x2f
0193 00bf | | Action Accept_Activation
0194 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f
0195 00c7 | | Action Elaborate_Subprogram
0196 e21c | | Load 0x1,0x1c
0197 020f | | Execute Module,Activate
0198 e21d | | Load 0x1,0x1d
0199 020f | | Execute Module,Activate
019a e21e | | Load 0x1,0x1e
019b 020f | | Execute Module,Activate
019c e21f | | Load 0x1,0x1f
019d 020f | | Execute Module,Activate
019e e220 | | Load 0x1,0x20
019f 020f | | Execute Module,Activate
01a0 e221 | ! | Load 0x1,0x21
01a1 020f | | Execute Module,Activate
01a2 e224 | $ | Load 0x1,0x24
01a3 020f | | Execute Module,Activate
01a4 e225 | % | Load 0x1,0x25
01a5 020f | | Execute Module,Activate
01a6 e226 | & | Load 0x1,0x26
01a7 020f | | Execute Module,Activate
01a8 e227 | ' | Load 0x1,0x27
01a9 020f | | Execute Module,Activate
01aa e22a | * | Load 0x1,0x2a
01ab 020f | | Execute Module,Activate
01ac e22b | + | Load 0x1,0x2b
01ad 020f | | Execute Module,Activate
01ae e22c | , | Load 0x1,0x2c
01af 020f | | Execute Module,Activate
01b0 BODY_0008:
01b0 00bc | | Action Signal_Activated
01b1 00bb | | Action Signal_Completion
01b2 0000 0000 | | .BLANK 0000[0x6]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01cb | | .CONST 0x01cb ; Address of begin
01b9 0004 | | .CONST 0x0004 ; Address of exception handler
01ba 0005 | | .CONST 0x0005 ; Number of locals
01bb INIT_01b8:
01bb e003 | | Load 0x0,0x3
01bc e004 | | Load 0x0,0x4
01bd e22d | - | Load 0x1,0x2d
01be e005 | | Load 0x0,0x5
01bf 0387 | | Declare_Variable Package
01c0 00d8 | | Load_Top At_Offset_0
01c1 020f | | Execute Module,Activate
01c2 0092 04b1 | | Action Push_String_Extended,0x4b1 ; ".saved_state"
01c4 00d9 | | Load_Top At_Offset_1
01c5 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01c6 02c7 | | Declare_Variable Any
01c7 00d8 | | Load_Top At_Offset_0
01c8 1c00 | | Execute_Immediate Run_Utility,0x0
01c9 e22e | . | Load 0x1,0x2e
01ca 0007 | | Action Break_Optional
01cb BODY_01b8:
01cb e22e | . | Load 0x1,0x2e
01cc 03bc | | Declare_Variable Access,By_Allocation
01cd 0039 | 9 | Store_Top Access,At_Offset_1
01ce 00d9 | | Load_Top At_Offset_1
01cf 00ea | | Load_Encached Null_String_Cache
01d0 e5ff | | Load 0x2,-0x1
01d1 4800 |H | Short_Literal 0x0
01d2 e402 | | Load 0x2,0x2
01d3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01d4 c404 | | Store 0x2,0x4
01d5 00d8 | | Load_Top At_Offset_0
01d6 0229 | ) | Execute Access,All_Read
01d7 00d8 | | Load_Top At_Offset_0
01d8 00db | | Load_Top At_Offset_3
01d9 e402 | | Load 0x2,0x2
01da 181c | | Execute Package,Field_Execute,Field_Number 0x1c
01db 00d2 | | Pop_Control Pop_Count_2
01dc 00d9 | | Load_Top At_Offset_1
01dd e402 | | Load 0x2,0x2
01de 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01df c404 | | Store 0x2,0x4
01e0 00d8 | | Load_Top At_Offset_0
01e1 4401 |D | Exit_Subprogram With_Result,0x1
01e2 0000 0000 | | .XXX[0x2]
01e4 0000 0000 | | .LITERAL {0x00000000, 0x00000400}
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 0237 | 7 | .CONST 0x0237 ; Address of begin
01e9 0004 | | .CONST 0x0004 ; Address of exception handler
01ea 0015 | | .CONST 0x0015 ; Number of locals
01eb INIT_01e8:
01eb 4800 |H | Short_Literal 0x0
01ec 480a |H | Short_Literal 0xa
01ed 029f 0243 | C| Declare_Subprogram For_Call,INIT_0240
01ef 03fe | | Declare_Type Discrete,Defined,Visible
01f0 4801 |H | Short_Literal 0x1
01f1 480a |H | Short_Literal 0xa
01f2 00da | | Load_Top At_Offset_2
01f3 03f9 | | Declare_Type Discrete,Constrained,Visible
01f4 4801 |H | Short_Literal 0x1
01f5 481e |H | Short_Literal 0x1e
01f6 00e9 | | Load_Encached String_Cache
01f7 035c | \ | Declare_Type Array,Constrained,Visible
01f8 e001 | | Load 0x0,0x1
01f9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01fa e001 | | Load 0x0,0x1
01fb 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01fc e001 | | Load 0x0,0x1
01fd 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01fe e001 | | Load 0x0,0x1
01ff 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0200 02a0 | | Declare_Subprogram Null_Subprogram
0201 4804 |H | Short_Literal 0x4
0202 032e | . | Declare_Type Record,Defined,Visible
0203 e001 | | Load 0x0,0x1
0204 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0205 e001 | | Load 0x0,0x1
0206 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0207 00db | | Load_Top At_Offset_3
0208 02a0 | | Declare_Subprogram Null_Subprogram
0209 4803 |H | Short_Literal 0x3
020a 032e | . | Declare_Type Record,Defined,Visible
020b e001 | | Load 0x0,0x1
020c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
020d 00d9 | | Load_Top At_Offset_1
020e e001 | | Load 0x0,0x1
020f 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0210 02a0 | | Declare_Subprogram Null_Subprogram
0211 4803 |H | Short_Literal 0x3
0212 032e | . | Declare_Type Record,Defined,Visible
0213 e001 | | Load 0x0,0x1
0214 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0215 e001 | | Load 0x0,0x1
0216 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0217 e001 | | Load 0x0,0x1
0218 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0219 e001 | | Load 0x0,0x1
021a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
021b e001 | | Load 0x0,0x1
021c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
021d e001 | | Load 0x0,0x1
021e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
021f e001 | | Load 0x0,0x1
0220 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0221 02a0 | | Declare_Subprogram Null_Subprogram
0222 4807 |H | Short_Literal 0x7
0223 032e | . | Declare_Type Record,Defined,Visible
0224 4801 |H | Short_Literal 0x1
0225 480a |H | Short_Literal 0xa
0226 e211 | | Load 0x1,0x11
0227 02a0 | | Declare_Subprogram Null_Subprogram
0228 4801 |H | Short_Literal 0x1
0229 035e | ^ | Declare_Type Array,Defined,Visible
022a e001 | | Load 0x0,0x1
022b 1b10 | | Execute Package,Field_Read,Field_Number 0x10
022c e210 | | Load 0x1,0x10
022d e212 | | Load 0x1,0x12
022e e213 | | Load 0x1,0x13
022f e211 | | Load 0x1,0x11
0230 e214 | | Load 0x1,0x14
0231 e002 | | Load 0x0,0x2
0232 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0233 02a0 | | Declare_Subprogram Null_Subprogram
0234 4807 |H | Short_Literal 0x7
0235 032e | . | Declare_Type Record,Defined,Visible
0236 00bf | | Action Accept_Activation
0237 BODY_01e8:
0237 00bc | | Action Signal_Activated
0238 00bb | | Action Signal_Completion
0239 0000 0000 | | .BLANK 0000[0x7]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0243 | C | .CONST 0x0243 ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0001 | | .CONST 0x0001 ; Number of locals
0243 BODY_0240:
0243 INIT_0240:
0243 4607 |F | Jump_Case 0x7
0244 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
0245 7806 |x | Jump 0x24c ; case 0x1
0246 7809 |x | Jump 0x250 ; case 0x2
0247 780d |x | Jump 0x255 ; case 0x3
0248 7810 |x | Jump 0x259 ; case 0x4
0249 7811 |x | Jump 0x25b ; case 0x5
024a 7812 |x | Jump 0x25d ; case 0x6
024b 7815 |x | Jump 0x261 ; case 0x7
024c 00da | | Load_Top At_Offset_2
024d 0091 04a6 | | Action Push_String_Extended_Indexed,0x4a6 ; "MICROCODE"
024f 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0250 00db | | Load_Top At_Offset_3
0251 00db | | Load_Top At_Offset_3
0252 00e0 | | Load_Encached Standard_Cache
0253 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0254 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0255 00da | | Load_Top At_Offset_2
0256 00e0 | | Load_Encached Standard_Cache
0257 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0258 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0259 00db | | Load_Top At_Offset_3
025a 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
025b 00db | | Load_Top At_Offset_3
025c 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
025d e20d | | Load 0x1,0xd
025e 00dc | | Load_Top At_Offset_4
025f 0267 | g | Execute Discrete,Predecessor
0260 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0261 e20d | | Load 0x1,0xd
0262 00dc | | Load_Top At_Offset_4
0263 0268 | h | Execute Discrete,Successor
0264 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0265 0000 0000 | | .XXX[0x3]
0267 0000 | |
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 0283 | | .CONST 0x0283 ; Address of begin
0269 0004 | | .CONST 0x0004 ; Address of exception handler
026a 000e | | .CONST 0x000e ; Number of locals
026b INIT_0268:
026b e001 | | Load 0x0,0x1
026c 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
026d 0129 | ) | Execute Any,Make_Visible
026e 00d8 | | Load_Top At_Offset_0
026f 012c | , | Execute Any,Size
0270 0f10 | | Execute_Immediate Equal,0x10
0271 7001 |p | Jump_Nonzero 0x273
0272 0887 | | Execute_Immediate Raise,0x87
0273 4800 |H | Short_Literal 0x0
0274 4bff |K | Short_Literal 0x3ff
0275 00da | | Load_Top At_Offset_2
0276 02a0 | | Declare_Subprogram Null_Subprogram
0277 4801 |H | Short_Literal 0x1
0278 035e | ^ | Declare_Type Array,Defined,Visible
0279 00d8 | | Load_Top At_Offset_0
027a 012c | , | Execute Any,Size
027b e001 | | Load 0x0,0x1
027c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
027d 012c | , | Execute Any,Size
027e 0901 | | Execute_Immediate Binary_Scale,0x1
027f 027f | | Execute Discrete,Equal
0280 7001 |p | Jump_Nonzero 0x282
0281 0887 | | Execute_Immediate Raise,0x87
0282 00bf | | Action Accept_Activation
0283 BODY_0268:
0283 00bc | | Action Signal_Activated
0284 00bb | | Action Signal_Completion
0285 0000 0000 | | .XXX[0x3]
0287 0000 | |
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 02cd | | .CONST 0x02cd ; Address of begin
0289 0004 | | .CONST 0x0004 ; Address of exception handler
028a 000d | | .CONST 0x000d ; Number of locals
028b INIT_0288:
028b e001 | | Load 0x0,0x1
028c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
028d e002 | | Load 0x0,0x2
028e 1b11 | | Execute Package,Field_Read,Field_Number 0x11
028f e002 | | Load 0x0,0x2
0290 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0291 e002 | | Load 0x0,0x2
0292 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0293 e002 | | Load 0x0,0x2
0294 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0295 e002 | | Load 0x0,0x2
0296 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0297 e002 | | Load 0x0,0x2
0298 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
0299 e002 | | Load 0x0,0x2
029a 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31
029b e002 | | Load 0x0,0x2
029c 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
029d e002 | | Load 0x0,0x2
029e 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
029f e002 | | Load 0x0,0x2
02a0 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
02a1 e002 | | Load 0x0,0x2
02a2 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
02a3 e002 | | Load 0x0,0x2
02a4 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
02a5 e002 | | Load 0x0,0x2
02a6 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
02a7 e002 | | Load 0x0,0x2
02a8 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
02a9 e002 | | Load 0x0,0x2
02aa 1b2d | - | Execute Package,Field_Read,Field_Number 0x2d
02ab e002 | | Load 0x0,0x2
02ac 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
02ad e002 | | Load 0x0,0x2
02ae 1b15 | | Execute Package,Field_Read,Field_Number 0x15
02af e002 | | Load 0x0,0x2
02b0 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02b1 e002 | | Load 0x0,0x2
02b2 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02b3 e002 | | Load 0x0,0x2
02b4 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02b5 e002 | | Load 0x0,0x2
02b6 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02b7 e002 | | Load 0x0,0x2
02b8 1b15 | | Execute Package,Field_Read,Field_Number 0x15
02b9 e002 | | Load 0x0,0x2
02ba 1b15 | | Execute Package,Field_Read,Field_Number 0x15
02bb e001 | | Load 0x0,0x1
02bc 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28
02bd e001 | | Load 0x0,0x1
02be 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
02bf e001 | | Load 0x0,0x1
02c0 1b15 | | Execute Package,Field_Read,Field_Number 0x15
02c1 02a0 | | Declare_Subprogram Null_Subprogram
02c2 481b |H | Short_Literal 0x1b
02c3 032e | . | Declare_Type Record,Defined,Visible
02c4 00d8 | | Load_Top At_Offset_0
02c5 012c | , | Execute Any,Size
02c6 e002 | | Load 0x0,0x2
02c7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02c8 012c | , | Execute Any,Size
02c9 027f | | Execute Discrete,Equal
02ca 7001 |p | Jump_Nonzero 0x2cc
02cb 0887 | | Execute_Immediate Raise,0x87
02cc 00bf | | Action Accept_Activation
02cd BODY_0288:
02cd 00bc | | Action Signal_Activated
02ce 00bb | | Action Signal_Completion
02cf 0000 | | .XXX[0x1]
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02e3 | | .CONST 0x02e3 ; Address of begin
02d1 0004 | | .CONST 0x0004 ; Address of exception handler
02d2 000d | | .CONST 0x000d ; Number of locals
02d3 INIT_02d0:
02d3 4801 |H | Short_Literal 0x1
02d4 6013 |` | Indirect_Literal Discrete,0x2e8,{0x00000000, 0x00000400}
02d5 e001 | | Load 0x0,0x1
02d6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02d7 02a0 | | Declare_Subprogram Null_Subprogram
02d8 4801 |H | Short_Literal 0x1
02d9 035e | ^ | Declare_Type Array,Defined,Visible
02da 00d8 | | Load_Top At_Offset_0
02db 012c | , | Execute Any,Size
02dc e001 | | Load 0x0,0x1
02dd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02de 012c | , | Execute Any,Size
02df 027f | | Execute Discrete,Equal
02e0 7001 |p | Jump_Nonzero 0x2e2
02e1 0887 | | Execute_Immediate Raise,0x87
02e2 00bf | | Action Accept_Activation
02e3 BODY_02d0:
02e3 00bc | | Action Signal_Activated
02e4 00bb | | Action Signal_Completion
02e5 0000 0000 | | .XXX[0x3]
02e7 0000 | |
02e8 0000 0000 | | .LITERAL {0x00000000, 0x00000400}
02ec 0000 0000 | | .BLANK 0000[0x4]
02f0 ; --------------------------------------------------------------------------------------
02f0 ; SUBPROGRAM
02f0 ; --------------------------------------------------------------------------------------
02f0 030f | | .CONST 0x030f ; Address of begin
02f1 0004 | | .CONST 0x0004 ; Address of exception handler
02f2 000d | | .CONST 0x000d ; Number of locals
02f3 INIT_02f0:
02f3 e001 | | Load 0x0,0x1
02f4 1b10 | | Execute Package,Field_Read,Field_Number 0x10
02f5 e002 | | Load 0x0,0x2
02f6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02f7 e001 | | Load 0x0,0x1
02f8 1b11 | | Execute Package,Field_Read,Field_Number 0x11
02f9 e001 | | Load 0x0,0x1
02fa 1b11 | | Execute Package,Field_Read,Field_Number 0x11
02fb e001 | | Load 0x0,0x1
02fc 1b12 | | Execute Package,Field_Read,Field_Number 0x12
02fd e001 | | Load 0x0,0x1
02fe 1b15 | | Execute Package,Field_Read,Field_Number 0x15
02ff e002 | | Load 0x0,0x2
0300 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0301 e002 | | Load 0x0,0x2
0302 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0303 02a0 | | Declare_Subprogram Null_Subprogram
0304 4808 |H | Short_Literal 0x8
0305 032e | . | Declare_Type Record,Defined,Visible
0306 00d8 | | Load_Top At_Offset_0
0307 012c | , | Execute Any,Size
0308 e001 | | Load 0x0,0x1
0309 1b0d | | Execute Package,Field_Read,Field_Number 0xd
030a 012c | , | Execute Any,Size
030b 027f | | Execute Discrete,Equal
030c 7001 |p | Jump_Nonzero 0x30e
030d 0887 | | Execute_Immediate Raise,0x87
030e 00bf | | Action Accept_Activation
030f BODY_02f0:
030f 00bc | | Action Signal_Activated
0310 00bb | | Action Signal_Completion
0311 0000 0000 | | .BLANK 0000[0x7]
0318 ; --------------------------------------------------------------------------------------
0318 ; SUBPROGRAM
0318 ; --------------------------------------------------------------------------------------
0318 033f | ? | .CONST 0x033f ; Address of begin
0319 0004 | | .CONST 0x0004 ; Address of exception handler
031a 000d | | .CONST 0x000d ; Number of locals
031b INIT_0318:
031b e001 | | Load 0x0,0x1
031c 1b10 | | Execute Package,Field_Read,Field_Number 0x10
031d e002 | | Load 0x0,0x2
031e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
031f e001 | | Load 0x0,0x1
0320 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0321 e001 | | Load 0x0,0x1
0322 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0323 e001 | | Load 0x0,0x1
0324 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0325 e001 | | Load 0x0,0x1
0326 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0327 e001 | | Load 0x0,0x1
0328 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0329 e001 | | Load 0x0,0x1
032a 1b11 | | Execute Package,Field_Read,Field_Number 0x11
032b e001 | | Load 0x0,0x1
032c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
032d e002 | | Load 0x0,0x2
032e 1b16 | | Execute Package,Field_Read,Field_Number 0x16
032f e002 | | Load 0x0,0x2
0330 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
0331 e002 | | Load 0x0,0x2
0332 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0333 02a0 | | Declare_Subprogram Null_Subprogram
0334 480c |H | Short_Literal 0xc
0335 032e | . | Declare_Type Record,Defined,Visible
0336 00d8 | | Load_Top At_Offset_0
0337 012c | , | Execute Any,Size
0338 e001 | | Load 0x0,0x1
0339 1b0d | | Execute Package,Field_Read,Field_Number 0xd
033a 012c | , | Execute Any,Size
033b 027f | | Execute Discrete,Equal
033c 7001 |p | Jump_Nonzero 0x33e
033d 0887 | | Execute_Immediate Raise,0x87
033e 00bf | | Action Accept_Activation
033f BODY_0318:
033f 00bc | | Action Signal_Activated
0340 00bb | | Action Signal_Completion
0341 0000 0000 | | .BLANK 0000[0x7]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 036f | o | .CONST 0x036f ; Address of begin
0349 0004 | | .CONST 0x0004 ; Address of exception handler
034a 000d | | .CONST 0x000d ; Number of locals
034b INIT_0348:
034b e001 | | Load 0x0,0x1
034c 1b10 | | Execute Package,Field_Read,Field_Number 0x10
034d e002 | | Load 0x0,0x2
034e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
034f e001 | | Load 0x0,0x1
0350 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0351 e001 | | Load 0x0,0x1
0352 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0353 e001 | | Load 0x0,0x1
0354 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0355 e001 | | Load 0x0,0x1
0356 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0357 e002 | | Load 0x0,0x2
0358 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0359 e001 | | Load 0x0,0x1
035a 1b11 | | Execute Package,Field_Read,Field_Number 0x11
035b e001 | | Load 0x0,0x1
035c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
035d e002 | | Load 0x0,0x2
035e 1b16 | | Execute Package,Field_Read,Field_Number 0x16
035f e002 | | Load 0x0,0x2
0360 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
0361 e002 | | Load 0x0,0x2
0362 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0363 02a0 | | Declare_Subprogram Null_Subprogram
0364 480c |H | Short_Literal 0xc
0365 032e | . | Declare_Type Record,Defined,Visible
0366 00d8 | | Load_Top At_Offset_0
0367 012c | , | Execute Any,Size
0368 e001 | | Load 0x0,0x1
0369 1b0d | | Execute Package,Field_Read,Field_Number 0xd
036a 012c | , | Execute Any,Size
036b 027f | | Execute Discrete,Equal
036c 7001 |p | Jump_Nonzero 0x36e
036d 0887 | | Execute_Immediate Raise,0x87
036e 00bf | | Action Accept_Activation
036f BODY_0348:
036f 00bc | | Action Signal_Activated
0370 00bb | | Action Signal_Completion
0371 0000 0000 | | .BLANK 0000[0x7]
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 03b1 | | .CONST 0x03b1 ; Address of begin
0379 0004 | | .CONST 0x0004 ; Address of exception handler
037a 000d | | .CONST 0x000d ; Number of locals
037b INIT_0378:
037b e001 | | Load 0x0,0x1
037c 1b10 | | Execute Package,Field_Read,Field_Number 0x10
037d e002 | | Load 0x0,0x2
037e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
037f e001 | | Load 0x0,0x1
0380 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0381 e001 | | Load 0x0,0x1
0382 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0383 e001 | | Load 0x0,0x1
0384 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0385 e001 | | Load 0x0,0x1
0386 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
0387 e001 | | Load 0x0,0x1
0388 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31
0389 e001 | | Load 0x0,0x1
038a 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
038b e001 | | Load 0x0,0x1
038c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
038d e001 | | Load 0x0,0x1
038e 1b15 | | Execute Package,Field_Read,Field_Number 0x15
038f e001 | | Load 0x0,0x1
0390 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
0391 e001 | | Load 0x0,0x1
0392 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0393 e001 | | Load 0x0,0x1
0394 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0395 e001 | | Load 0x0,0x1
0396 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0397 e001 | | Load 0x0,0x1
0398 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
0399 e001 | | Load 0x0,0x1
039a 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
039b e001 | | Load 0x0,0x1
039c 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
039d e001 | | Load 0x0,0x1
039e 1b2d | - | Execute Package,Field_Read,Field_Number 0x2d
039f e001 | | Load 0x0,0x1
03a0 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
03a1 e002 | | Load 0x0,0x2
03a2 1b17 | | Execute Package,Field_Read,Field_Number 0x17
03a3 e002 | | Load 0x0,0x2
03a4 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
03a5 02a0 | | Declare_Subprogram Null_Subprogram
03a6 4815 |H | Short_Literal 0x15
03a7 032e | . | Declare_Type Record,Defined,Visible
03a8 00d8 | | Load_Top At_Offset_0
03a9 012c | , | Execute Any,Size
03aa e001 | | Load 0x0,0x1
03ab 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03ac 012c | , | Execute Any,Size
03ad 027f | | Execute Discrete,Equal
03ae 7001 |p | Jump_Nonzero 0x3b0
03af 0887 | | Execute_Immediate Raise,0x87
03b0 00bf | | Action Accept_Activation
03b1 BODY_0378:
03b1 00bc | | Action Signal_Activated
03b2 00bb | | Action Signal_Completion
03b3 0000 0000 | | .BLANK 0000[0x5]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03dd | | .CONST 0x03dd ; Address of begin
03b9 0004 | | .CONST 0x0004 ; Address of exception handler
03ba 000d | | .CONST 0x000d ; Number of locals
03bb INIT_03b8:
03bb e001 | | Load 0x0,0x1
03bc 1b10 | | Execute Package,Field_Read,Field_Number 0x10
03bd e002 | | Load 0x0,0x2
03be 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03bf e001 | | Load 0x0,0x1
03c0 1b11 | | Execute Package,Field_Read,Field_Number 0x11
03c1 e001 | | Load 0x0,0x1
03c2 1b13 | | Execute Package,Field_Read,Field_Number 0x13
03c3 e001 | | Load 0x0,0x1
03c4 1b15 | | Execute Package,Field_Read,Field_Number 0x15
03c5 e001 | | Load 0x0,0x1
03c6 1b14 | | Execute Package,Field_Read,Field_Number 0x14
03c7 e001 | | Load 0x0,0x1
03c8 1b14 | | Execute Package,Field_Read,Field_Number 0x14
03c9 e001 | | Load 0x0,0x1
03ca 1b14 | | Execute Package,Field_Read,Field_Number 0x14
03cb e001 | | Load 0x0,0x1
03cc 1b14 | | Execute Package,Field_Read,Field_Number 0x14
03cd e002 | | Load 0x0,0x2
03ce 1b19 | | Execute Package,Field_Read,Field_Number 0x19
03cf e002 | | Load 0x0,0x2
03d0 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
03d1 02a0 | | Declare_Subprogram Null_Subprogram
03d2 480b |H | Short_Literal 0xb
03d3 032e | . | Declare_Type Record,Defined,Visible
03d4 00d8 | | Load_Top At_Offset_0
03d5 012c | , | Execute Any,Size
03d6 e001 | | Load 0x0,0x1
03d7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03d8 012c | , | Execute Any,Size
03d9 027f | | Execute Discrete,Equal
03da 7001 |p | Jump_Nonzero 0x3dc
03db 0887 | | Execute_Immediate Raise,0x87
03dc 00bf | | Action Accept_Activation
03dd BODY_03b8:
03dd 00bc | | Action Signal_Activated
03de 00bb | | Action Signal_Completion
03df 0000 | | .XXX[0x1]
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 0431 | 1 | .CONST 0x0431 ; Address of begin
03e1 0004 | | .CONST 0x0004 ; Address of exception handler
03e2 000f | | .CONST 0x000f ; Number of locals
03e3 INIT_03e0:
03e3 4800 |H | Short_Literal 0x0
03e4 4803 |H | Short_Literal 0x3
03e5 00e5 | | Load_Encached Long_Integer_Cache
03e6 03f9 | | Declare_Type Discrete,Constrained,Visible
03e7 e001 | | Load 0x0,0x1
03e8 1b10 | | Execute Package,Field_Read,Field_Number 0x10
03e9 e002 | | Load 0x0,0x2
03ea 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03eb e001 | | Load 0x0,0x1
03ec 1b10 | | Execute Package,Field_Read,Field_Number 0x10
03ed e001 | | Load 0x0,0x1
03ee 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03ef e001 | | Load 0x0,0x1
03f0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03f1 e001 | | Load 0x0,0x1
03f2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03f3 e001 | | Load 0x0,0x1
03f4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03f5 e001 | | Load 0x0,0x1
03f6 1b11 | | Execute Package,Field_Read,Field_Number 0x11
03f7 e001 | | Load 0x0,0x1
03f8 1b15 | | Execute Package,Field_Read,Field_Number 0x15
03f9 e001 | | Load 0x0,0x1
03fa 1b14 | | Execute Package,Field_Read,Field_Number 0x14
03fb e001 | | Load 0x0,0x1
03fc 1b11 | | Execute Package,Field_Read,Field_Number 0x11
03fd e001 | | Load 0x0,0x1
03fe 1b11 | | Execute Package,Field_Read,Field_Number 0x11
03ff e001 | | Load 0x0,0x1
0400 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0401 e001 | | Load 0x0,0x1
0402 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0403 e001 | | Load 0x0,0x1
0404 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0405 e001 | | Load 0x0,0x1
0406 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0407 e001 | | Load 0x0,0x1
0408 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0409 e001 | | Load 0x0,0x1
040a 1b14 | | Execute Package,Field_Read,Field_Number 0x14
040b e001 | | Load 0x0,0x1
040c 1b15 | | Execute Package,Field_Read,Field_Number 0x15
040d e001 | | Load 0x0,0x1
040e 1b15 | | Execute Package,Field_Read,Field_Number 0x15
040f e002 | | Load 0x0,0x2
0410 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0411 e001 | | Load 0x0,0x1
0412 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0413 e001 | | Load 0x0,0x1
0414 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0415 e001 | | Load 0x0,0x1
0416 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0417 e001 | | Load 0x0,0x1
0418 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0419 e001 | | Load 0x0,0x1
041a 1b15 | | Execute Package,Field_Read,Field_Number 0x15
041b e002 | | Load 0x0,0x2
041c 1b18 | | Execute Package,Field_Read,Field_Number 0x18
041d e002 | | Load 0x0,0x2
041e 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
041f 02a0 | | Declare_Subprogram Null_Subprogram
0420 481c |H | Short_Literal 0x1c
0421 032e | . | Declare_Type Record,Defined,Visible
0422 00d8 | | Load_Top At_Offset_0
0423 012c | , | Execute Any,Size
0424 e001 | | Load 0x0,0x1
0425 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0426 012c | , | Execute Any,Size
0427 027f | | Execute Discrete,Equal
0428 7001 |p | Jump_Nonzero 0x42a
0429 0887 | | Execute_Immediate Raise,0x87
042a 4800 |H | Short_Literal 0x0
042b 4803 |H | Short_Literal 0x3
042c 00da | | Load_Top At_Offset_2
042d 02a0 | | Declare_Subprogram Null_Subprogram
042e 4801 |H | Short_Literal 0x1
042f 035e | ^ | Declare_Type Array,Defined,Visible
0430 00bf | | Action Accept_Activation
0431 BODY_03e0:
0431 00bc | | Action Signal_Activated
0432 00bb | | Action Signal_Completion
0433 0000 0000 | | .BLANK 0000[0x5]
0438 ; --------------------------------------------------------------------------------------
0438 ; SUBPROGRAM
0438 ; --------------------------------------------------------------------------------------
0438 044d | M | .CONST 0x044d ; Address of begin
0439 0004 | | .CONST 0x0004 ; Address of exception handler
043a 000f | | .CONST 0x000f ; Number of locals
043b INIT_0438:
043b 4800 |H | Short_Literal 0x0
043c 481f |H | Short_Literal 0x1f
043d e001 | | Load 0x0,0x1
043e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
043f 02a0 | | Declare_Subprogram Null_Subprogram
0440 4801 |H | Short_Literal 0x1
0441 035e | ^ | Declare_Type Array,Defined,Visible
0442 4800 |H | Short_Literal 0x0
0443 481f |H | Short_Literal 0x1f
0444 00da | | Load_Top At_Offset_2
0445 02a0 | | Declare_Subprogram Null_Subprogram
0446 4801 |H | Short_Literal 0x1
0447 035e | ^ | Declare_Type Array,Defined,Visible
0448 00d8 | | Load_Top At_Offset_0
0449 02a0 | | Declare_Subprogram Null_Subprogram
044a 4801 |H | Short_Literal 0x1
044b 032e | . | Declare_Type Record,Defined,Visible
044c 00bf | | Action Accept_Activation
044d BODY_0438:
044d 00bc | | Action Signal_Activated
044e 00bb | | Action Signal_Completion
044f 0000 | | .XXX[0x1]
0450 ; --------------------------------------------------------------------------------------
0450 ; SUBPROGRAM
0450 ; --------------------------------------------------------------------------------------
0450 0468 | h | .CONST 0x0468 ; Address of begin
0451 0004 | | .CONST 0x0004 ; Address of exception handler
0452 000e | | .CONST 0x000e ; Number of locals
0453 INIT_0450:
0453 4800 |H | Short_Literal 0x0
0454 4b3f |K? | Short_Literal 0x33f
0455 e001 | | Load 0x0,0x1
0456 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0457 02a0 | | Declare_Subprogram Null_Subprogram
0458 4801 |H | Short_Literal 0x1
0459 035e | ^ | Declare_Type Array,Defined,Visible
045a e002 | | Load 0x0,0x2
045b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
045c e002 | | Load 0x0,0x2
045d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
045e e002 | | Load 0x0,0x2
045f 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0460 00e2 | | Load_Encached Integer_Cache
0461 e002 | | Load 0x0,0x2
0462 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0463 e20d | | Load 0x1,0xd
0464 02a0 | | Declare_Subprogram Null_Subprogram
0465 4806 |H | Short_Literal 0x6
0466 032e | . | Declare_Type Record,Defined,Visible
0467 00bf | | Action Accept_Activation
0468 BODY_0450:
0468 00bc | | Action Signal_Activated
0469 00bb | | Action Signal_Completion
046a 0000 0000 | | .BLANK 0000[0x6]
0470 ; --------------------------------------------------------------------------------------
0470 ; SUBPROGRAM
0470 ; --------------------------------------------------------------------------------------
0470 04a4 | | .CONST 0x04a4 ; Address of begin
0471 0004 | | .CONST 0x0004 ; Address of exception handler
0472 0011 | | .CONST 0x0011 ; Number of locals
0473 INIT_0470:
0473 4801 |H | Short_Literal 0x1
0474 4812 |H | Short_Literal 0x12
0475 00e9 | | Load_Encached String_Cache
0476 035c | \ | Declare_Type Array,Constrained,Visible
0477 00c4 | | Action Make_Default
0478 00c4 | | Action Make_Default
0479 00c4 | | Action Make_Default
047a 00c4 | | Action Make_Default
047b e001 | | Load 0x0,0x1
047c 1b11 | | Execute Package,Field_Read,Field_Number 0x11
047d e001 | | Load 0x0,0x1
047e 1b11 | | Execute Package,Field_Read,Field_Number 0x11
047f e001 | | Load 0x0,0x1
0480 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0481 e001 | | Load 0x0,0x1
0482 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0483 e001 | | Load 0x0,0x1
0484 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0485 e001 | | Load 0x0,0x1
0486 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0487 e20d | | Load 0x1,0xd
0488 e001 | | Load 0x0,0x1
0489 1b11 | | Execute Package,Field_Read,Field_Number 0x11
048a e001 | | Load 0x0,0x1
048b 1b11 | | Execute Package,Field_Read,Field_Number 0x11
048c e002 | | Load 0x0,0x2
048d 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
048e 02a0 | | Declare_Subprogram Null_Subprogram
048f 480a |H | Short_Literal 0xa
0490 032e | . | Declare_Type Record,Defined,Visible
0491 c20f | | Store 0x1,0xf
0492 e002 | | Load 0x0,0x2
0493 1b33 | 3 | Execute Package,Field_Read,Field_Number 0x33
0494 0322 | " | Declare_Variable Record
0495 4800 |H | Short_Literal 0x0
0496 00d9 | | Load_Top At_Offset_1
0497 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0498 481e |H | Short_Literal 0x1e
0499 00d9 | | Load_Top At_Offset_1
049a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
049b 489e |H | Short_Literal 0x9e
049c 00d9 | | Load_Top At_Offset_1
049d 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
049e 4bdd |K | Short_Literal 0x3dd
049f 00d9 | | Load_Top At_Offset_1
04a0 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
04a1 0129 | ) | Execute Any,Make_Visible
04a2 c211 | | Store 0x1,0x11
04a3 00bf | | Action Accept_Activation
04a4 BODY_0470:
04a4 00bc | | Action Signal_Activated
04a5 00bb | | Action Signal_Completion
04a6 ; --------------------------------------------------------------------------------------
04a6 ; STRING TABLE
04a6 ; --------------------------------------------------------------------------------------
04a6 001a | | .STRTAB 0x001a->0x04b3 ; "MICROCODE"
04a7 0021 | ! | .STRTAB 0x0021->0x04b7 ; "ADA_BASE"
04a8 0027 | ' | .STRTAB 0x0027->0x04bb ; "MACHINE_INTERFACE"
04a9 0036 | 6 | .STRTAB 0x0036->0x04c4 ; "KERNEL_DEBUGGER_IO"
04aa 0046 | F | .STRTAB 0x0046->0x04cd ; "KERNEL_DEBUGGER"
04ab 0053 | S | .STRTAB 0x0053->0x04d4 ; "KERNEL"
04ac 0057 | W | .STRTAB 0x0057->0x04d7 ; "ENVIRONMENT_DEBUGGER"
04ad 0069 | i | .STRTAB 0x0069->0x04e1 ; "ABSTRACT_TYPES"
04ae 0075 | u | .STRTAB 0x0075->0x04e8 ; "MISCELLANEOUS"
04af 0080 | | .STRTAB 0x0080->0x04ef ; "OS_UTILITIES"
04b0 008a | | .STRTAB 0x008a->0x04f5 ; "ELABORATOR_DATABASE"
04b1 009b | | .STRTAB 0x009b->0x04fe ; ".saved_state"
04b2 00a5 | | .STREND 0x00a5->0x0504
04b3 4d49 4352 |MICR| .STRTAB_STRINGS
0505 0000 0000 | | .XXX[0x3]
0507 0000 | |
0508 ; --------------------------------------------------------------------------------------
0508 ; Debug Table
0508 ; --------------------------------------------------------------------------------------
0508 0004 000e | | .DEBUG4 0x0004,0x000e,0x9a01,0x0000,0x0001,0x0000
050e 4190 6419 |A d | .XXX[0xf2]
0510 0641 9064 | A d|
0512 1906 4190 | A |
0514 6419 0641 |d A|
0516 9064 1906 | d |
0518 4190 6419 |A d |
051a 0641 9064 | A d|
051c 1906 4190 | A |
051e 6419 0641 |d A|
0520 9064 1906 | d |
0522 4190 6419 |A d |
0524 0641 9064 | A d|
0526 1906 4190 | A |
0528 6419 0641 |d A|
052a 9064 1906 | d |
052c 4190 6419 |A d |
052e 0641 9064 | A d|
0530 1906 4190 | A |
0532 6419 0641 |d A|
0534 9064 1906 | d |
0536 4190 6419 |A d |
0538 0641 9064 | A d|
053a 1906 4190 | A |
053c 6419 0641 |d A|
053e 9064 1906 | d |
0540 4190 6419 |A d |
0542 0641 9064 | A d|
0544 1906 4190 | A |
0546 6419 0641 |d A|
0548 9064 1906 | d |
054a 4190 6419 |A d |
054c 0641 9064 | A d|
054e 1906 4190 | A |
0550 6419 0641 |d A|
0552 9064 1906 | d |
0554 4190 6419 |A d |
0556 0641 9064 | A d|
0558 1906 4190 | A |
055a 6419 0641 |d A|
055c 9064 1906 | d |
055e 4190 6419 |A d |
0560 0641 9064 | A d|
0562 1906 4190 | A |
0564 6419 0641 |d A|
0566 9064 1906 | d |
0568 4190 6419 |A d |
056a 0641 9064 | A d|
056c 1906 4190 | A |
056e 6419 0641 |d A|
0570 9064 1906 | d |
0572 4190 6419 |A d |
0574 0641 9064 | A d|
0576 1906 4190 | A |
0578 6419 0641 |d A|
057a 9064 1906 | d |
057c 4190 6419 |A d |
057e 0641 9064 | A d|
0580 1906 4190 | A |
0582 6419 0641 |d A|
0584 9064 1906 | d |
0586 4190 6419 |A d |
0588 0641 9064 | A d|
058a 1906 4190 | A |
058c 6419 0641 |d A|
058e 9064 1906 | d |
0590 4190 6419 |A d |
0592 0641 9064 | A d|
0594 1906 4190 | A |
0596 6419 0641 |d A|
0598 9064 1906 | d |
059a 4190 6419 |A d |
059c 0641 9064 | A d|
059e 1906 4190 | A |
05a0 6419 0641 |d A|
05a2 9064 1906 | d |
05a4 4190 6419 |A d |
05a6 0641 9064 | A d|
05a8 1906 4190 | A |
05aa 6419 0641 |d A|
05ac 9064 1906 | d |
05ae 4190 6419 |A d |
05b0 0641 9064 | A d|
05b2 1906 4190 | A |
05b4 6419 0641 |d A|
05b6 9064 1906 | d |
05b8 4190 6419 |A d |
05ba 0641 9064 | A d|
05bc 1906 4190 | A |
05be 6419 0641 |d A|
05c0 9064 1906 | d |
05c2 4190 6419 |A d |
05c4 0641 9064 | A d|
05c6 1906 4190 | A |
05c8 6419 0641 |d A|
05ca 9064 1906 | d |
05cc 4190 6419 |A d |
05ce 0641 9064 | A d|
05d0 1906 4190 | A |
05d2 6419 0641 |d A|
05d4 9064 1906 | d |
05d6 4190 6419 |A d |
05d8 0641 9064 | A d|
05da 1906 4190 | A |
05dc 6419 0641 |d A|
05de 9064 1906 | d |
05e0 4190 6419 |A d |
05e2 0641 9064 | A d|
05e4 1906 4190 | A |
05e6 6419 0641 |d A|
05e8 9064 1906 | d |
05ea 4190 6419 |A d |
05ec 0641 9064 | A d|
05ee 1906 4190 | A |
05f0 6419 0641 |d A|
05f2 9064 1906 | d |
05f4 4190 6419 |A d |
05f6 0641 9064 | A d|
05f8 1906 4190 | A |
05fa 6419 0641 |d A|
05fc 9064 1906 | d |
05fe 4190 6419 |A d |