|
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: 2048 (0x800)
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 03e0 | | .CONST 0x03e0 ; 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 0107 | | .CONST 0x0107 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0026 | & | .CONST 0x0026 ; 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 4801 |H | Short_Literal 0x1
0021 480d |H | Short_Literal 0xd
0022 e001 | | Load 0x0,0x1
0023 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0024 02a0 | | Declare_Subprogram Null_Subprogram
0025 4801 |H | Short_Literal 0x1
0026 035e | ^ | Declare_Type Array,Defined,Visible
0027 4801 |H | Short_Literal 0x1
0028 480e |H | Short_Literal 0xe
0029 e001 | | Load 0x0,0x1
002a 1b15 | | Execute Package,Field_Read,Field_Number 0x15
002b 02a0 | | Declare_Subprogram Null_Subprogram
002c 4801 |H | Short_Literal 0x1
002d 035e | ^ | Declare_Type Array,Defined,Visible
002e 4801 |H | Short_Literal 0x1
002f 4810 |H | Short_Literal 0x10
0030 e001 | | Load 0x0,0x1
0031 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0032 02a0 | | Declare_Subprogram Null_Subprogram
0033 4801 |H | Short_Literal 0x1
0034 035e | ^ | Declare_Type Array,Defined,Visible
0035 4801 |H | Short_Literal 0x1
0036 4818 |H | Short_Literal 0x18
0037 e001 | | Load 0x0,0x1
0038 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0039 02a0 | | Declare_Subprogram Null_Subprogram
003a 4801 |H | Short_Literal 0x1
003b 035e | ^ | Declare_Type Array,Defined,Visible
003c 4801 |H | Short_Literal 0x1
003d 481c |H | Short_Literal 0x1c
003e e001 | | Load 0x0,0x1
003f 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0040 02a0 | | Declare_Subprogram Null_Subprogram
0041 4801 |H | Short_Literal 0x1
0042 035e | ^ | Declare_Type Array,Defined,Visible
0043 4801 |H | Short_Literal 0x1
0044 481e |H | Short_Literal 0x1e
0045 e001 | | Load 0x0,0x1
0046 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0047 02a0 | | Declare_Subprogram Null_Subprogram
0048 4801 |H | Short_Literal 0x1
0049 035e | ^ | Declare_Type Array,Defined,Visible
004a 4801 |H | Short_Literal 0x1
004b 4820 |H | Short_Literal 0x20
004c e001 | | Load 0x0,0x1
004d 1b15 | | Execute Package,Field_Read,Field_Number 0x15
004e 02a0 | | Declare_Subprogram Null_Subprogram
004f 4801 |H | Short_Literal 0x1
0050 035e | ^ | Declare_Type Array,Defined,Visible
0051 4800 |H | Short_Literal 0x0
0052 0093 032b | +| push_full_address INIT_0328
0054 02a0 | | Declare_Subprogram Null_Subprogram
0055 038f | | Declare_Type Package,Defined,Visible
0056 e001 | | Load 0x0,0x1
0057 00b6 | | Action Make_Scope
0058 4802 |H | Short_Literal 0x2
0059 00db | | Load_Top At_Offset_3
005a 020e | | Execute Module,Augment_Imports
005b 0386 | | Declare_Variable Package,Visible
005c 4800 |H | Short_Literal 0x0
005d 0093 0303 | | push_full_address INIT_0300
005f 02a0 | | Declare_Subprogram Null_Subprogram
0060 038f | | Declare_Type Package,Defined,Visible
0061 e001 | | Load 0x0,0x1
0062 00b6 | | Action Make_Scope
0063 4802 |H | Short_Literal 0x2
0064 00db | | Load_Top At_Offset_3
0065 020e | | Execute Module,Augment_Imports
0066 0386 | | Declare_Variable Package,Visible
0067 4800 |H | Short_Literal 0x0
0068 0093 02c3 | | push_full_address INIT_02c0
006a 02a0 | | Declare_Subprogram Null_Subprogram
006b 038f | | Declare_Type Package,Defined,Visible
006c e001 | | Load 0x0,0x1
006d 00b6 | | Action Make_Scope
006e 4802 |H | Short_Literal 0x2
006f 00db | | Load_Top At_Offset_3
0070 020e | | Execute Module,Augment_Imports
0071 0386 | | Declare_Variable Package,Visible
0072 e001 | | Load 0x0,0x1
0073 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0074 e001 | | Load 0x0,0x1
0075 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0076 02a0 | | Declare_Subprogram Null_Subprogram
0077 4802 |H | Short_Literal 0x2
0078 032e | . | Declare_Type Record,Defined,Visible
0079 4800 |H | Short_Literal 0x0
007a 480f |H | Short_Literal 0xf
007b 00da | | Load_Top At_Offset_2
007c 02a0 | | Declare_Subprogram Null_Subprogram
007d 4801 |H | Short_Literal 0x1
007e 035e | ^ | Declare_Type Array,Defined,Visible
007f 4800 |H | Short_Literal 0x0
0080 0093 0293 | | push_full_address INIT_0290
0082 02a0 | | Declare_Subprogram Null_Subprogram
0083 038f | | Declare_Type Package,Defined,Visible
0084 e001 | | Load 0x0,0x1
0085 00b6 | | Action Make_Scope
0086 4802 |H | Short_Literal 0x2
0087 00db | | Load_Top At_Offset_3
0088 020e | | Execute Module,Augment_Imports
0089 0386 | | Declare_Variable Package,Visible
008a 4800 |H | Short_Literal 0x0
008b 0093 0263 | c| push_full_address INIT_0260
008d 02a0 | | Declare_Subprogram Null_Subprogram
008e 038f | | Declare_Type Package,Defined,Visible
008f e001 | | Load 0x0,0x1
0090 00b6 | | Action Make_Scope
0091 4802 |H | Short_Literal 0x2
0092 00db | | Load_Top At_Offset_3
0093 020e | | Execute Module,Augment_Imports
0094 0386 | | Declare_Variable Package,Visible
0095 4800 |H | Short_Literal 0x0
0096 0093 023b | ;| push_full_address INIT_0238
0098 02a0 | | Declare_Subprogram Null_Subprogram
0099 038f | | Declare_Type Package,Defined,Visible
009a e001 | | Load 0x0,0x1
009b 00b6 | | Action Make_Scope
009c 4802 |H | Short_Literal 0x2
009d 00db | | Load_Top At_Offset_3
009e 020e | | Execute Module,Augment_Imports
009f 0386 | | Declare_Variable Package,Visible
00a0 4800 |H | Short_Literal 0x0
00a1 0093 021b | | push_full_address INIT_0218
00a3 02a0 | | Declare_Subprogram Null_Subprogram
00a4 038f | | Declare_Type Package,Defined,Visible
00a5 e001 | | Load 0x0,0x1
00a6 4801 |H | Short_Literal 0x1
00a7 00da | | Load_Top At_Offset_2
00a8 020e | | Execute Module,Augment_Imports
00a9 0386 | | Declare_Variable Package,Visible
00aa 4800 |H | Short_Literal 0x0
00ab 480f |H | Short_Literal 0xf
00ac e001 | | Load 0x0,0x1
00ad 1b15 | | Execute Package,Field_Read,Field_Number 0x15
00ae 02a0 | | Declare_Subprogram Null_Subprogram
00af 4801 |H | Short_Literal 0x1
00b0 035e | ^ | Declare_Type Array,Defined,Visible
00b1 4800 |H | Short_Literal 0x0
00b2 480f |H | Short_Literal 0xf
00b3 e001 | | Load 0x0,0x1
00b4 1b15 | | Execute Package,Field_Read,Field_Number 0x15
00b5 02a0 | | Declare_Subprogram Null_Subprogram
00b6 4801 |H | Short_Literal 0x1
00b7 035e | ^ | Declare_Type Array,Defined,Visible
00b8 4800 |H | Short_Literal 0x0
00b9 0093 01d3 | | push_full_address INIT_01d0
00bb 02a0 | | Declare_Subprogram Null_Subprogram
00bc 038f | | Declare_Type Package,Defined,Visible
00bd 00b6 | | Action Make_Scope
00be e001 | | Load 0x0,0x1
00bf 4802 |H | Short_Literal 0x2
00c0 00db | | Load_Top At_Offset_3
00c1 020e | | Execute Module,Augment_Imports
00c2 0386 | | Declare_Variable Package,Visible
00c3 4800 |H | Short_Literal 0x0
00c4 0093 01b3 | | push_full_address INIT_01b0
00c6 02a0 | | Declare_Subprogram Null_Subprogram
00c7 038f | | Declare_Type Package,Defined,Visible
00c8 e001 | | Load 0x0,0x1
00c9 4801 |H | Short_Literal 0x1
00ca 00da | | Load_Top At_Offset_2
00cb 020e | | Execute Module,Augment_Imports
00cc 0386 | | Declare_Variable Package,Visible
00cd 4800 |H | Short_Literal 0x0
00ce 0093 013b | ;| push_full_address INIT_0138
00d0 02a0 | | Declare_Subprogram Null_Subprogram
00d1 038f | | Declare_Type Package,Defined,Visible
00d2 e001 | | Load 0x0,0x1
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 e217 | | Load 0x1,0x17
00d8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00d9 e218 | | Load 0x1,0x18
00da 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00db e219 | | Load 0x1,0x19
00dc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00dd e21c | | Load 0x1,0x1c
00de 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00df e21d | | Load 0x1,0x1d
00e0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00e1 e21e | | Load 0x1,0x1e
00e2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00e3 e21f | | Load 0x1,0x1f
00e4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00e5 e222 | " | Load 0x1,0x22
00e6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00e7 e223 | # | Load 0x1,0x23
00e8 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00e9 e224 | $ | Load 0x1,0x24
00ea 1b15 | | Execute Package,Field_Read,Field_Number 0x15
00eb 02a0 | | Declare_Subprogram Null_Subprogram
00ec 480a |H | Short_Literal 0xa
00ed 032e | . | Declare_Type Record,Defined,Visible
00ee 029a 0113 | | Declare_Subprogram INIT_0110,For_Outer_Call,Visible,Unelaborated
00f0 00bf | | Action Accept_Activation
00f1 1d26 | & | Execute_Immediate Reference_Lex_1,0x26
00f2 00c7 | | Action Elaborate_Subprogram
00f3 e217 | | Load 0x1,0x17
00f4 020f | | Execute Module,Activate
00f5 e218 | | Load 0x1,0x18
00f6 020f | | Execute Module,Activate
00f7 e219 | | Load 0x1,0x19
00f8 020f | | Execute Module,Activate
00f9 e21c | | Load 0x1,0x1c
00fa 020f | | Execute Module,Activate
00fb e21d | | Load 0x1,0x1d
00fc 020f | | Execute Module,Activate
00fd e21e | | Load 0x1,0x1e
00fe 020f | | Execute Module,Activate
00ff e21f | | Load 0x1,0x1f
0100 020f | | Execute Module,Activate
0101 e222 | " | Load 0x1,0x22
0102 020f | | Execute Module,Activate
0103 00db | | Load_Top At_Offset_3
0104 020f | | Execute Module,Activate
0105 00da | | Load_Top At_Offset_2
0106 020f | | Execute Module,Activate
0107 BODY_0008:
0107 00bc | | Action Signal_Activated
0108 00bb | | Action Signal_Completion
0109 0000 0000 | | .BLANK 0000[0x7]
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0123 | # | .CONST 0x0123 ; Address of begin
0111 0004 | | .CONST 0x0004 ; Address of exception handler
0112 0005 | | .CONST 0x0005 ; Number of locals
0113 INIT_0110:
0113 e002 | | Load 0x0,0x2
0114 e003 | | Load 0x0,0x3
0115 e225 | % | Load 0x1,0x25
0116 e004 | | Load 0x0,0x4
0117 0387 | | Declare_Variable Package
0118 00d8 | | Load_Top At_Offset_0
0119 020f | | Execute Module,Activate
011a 0092 0386 | | Action Push_String_Extended,0x386 ; ".saved_state"
011c 00d9 | | Load_Top At_Offset_1
011d 1b10 | | Execute Package,Field_Read,Field_Number 0x10
011e 02c7 | | Declare_Variable Any
011f 00d8 | | Load_Top At_Offset_0
0120 1c00 | | Execute_Immediate Run_Utility,0x0
0121 e225 | % | Load 0x1,0x25
0122 0322 | " | Declare_Variable Record
0123 BODY_0110:
0123 00d9 | | Load_Top At_Offset_1
0124 00ea | | Load_Encached Null_String_Cache
0125 e5ff | | Load 0x2,-0x1
0126 e403 | | Load 0x2,0x3
0127 01cc | | Execute Vector,Catenate
0128 4800 |H | Short_Literal 0x0
0129 e402 | | Load 0x2,0x2
012a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
012b c404 | | Store 0x2,0x4
012c 00d8 | | Load_Top At_Offset_0
012d 00da | | Load_Top At_Offset_2
012e e402 | | Load 0x2,0x2
012f 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0130 00d1 | | Pop_Control Pop_Count_1
0131 00d9 | | Load_Top At_Offset_1
0132 e402 | | Load 0x2,0x2
0133 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0134 c404 | | Store 0x2,0x4
0135 00d8 | | Load_Top At_Offset_0
0136 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0137 0000 | | .XXX[0x1]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 0185 | | .CONST 0x0185 ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0015 | | .CONST 0x0015 ; Number of locals
013b INIT_0138:
013b 4800 |H | Short_Literal 0x0
013c 480a |H | Short_Literal 0xa
013d 029f 018b | | Declare_Subprogram INIT_0188,For_Call
013f 03fe | | Declare_Type Discrete,Defined,Visible
0140 4801 |H | Short_Literal 0x1
0141 480a |H | Short_Literal 0xa
0142 00da | | Load_Top At_Offset_2
0143 03f9 | | Declare_Type Discrete,Constrained,Visible
0144 4801 |H | Short_Literal 0x1
0145 481e |H | Short_Literal 0x1e
0146 00e9 | | Load_Encached String_Cache
0147 035c | \ | Declare_Type Array,Constrained,Visible
0148 e001 | | Load 0x0,0x1
0149 1b0f | | Execute Package,Field_Read,Field_Number 0xf
014a e001 | | Load 0x0,0x1
014b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
014c e001 | | Load 0x0,0x1
014d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
014e e001 | | Load 0x0,0x1
014f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0150 02a0 | | Declare_Subprogram Null_Subprogram
0151 4804 |H | Short_Literal 0x4
0152 032e | . | Declare_Type Record,Defined,Visible
0153 e001 | | Load 0x0,0x1
0154 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0155 e001 | | Load 0x0,0x1
0156 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0157 00db | | Load_Top At_Offset_3
0158 02a0 | | Declare_Subprogram Null_Subprogram
0159 4803 |H | Short_Literal 0x3
015a 032e | . | Declare_Type Record,Defined,Visible
015b e001 | | Load 0x0,0x1
015c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
015d 00d9 | | Load_Top At_Offset_1
015e e001 | | Load 0x0,0x1
015f 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0160 02a0 | | Declare_Subprogram Null_Subprogram
0161 4803 |H | Short_Literal 0x3
0162 032e | . | Declare_Type Record,Defined,Visible
0163 e001 | | Load 0x0,0x1
0164 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0165 e001 | | Load 0x0,0x1
0166 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0167 e001 | | Load 0x0,0x1
0168 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0169 e001 | | Load 0x0,0x1
016a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
016b e001 | | Load 0x0,0x1
016c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
016d e001 | | Load 0x0,0x1
016e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
016f e001 | | Load 0x0,0x1
0170 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0171 02a0 | | Declare_Subprogram Null_Subprogram
0172 4807 |H | Short_Literal 0x7
0173 032e | . | Declare_Type Record,Defined,Visible
0174 4801 |H | Short_Literal 0x1
0175 480a |H | Short_Literal 0xa
0176 e211 | | Load 0x1,0x11
0177 02a0 | | Declare_Subprogram Null_Subprogram
0178 4801 |H | Short_Literal 0x1
0179 035e | ^ | Declare_Type Array,Defined,Visible
017a e001 | | Load 0x0,0x1
017b 1b10 | | Execute Package,Field_Read,Field_Number 0x10
017c e210 | | Load 0x1,0x10
017d e212 | | Load 0x1,0x12
017e e213 | | Load 0x1,0x13
017f e211 | | Load 0x1,0x11
0180 e214 | | Load 0x1,0x14
0181 02a0 | | Declare_Subprogram Null_Subprogram
0182 4806 |H | Short_Literal 0x6
0183 032e | . | Declare_Type Record,Defined,Visible
0184 00bf | | Action Accept_Activation
0185 BODY_0138:
0185 00bc | | Action Signal_Activated
0186 00bb | | Action Signal_Completion
0187 0000 | | .XXX[0x1]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 018b | | .CONST 0x018b ; Address of begin
0189 0004 | | .CONST 0x0004 ; Address of exception handler
018a 0001 | | .CONST 0x0001 ; Number of locals
018b BODY_0188:
018b INIT_0188:
018b 4607 |F | Jump_Case 0x8
018c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
018d 7806 |x | Jump 0x194 ; case 0x1
018e 7809 |x | Jump 0x198 ; case 0x2
018f 780d |x | Jump 0x19d ; case 0x3
0190 7810 |x | Jump 0x1a1 ; case 0x4
0191 7811 |x | Jump 0x1a3 ; case 0x5
0192 7812 |x | Jump 0x1a5 ; case 0x6
0193 7815 |x | Jump 0x1a9 ; case 0x7
0194 00da | | Load_Top At_Offset_2
0195 0091 037b | {| Action Push_String_Extended_Indexed,0x37b ; "MICROCODE"
0197 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0198 00db | | Load_Top At_Offset_3
0199 00db | | Load_Top At_Offset_3
019a 00e0 | | Load_Encached Standard_Cache
019b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
019c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
019d 00da | | Load_Top At_Offset_2
019e 00e0 | | Load_Encached Standard_Cache
019f 181c | | Execute Package,Field_Execute,Field_Number 0x1c
01a0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
01a1 00db | | Load_Top At_Offset_3
01a2 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01a3 00db | | Load_Top At_Offset_3
01a4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01a5 e20d | | Load 0x1,0xd
01a6 00dc | | Load_Top At_Offset_4
01a7 0267 | g | Execute Discrete,Predecessor
01a8 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01a9 e20d | | Load 0x1,0xd
01aa 00dc | | Load_Top At_Offset_4
01ab 0268 | h | Execute Discrete,Successor
01ac 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01ad 0000 0000 | | .XXX[0x3]
01af 0000 | |
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01cb | | .CONST 0x01cb ; Address of begin
01b1 0004 | | .CONST 0x0004 ; Address of exception handler
01b2 000e | | .CONST 0x000e ; Number of locals
01b3 INIT_01b0:
01b3 e001 | | Load 0x0,0x1
01b4 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
01b5 0129 | ) | Execute Any,Make_Visible
01b6 00d8 | | Load_Top At_Offset_0
01b7 012c | , | Execute Any,Size
01b8 0f10 | | Execute_Immediate Equal,0x10
01b9 7001 |p | Jump_Nonzero 0x1bb
01ba 0887 | | Execute_Immediate Raise,0x87
01bb 4800 |H | Short_Literal 0x0
01bc 4bff |K | Short_Literal 0x3ff
01bd 00da | | Load_Top At_Offset_2
01be 02a0 | | Declare_Subprogram Null_Subprogram
01bf 4801 |H | Short_Literal 0x1
01c0 035e | ^ | Declare_Type Array,Defined,Visible
01c1 00d8 | | Load_Top At_Offset_0
01c2 012c | , | Execute Any,Size
01c3 e001 | | Load 0x0,0x1
01c4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01c5 012c | , | Execute Any,Size
01c6 0901 | | Execute_Immediate Binary_Scale,0x1
01c7 027f | | Execute Discrete,Equal
01c8 7001 |p | Jump_Nonzero 0x1ca
01c9 0887 | | Execute_Immediate Raise,0x87
01ca 00bf | | Action Accept_Activation
01cb BODY_01b0:
01cb 00bc | | Action Signal_Activated
01cc 00bb | | Action Signal_Completion
01cd 0000 0000 | | .XXX[0x3]
01cf 0000 | |
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 0215 | | .CONST 0x0215 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 000d | | .CONST 0x000d ; Number of locals
01d3 INIT_01d0:
01d3 e001 | | Load 0x0,0x1
01d4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01d5 e002 | | Load 0x0,0x2
01d6 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01d7 e002 | | Load 0x0,0x2
01d8 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01d9 e002 | | Load 0x0,0x2
01da 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01db e002 | | Load 0x0,0x2
01dc 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01dd e002 | | Load 0x0,0x2
01de 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01df e002 | | Load 0x0,0x2
01e0 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
01e1 e002 | | Load 0x0,0x2
01e2 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31
01e3 e002 | | Load 0x0,0x2
01e4 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
01e5 e002 | | Load 0x0,0x2
01e6 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
01e7 e002 | | Load 0x0,0x2
01e8 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
01e9 e002 | | Load 0x0,0x2
01ea 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
01eb e002 | | Load 0x0,0x2
01ec 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
01ed e002 | | Load 0x0,0x2
01ee 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
01ef e002 | | Load 0x0,0x2
01f0 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
01f1 e002 | | Load 0x0,0x2
01f2 1b2d | - | Execute Package,Field_Read,Field_Number 0x2d
01f3 e002 | | Load 0x0,0x2
01f4 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
01f5 e002 | | Load 0x0,0x2
01f6 1b15 | | Execute Package,Field_Read,Field_Number 0x15
01f7 e002 | | Load 0x0,0x2
01f8 1b14 | | Execute Package,Field_Read,Field_Number 0x14
01f9 e002 | | Load 0x0,0x2
01fa 1b14 | | Execute Package,Field_Read,Field_Number 0x14
01fb e002 | | Load 0x0,0x2
01fc 1b14 | | Execute Package,Field_Read,Field_Number 0x14
01fd e002 | | Load 0x0,0x2
01fe 1b14 | | Execute Package,Field_Read,Field_Number 0x14
01ff e002 | | Load 0x0,0x2
0200 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0201 e002 | | Load 0x0,0x2
0202 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0203 e001 | | Load 0x0,0x1
0204 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0205 e001 | | Load 0x0,0x1
0206 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0207 e001 | | Load 0x0,0x1
0208 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0209 02a0 | | Declare_Subprogram Null_Subprogram
020a 481b |H | Short_Literal 0x1b
020b 032e | . | Declare_Type Record,Defined,Visible
020c 00d8 | | Load_Top At_Offset_0
020d 012c | , | Execute Any,Size
020e e002 | | Load 0x0,0x2
020f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0210 012c | , | Execute Any,Size
0211 027f | | Execute Discrete,Equal
0212 7001 |p | Jump_Nonzero 0x214
0213 0887 | | Execute_Immediate Raise,0x87
0214 00bf | | Action Accept_Activation
0215 BODY_01d0:
0215 00bc | | Action Signal_Activated
0216 00bb | | Action Signal_Completion
0217 0000 | | .XXX[0x1]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 022b | + | .CONST 0x022b ; Address of begin
0219 0004 | | .CONST 0x0004 ; Address of exception handler
021a 000d | | .CONST 0x000d ; Number of locals
021b INIT_0218:
021b 4801 |H | Short_Literal 0x1
021c 6013 |` | Indirect_Literal Discrete,0x230,{0x00000000, 0x00000400}
021d e001 | | Load 0x0,0x1
021e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
021f 02a0 | | Declare_Subprogram Null_Subprogram
0220 4801 |H | Short_Literal 0x1
0221 035e | ^ | Declare_Type Array,Defined,Visible
0222 00d8 | | Load_Top At_Offset_0
0223 012c | , | Execute Any,Size
0224 e001 | | Load 0x0,0x1
0225 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0226 012c | , | Execute Any,Size
0227 027f | | Execute Discrete,Equal
0228 7001 |p | Jump_Nonzero 0x22a
0229 0887 | | Execute_Immediate Raise,0x87
022a 00bf | | Action Accept_Activation
022b BODY_0218:
022b 00bc | | Action Signal_Activated
022c 00bb | | Action Signal_Completion
022d 0000 0000 | | .XXX[0x3]
022f 0000 | |
0230 0000 0000 | | .LITERAL {0x00000000, 0x00000400}
0234 0000 0000 | | .BLANK 0000[0x4]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 0257 | W | .CONST 0x0257 ; Address of begin
0239 0004 | | .CONST 0x0004 ; Address of exception handler
023a 000d | | .CONST 0x000d ; Number of locals
023b INIT_0238:
023b e001 | | Load 0x0,0x1
023c 1b10 | | Execute Package,Field_Read,Field_Number 0x10
023d e002 | | Load 0x0,0x2
023e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
023f e001 | | Load 0x0,0x1
0240 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0241 e001 | | Load 0x0,0x1
0242 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0243 e001 | | Load 0x0,0x1
0244 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0245 e001 | | Load 0x0,0x1
0246 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0247 e002 | | Load 0x0,0x2
0248 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0249 e002 | | Load 0x0,0x2
024a 1b16 | | Execute Package,Field_Read,Field_Number 0x16
024b 02a0 | | Declare_Subprogram Null_Subprogram
024c 4808 |H | Short_Literal 0x8
024d 032e | . | Declare_Type Record,Defined,Visible
024e 00d8 | | Load_Top At_Offset_0
024f 012c | , | Execute Any,Size
0250 e001 | | Load 0x0,0x1
0251 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0252 012c | , | Execute Any,Size
0253 027f | | Execute Discrete,Equal
0254 7001 |p | Jump_Nonzero 0x256
0255 0887 | | Execute_Immediate Raise,0x87
0256 00bf | | Action Accept_Activation
0257 BODY_0238:
0257 00bc | | Action Signal_Activated
0258 00bb | | Action Signal_Completion
0259 0000 0000 | | .BLANK 0000[0x7]
0260 ; --------------------------------------------------------------------------------------
0260 ; SUBPROGRAM
0260 ; --------------------------------------------------------------------------------------
0260 0287 | | .CONST 0x0287 ; Address of begin
0261 0004 | | .CONST 0x0004 ; Address of exception handler
0262 000d | | .CONST 0x000d ; Number of locals
0263 INIT_0260:
0263 e001 | | Load 0x0,0x1
0264 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0265 e002 | | Load 0x0,0x2
0266 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0267 e001 | | Load 0x0,0x1
0268 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0269 e001 | | Load 0x0,0x1
026a 1b13 | | Execute Package,Field_Read,Field_Number 0x13
026b e001 | | Load 0x0,0x1
026c 1b11 | | Execute Package,Field_Read,Field_Number 0x11
026d e001 | | Load 0x0,0x1
026e 1b11 | | Execute Package,Field_Read,Field_Number 0x11
026f e001 | | Load 0x0,0x1
0270 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0271 e001 | | Load 0x0,0x1
0272 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0273 e001 | | Load 0x0,0x1
0274 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0275 e002 | | Load 0x0,0x2
0276 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0277 e002 | | Load 0x0,0x2
0278 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0279 e002 | | Load 0x0,0x2
027a 1b16 | | Execute Package,Field_Read,Field_Number 0x16
027b 02a0 | | Declare_Subprogram Null_Subprogram
027c 480c |H | Short_Literal 0xc
027d 032e | . | Declare_Type Record,Defined,Visible
027e 00d8 | | Load_Top At_Offset_0
027f 012c | , | Execute Any,Size
0280 e001 | | Load 0x0,0x1
0281 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0282 012c | , | Execute Any,Size
0283 027f | | Execute Discrete,Equal
0284 7001 |p | Jump_Nonzero 0x286
0285 0887 | | Execute_Immediate Raise,0x87
0286 00bf | | Action Accept_Activation
0287 BODY_0260:
0287 00bc | | Action Signal_Activated
0288 00bb | | Action Signal_Completion
0289 0000 0000 | | .BLANK 0000[0x7]
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 02b7 | | .CONST 0x02b7 ; Address of begin
0291 0004 | | .CONST 0x0004 ; Address of exception handler
0292 000d | | .CONST 0x000d ; Number of locals
0293 INIT_0290:
0293 e001 | | Load 0x0,0x1
0294 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0295 e002 | | Load 0x0,0x2
0296 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0297 e001 | | Load 0x0,0x1
0298 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0299 e001 | | Load 0x0,0x1
029a 1b13 | | Execute Package,Field_Read,Field_Number 0x13
029b e001 | | Load 0x0,0x1
029c 1b11 | | Execute Package,Field_Read,Field_Number 0x11
029d e001 | | Load 0x0,0x1
029e 1b11 | | Execute Package,Field_Read,Field_Number 0x11
029f e002 | | Load 0x0,0x2
02a0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02a1 e001 | | Load 0x0,0x1
02a2 1b11 | | Execute Package,Field_Read,Field_Number 0x11
02a3 e001 | | Load 0x0,0x1
02a4 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02a5 e002 | | Load 0x0,0x2
02a6 1b11 | | Execute Package,Field_Read,Field_Number 0x11
02a7 e002 | | Load 0x0,0x2
02a8 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
02a9 e002 | | Load 0x0,0x2
02aa 1b16 | | Execute Package,Field_Read,Field_Number 0x16
02ab 02a0 | | Declare_Subprogram Null_Subprogram
02ac 480c |H | Short_Literal 0xc
02ad 032e | . | Declare_Type Record,Defined,Visible
02ae 00d8 | | Load_Top At_Offset_0
02af 012c | , | Execute Any,Size
02b0 e001 | | Load 0x0,0x1
02b1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02b2 012c | , | Execute Any,Size
02b3 027f | | Execute Discrete,Equal
02b4 7001 |p | Jump_Nonzero 0x2b6
02b5 0887 | | Execute_Immediate Raise,0x87
02b6 00bf | | Action Accept_Activation
02b7 BODY_0290:
02b7 00bc | | Action Signal_Activated
02b8 00bb | | Action Signal_Completion
02b9 0000 0000 | | .BLANK 0000[0x7]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02f9 | | .CONST 0x02f9 ; Address of begin
02c1 0004 | | .CONST 0x0004 ; Address of exception handler
02c2 000d | | .CONST 0x000d ; Number of locals
02c3 INIT_02c0:
02c3 e001 | | Load 0x0,0x1
02c4 1b10 | | Execute Package,Field_Read,Field_Number 0x10
02c5 e002 | | Load 0x0,0x2
02c6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02c7 e001 | | Load 0x0,0x1
02c8 1b13 | | Execute Package,Field_Read,Field_Number 0x13
02c9 e001 | | Load 0x0,0x1
02ca 1b13 | | Execute Package,Field_Read,Field_Number 0x13
02cb e001 | | Load 0x0,0x1
02cc 1b11 | | Execute Package,Field_Read,Field_Number 0x11
02cd e001 | | Load 0x0,0x1
02ce 1b2c | , | Execute Package,Field_Read,Field_Number 0x2c
02cf e001 | | Load 0x0,0x1
02d0 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31
02d1 e001 | | Load 0x0,0x1
02d2 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
02d3 e001 | | Load 0x0,0x1
02d4 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02d5 e001 | | Load 0x0,0x1
02d6 1b15 | | Execute Package,Field_Read,Field_Number 0x15
02d7 e001 | | Load 0x0,0x1
02d8 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
02d9 e001 | | Load 0x0,0x1
02da 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
02db e001 | | Load 0x0,0x1
02dc 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
02dd e001 | | Load 0x0,0x1
02de 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
02df e001 | | Load 0x0,0x1
02e0 1b1a | | Execute Package,Field_Read,Field_Number 0x1a
02e1 e001 | | Load 0x0,0x1
02e2 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
02e3 e001 | | Load 0x0,0x1
02e4 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
02e5 e001 | | Load 0x0,0x1
02e6 1b2d | - | Execute Package,Field_Read,Field_Number 0x2d
02e7 e001 | | Load 0x0,0x1
02e8 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
02e9 e002 | | Load 0x0,0x2
02ea 1b12 | | Execute Package,Field_Read,Field_Number 0x12
02eb e002 | | Load 0x0,0x2
02ec 1b16 | | Execute Package,Field_Read,Field_Number 0x16
02ed 02a0 | | Declare_Subprogram Null_Subprogram
02ee 4815 |H | Short_Literal 0x15
02ef 032e | . | Declare_Type Record,Defined,Visible
02f0 00d8 | | Load_Top At_Offset_0
02f1 012c | , | Execute Any,Size
02f2 e001 | | Load 0x0,0x1
02f3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02f4 012c | , | Execute Any,Size
02f5 027f | | Execute Discrete,Equal
02f6 7001 |p | Jump_Nonzero 0x2f8
02f7 0887 | | Execute_Immediate Raise,0x87
02f8 00bf | | Action Accept_Activation
02f9 BODY_02c0:
02f9 00bc | | Action Signal_Activated
02fa 00bb | | Action Signal_Completion
02fb 0000 0000 | | .BLANK 0000[0x5]
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 0325 | % | .CONST 0x0325 ; Address of begin
0301 0004 | | .CONST 0x0004 ; Address of exception handler
0302 000d | | .CONST 0x000d ; Number of locals
0303 INIT_0300:
0303 e001 | | Load 0x0,0x1
0304 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0305 e002 | | Load 0x0,0x2
0306 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0307 e001 | | Load 0x0,0x1
0308 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0309 e001 | | Load 0x0,0x1
030a 1b13 | | Execute Package,Field_Read,Field_Number 0x13
030b e001 | | Load 0x0,0x1
030c 1b15 | | Execute Package,Field_Read,Field_Number 0x15
030d e001 | | Load 0x0,0x1
030e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
030f e001 | | Load 0x0,0x1
0310 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0311 e001 | | Load 0x0,0x1
0312 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0313 e001 | | Load 0x0,0x1
0314 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0315 e002 | | Load 0x0,0x2
0316 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0317 e002 | | Load 0x0,0x2
0318 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0319 02a0 | | Declare_Subprogram Null_Subprogram
031a 480b |H | Short_Literal 0xb
031b 032e | . | Declare_Type Record,Defined,Visible
031c 00d8 | | Load_Top At_Offset_0
031d 012c | , | Execute Any,Size
031e e001 | | Load 0x0,0x1
031f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0320 012c | , | Execute Any,Size
0321 027f | | Execute Discrete,Equal
0322 7001 |p | Jump_Nonzero 0x324
0323 0887 | | Execute_Immediate Raise,0x87
0324 00bf | | Action Accept_Activation
0325 BODY_0300:
0325 00bc | | Action Signal_Activated
0326 00bb | | Action Signal_Completion
0327 0000 | | .XXX[0x1]
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 0379 | y | .CONST 0x0379 ; Address of begin
0329 0004 | | .CONST 0x0004 ; Address of exception handler
032a 000f | | .CONST 0x000f ; Number of locals
032b INIT_0328:
032b 4800 |H | Short_Literal 0x0
032c 4803 |H | Short_Literal 0x3
032d 00e5 | | Load_Encached Long_Integer_Cache
032e 03f9 | | Declare_Type Discrete,Constrained,Visible
032f e001 | | Load 0x0,0x1
0330 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0331 e002 | | Load 0x0,0x2
0332 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0333 e001 | | Load 0x0,0x1
0334 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0335 e001 | | Load 0x0,0x1
0336 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0337 e001 | | Load 0x0,0x1
0338 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0339 e001 | | Load 0x0,0x1
033a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
033b e001 | | Load 0x0,0x1
033c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
033d e001 | | Load 0x0,0x1
033e 1b11 | | Execute Package,Field_Read,Field_Number 0x11
033f e001 | | Load 0x0,0x1
0340 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0341 e001 | | Load 0x0,0x1
0342 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0343 e001 | | Load 0x0,0x1
0344 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0345 e001 | | Load 0x0,0x1
0346 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0347 e001 | | Load 0x0,0x1
0348 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0349 e001 | | Load 0x0,0x1
034a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
034b e001 | | Load 0x0,0x1
034c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
034d e001 | | Load 0x0,0x1
034e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
034f e001 | | Load 0x0,0x1
0350 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0351 e001 | | Load 0x0,0x1
0352 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0353 e001 | | Load 0x0,0x1
0354 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0355 e001 | | Load 0x0,0x1
0356 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0357 e002 | | Load 0x0,0x2
0358 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0359 e001 | | Load 0x0,0x1
035a 1b11 | | Execute Package,Field_Read,Field_Number 0x11
035b e001 | | Load 0x0,0x1
035c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
035d e001 | | Load 0x0,0x1
035e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
035f e001 | | Load 0x0,0x1
0360 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0361 e001 | | Load 0x0,0x1
0362 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0363 e002 | | Load 0x0,0x2
0364 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0365 e002 | | Load 0x0,0x2
0366 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0367 02a0 | | Declare_Subprogram Null_Subprogram
0368 481c |H | Short_Literal 0x1c
0369 032e | . | Declare_Type Record,Defined,Visible
036a 00d8 | | Load_Top At_Offset_0
036b 012c | , | Execute Any,Size
036c e001 | | Load 0x0,0x1
036d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
036e 012c | , | Execute Any,Size
036f 027f | | Execute Discrete,Equal
0370 7001 |p | Jump_Nonzero 0x372
0371 0887 | | Execute_Immediate Raise,0x87
0372 4800 |H | Short_Literal 0x0
0373 4803 |H | Short_Literal 0x3
0374 00da | | Load_Top At_Offset_2
0375 02a0 | | Declare_Subprogram Null_Subprogram
0376 4801 |H | Short_Literal 0x1
0377 035e | ^ | Declare_Type Array,Defined,Visible
0378 00bf | | Action Accept_Activation
0379 BODY_0328:
0379 00bc | | Action Signal_Activated
037a 00bb | | Action Signal_Completion
037b ; --------------------------------------------------------------------------------------
037b ; STRING TABLE
037b ; --------------------------------------------------------------------------------------
037b 001a | | .STRTAB 0x001a->0x0388 ; "MICROCODE"
037c 0021 | ! | .STRTAB 0x0021->0x038c ; "ADA_BASE"
037d 0027 | ' | .STRTAB 0x0027->0x0390 ; "MACHINE_INTERFACE"
037e 0036 | 6 | .STRTAB 0x0036->0x0399 ; "KERNEL_DEBUGGER_IO"
037f 0046 | F | .STRTAB 0x0046->0x03a2 ; "KERNEL_DEBUGGER"
0380 0053 | S | .STRTAB 0x0053->0x03a9 ; "KERNEL"
0381 0057 | W | .STRTAB 0x0057->0x03ac ; "ENVIRONMENT_DEBUGGER"
0382 0069 | i | .STRTAB 0x0069->0x03b6 ; "ABSTRACT_TYPES"
0383 0075 | u | .STRTAB 0x0075->0x03bd ; "MISCELLANEOUS"
0384 0080 | | .STRTAB 0x0080->0x03c4 ; "OS_UTILITIES"
0385 008a | | .STRTAB 0x008a->0x03ca ; "ELABORATOR_DATABASE"
0386 009b | | .STRTAB 0x009b->0x03d3 ; ".saved_state"
0387 00a5 | | .STREND 0x00a5->0x03d9
0388 4d49 4352 |MICR| .STRTAB_STRINGS
03da 0000 0000 | | .BLANK 0000[0x6]
03e0 ; --------------------------------------------------------------------------------------
03e0 ; Debug Table
03e0 ; --------------------------------------------------------------------------------------
03e0 0004 000e | | .DEBUG4 0x0004,0x000e,0x1edb,0x0000,0x0001,0x0000
03e6 2e00 1038 |. 8| .XXX[0x1a]
03e8 3e00 103d |> =|
03ea 6600 103e |f >|
03ec 6e00 1042 |n B|
03ee 8e00 1043 | C|
03f0 9600 1047 | G|
03f2 b600 0000 | |
03f4 0000 104c | L|
03f6 de00 104e | N|
03f8 ee00 1050 | P|
03fa fe00 1053 | S|
03fc 0e00 1057 | W|
03fe 2e00 1058 |. X|