|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 3072 (0xc00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0500e0
└─⟦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 0420 | | .CONST 0x0420 ; 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 006c | l | .CONST 0x006c ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0024 | $ | .CONST 0x0024 ; Number of locals
000b INIT_0008:
000b 029a 0073 | s| Declare_Subprogram INIT_0070,For_Outer_Call,Visible,Unelaborated
000d 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated
000f 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated
0011 029a 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call,Visible,Unelaborated
0013 029a 0113 | | Declare_Subprogram INIT_0110,For_Outer_Call,Visible,Unelaborated
0015 029a 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call,Visible,Unelaborated
0017 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated
0019 029a 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call,Visible,Unelaborated
001b 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated
001d 029a 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call,Visible,Unelaborated
001f 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated
0021 029a 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call,Visible,Unelaborated
0023 029a 022b | +| Declare_Subprogram INIT_0228,For_Outer_Call,Visible,Unelaborated
0025 029a 025b | [| Declare_Subprogram INIT_0258,For_Outer_Call,Visible,Unelaborated
0027 029a 028b | | Declare_Subprogram INIT_0288,For_Outer_Call,Visible,Unelaborated
0029 029a 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call,Visible,Unelaborated
002b 029a 02d3 | | Declare_Subprogram INIT_02d0,For_Outer_Call,Visible,Unelaborated
002d 029a 02fb | | Declare_Subprogram INIT_02f8,For_Outer_Call,Visible,Unelaborated
002f 029a 032b | +| Declare_Subprogram INIT_0328,For_Outer_Call,Visible,Unelaborated
0031 029a 0343 | C| Declare_Subprogram INIT_0340,For_Outer_Call,Visible,Unelaborated
0033 029a 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call,Visible,Unelaborated
0035 029a 0393 | | Declare_Subprogram INIT_0390,For_Outer_Call,Visible,Unelaborated
0037 029a 03c3 | | Declare_Subprogram INIT_03c0,For_Outer_Call,Visible,Unelaborated
0039 029a 03f3 | | Declare_Subprogram INIT_03f0,For_Outer_Call,Visible,Unelaborated
003b 00bf | | Action Accept_Activation
003c 1d0d | | Execute_Immediate Reference_Lex_1,0xd
003d 00c7 | | Action Elaborate_Subprogram
003e 1d0e | | Execute_Immediate Reference_Lex_1,0xe
003f 00c7 | | Action Elaborate_Subprogram
0040 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0041 00c7 | | Action Elaborate_Subprogram
0042 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0043 00c7 | | Action Elaborate_Subprogram
0044 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0045 00c7 | | Action Elaborate_Subprogram
0046 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0047 00c7 | | Action Elaborate_Subprogram
0048 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0049 00c7 | | Action Elaborate_Subprogram
004a 1d14 | | Execute_Immediate Reference_Lex_1,0x14
004b 00c7 | | Action Elaborate_Subprogram
004c 1d15 | | Execute_Immediate Reference_Lex_1,0x15
004d 00c7 | | Action Elaborate_Subprogram
004e 1d16 | | Execute_Immediate Reference_Lex_1,0x16
004f 00c7 | | Action Elaborate_Subprogram
0050 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0051 00c7 | | Action Elaborate_Subprogram
0052 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0053 00c7 | | Action Elaborate_Subprogram
0054 1d19 | | Execute_Immediate Reference_Lex_1,0x19
0055 00c7 | | Action Elaborate_Subprogram
0056 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0057 00c7 | | Action Elaborate_Subprogram
0058 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0059 00c7 | | Action Elaborate_Subprogram
005a 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
005b 00c7 | | Action Elaborate_Subprogram
005c 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
005d 00c7 | | Action Elaborate_Subprogram
005e 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
005f 00c7 | | Action Elaborate_Subprogram
0060 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
0061 00c7 | | Action Elaborate_Subprogram
0062 1d20 | | Execute_Immediate Reference_Lex_1,0x20
0063 00c7 | | Action Elaborate_Subprogram
0064 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
0065 00c7 | | Action Elaborate_Subprogram
0066 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
0067 00c7 | | Action Elaborate_Subprogram
0068 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
0069 00c7 | | Action Elaborate_Subprogram
006a 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
006b 00c7 | | Action Elaborate_Subprogram
006c BODY_0008:
006c 00bc | | Action Signal_Activated
006d 00bb | | Action Signal_Completion
006e 0000 0000 | | .XXX[0x2]
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 0073 | s | .CONST 0x0073 ; Address of begin
0071 0004 | | .CONST 0x0004 ; Address of exception handler
0072 0001 | | .CONST 0x0001 ; Number of locals
0073 BODY_0070:
0073 INIT_0070:
0073 00da | | Load_Top At_Offset_2
0074 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0075 e5fe | | Load 0x2,-0x2
0076 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0077 027f | | Execute Discrete,Equal
0078 6817 |h | Jump_Zero 0x90
0079 00cf | | Action Mark_Auxiliary
007a 4801 |H | Short_Literal 0x1
007b e5ff | | Load 0x2,-0x1
007c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
007d 0264 | d | Execute Discrete,Below_Bound
007e 700e |p | Jump_Nonzero 0x8d
007f 00d8 | | Load_Top At_Offset_0
0080 e5ff | | Load 0x2,-0x1
0081 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0082 01d7 | | Execute Vector,Field_Read
0083 00d9 | | Load_Top At_Offset_1
0084 e5fe | | Load 0x2,-0x2
0085 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0086 01d7 | | Execute Vector,Field_Read
0087 027e | ~ | Execute Discrete,Not_Equal
0088 6802 |h | Jump_Zero 0x8b
0089 4800 |H | Short_Literal 0x0
008a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
008b 00c8 | | Action Pop_Auxiliary_Range
008c 37f2 |7 | Loop_Decreasing 0x7f
008d 00ce | | Action Pop_Auxiliary
008e 4801 |H | Short_Literal 0x1
008f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0090 4800 |H | Short_Literal 0x0
0091 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0092 0000 0000 | | .BLANK 0000[0x6]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 009b | | .CONST 0x009b ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0001 | | .CONST 0x0001 ; Number of locals
009b BODY_0098:
009b INIT_0098:
009b 00da | | Load_Top At_Offset_2
009c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
009d e5fe | | Load 0x2,-0x2
009e 0227 | ' | Execute Access,All_Reference
009f 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00a0 027f | | Execute Discrete,Equal
00a1 6818 |h | Jump_Zero 0xba
00a2 00cf | | Action Mark_Auxiliary
00a3 4801 |H | Short_Literal 0x1
00a4 e5ff | | Load 0x2,-0x1
00a5 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00a6 0264 | d | Execute Discrete,Below_Bound
00a7 700f |p | Jump_Nonzero 0xb7
00a8 00d8 | | Load_Top At_Offset_0
00a9 e5ff | | Load 0x2,-0x1
00aa 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
00ab 01d7 | | Execute Vector,Field_Read
00ac 00d9 | | Load_Top At_Offset_1
00ad e5fe | | Load 0x2,-0x2
00ae 0227 | ' | Execute Access,All_Reference
00af 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
00b0 01d7 | | Execute Vector,Field_Read
00b1 027e | ~ | Execute Discrete,Not_Equal
00b2 6802 |h | Jump_Zero 0xb5
00b3 4800 |H | Short_Literal 0x0
00b4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00b5 00c8 | | Action Pop_Auxiliary_Range
00b6 37f1 |7 | Loop_Decreasing 0xa8
00b7 00ce | | Action Pop_Auxiliary
00b8 4801 |H | Short_Literal 0x1
00b9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00ba 4800 |H | Short_Literal 0x0
00bb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00bc 0000 0000 | | .BLANK 0000[0x4]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c3 | | .CONST 0x00c3 ; Address of begin
00c1 0004 | | .CONST 0x0004 ; Address of exception handler
00c2 0001 | | .CONST 0x0001 ; Number of locals
00c3 BODY_00c0:
00c3 INIT_00c0:
00c3 00da | | Load_Top At_Offset_2
00c4 0227 | ' | Execute Access,All_Reference
00c5 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00c6 e5fe | | Load 0x2,-0x2
00c7 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00c8 027f | | Execute Discrete,Equal
00c9 6819 |h | Jump_Zero 0xe3
00ca 00cf | | Action Mark_Auxiliary
00cb 4801 |H | Short_Literal 0x1
00cc e5ff | | Load 0x2,-0x1
00cd 0227 | ' | Execute Access,All_Reference
00ce 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00cf 0264 | d | Execute Discrete,Below_Bound
00d0 700f |p | Jump_Nonzero 0xe0
00d1 00d8 | | Load_Top At_Offset_0
00d2 e5ff | | Load 0x2,-0x1
00d3 0227 | ' | Execute Access,All_Reference
00d4 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
00d5 01d7 | | Execute Vector,Field_Read
00d6 00d9 | | Load_Top At_Offset_1
00d7 e5fe | | Load 0x2,-0x2
00d8 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
00d9 01d7 | | Execute Vector,Field_Read
00da 027e | ~ | Execute Discrete,Not_Equal
00db 6802 |h | Jump_Zero 0xde
00dc 4800 |H | Short_Literal 0x0
00dd 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00de 00c8 | | Action Pop_Auxiliary_Range
00df 37f1 |7 | Loop_Decreasing 0xd1
00e0 00ce | | Action Pop_Auxiliary
00e1 4801 |H | Short_Literal 0x1
00e2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00e3 4800 |H | Short_Literal 0x0
00e4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00e5 0000 0000 | | .XXX[0x3]
00e7 0000 | |
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00eb | | .CONST 0x00eb ; Address of begin
00e9 0004 | | .CONST 0x0004 ; Address of exception handler
00ea 0001 | | .CONST 0x0001 ; Number of locals
00eb BODY_00e8:
00eb INIT_00e8:
00eb 00da | | Load_Top At_Offset_2
00ec 0227 | ' | Execute Access,All_Reference
00ed 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00ee e5fe | | Load 0x2,-0x2
00ef 0227 | ' | Execute Access,All_Reference
00f0 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00f1 027f | | Execute Discrete,Equal
00f2 681a |h | Jump_Zero 0x10d
00f3 00cf | | Action Mark_Auxiliary
00f4 4801 |H | Short_Literal 0x1
00f5 e5ff | | Load 0x2,-0x1
00f6 0227 | ' | Execute Access,All_Reference
00f7 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
00f8 0264 | d | Execute Discrete,Below_Bound
00f9 7010 |p | Jump_Nonzero 0x10a
00fa 00d8 | | Load_Top At_Offset_0
00fb e5ff | | Load 0x2,-0x1
00fc 0227 | ' | Execute Access,All_Reference
00fd 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
00fe 01d7 | | Execute Vector,Field_Read
00ff 00d9 | | Load_Top At_Offset_1
0100 e5fe | | Load 0x2,-0x2
0101 0227 | ' | Execute Access,All_Reference
0102 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0103 01d7 | | Execute Vector,Field_Read
0104 027e | ~ | Execute Discrete,Not_Equal
0105 6802 |h | Jump_Zero 0x108
0106 4800 |H | Short_Literal 0x0
0107 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0108 00c8 | | Action Pop_Auxiliary_Range
0109 37f0 |7 | Loop_Decreasing 0xfa
010a 00ce | | Action Pop_Auxiliary
010b 4801 |H | Short_Literal 0x1
010c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
010d 4800 |H | Short_Literal 0x0
010e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
010f 0000 | | .XXX[0x1]
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0113 | | .CONST 0x0113 ; Address of begin
0111 0004 | | .CONST 0x0004 ; Address of exception handler
0112 0001 | | .CONST 0x0001 ; Number of locals
0113 BODY_0110:
0113 INIT_0110:
0113 00da | | Load_Top At_Offset_2
0114 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0115 e5fe | | Load 0x2,-0x2
0116 01db | | Execute Vector,Length
0117 027f | | Execute Discrete,Equal
0118 681b |h | Jump_Zero 0x134
0119 00cf | | Action Mark_Auxiliary
011a 4800 |H | Short_Literal 0x0
011b e5ff | | Load 0x2,-0x1
011c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
011d 0aff | | Execute_Immediate Plus,-0x1
011e 0264 | d | Execute Discrete,Below_Bound
011f 7011 |p | Jump_Nonzero 0x131
0120 00d8 | | Load_Top At_Offset_0
0121 0a01 | | Execute_Immediate Plus,0x1
0122 e5ff | | Load 0x2,-0x1
0123 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0124 01d7 | | Execute Vector,Field_Read
0125 00d9 | | Load_Top At_Offset_1
0126 e5fe | | Load 0x2,-0x2
0127 01dd | | Execute Vector,First
0128 0273 | s | Execute Discrete,Plus
0129 e5fe | | Load 0x2,-0x2
012a 01d7 | | Execute Vector,Field_Read
012b 027e | ~ | Execute Discrete,Not_Equal
012c 6802 |h | Jump_Zero 0x12f
012d 4800 |H | Short_Literal 0x0
012e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
012f 00c8 | | Action Pop_Auxiliary_Range
0130 37ef |7 | Loop_Decreasing 0x120
0131 00ce | | Action Pop_Auxiliary
0132 4801 |H | Short_Literal 0x1
0133 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0134 4800 |H | Short_Literal 0x0
0135 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0136 0000 0000 | | .XXX[0x2]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013b | ; | .CONST 0x013b ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0001 | | .CONST 0x0001 ; Number of locals
013b BODY_0138:
013b INIT_0138:
013b 00da | | Load_Top At_Offset_2
013c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
013d 0e01 | | Execute_Immediate Not_Equal,0x1
013e 7007 |p | Jump_Nonzero 0x146
013f 4801 |H | Short_Literal 0x1
0140 00db | | Load_Top At_Offset_3
0141 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0142 01d7 | | Execute Vector,Field_Read
0143 e5fe | | Load 0x2,-0x2
0144 027e | ~ | Execute Discrete,Not_Equal
0145 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0146 4801 |H | Short_Literal 0x1
0147 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014b | K | .CONST 0x014b ; Address of begin
0149 0004 | | .CONST 0x0004 ; Address of exception handler
014a 0001 | | .CONST 0x0001 ; Number of locals
014b BODY_0148:
014b INIT_0148:
014b 00da | | Load_Top At_Offset_2
014c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
014d e5fd | | Load 0x2,-0x3
014e 027f | | Execute Discrete,Equal
014f 6813 |h | Jump_Zero 0x163
0150 00cf | | Action Mark_Auxiliary
0151 4801 |H | Short_Literal 0x1
0152 e5fd | | Load 0x2,-0x3
0153 0264 | d | Execute Discrete,Below_Bound
0154 700b |p | Jump_Nonzero 0x160
0155 00d8 | | Load_Top At_Offset_0
0156 e5ff | | Load 0x2,-0x1
0157 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0158 01d7 | | Execute Vector,Field_Read
0159 e5fe | | Load 0x2,-0x2
015a 027e | ~ | Execute Discrete,Not_Equal
015b 6802 |h | Jump_Zero 0x15e
015c 4800 |H | Short_Literal 0x0
015d 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
015e 00c8 | | Action Pop_Auxiliary_Range
015f 37f5 |7 | Loop_Decreasing 0x155
0160 00ce | | Action Pop_Auxiliary
0161 4801 |H | Short_Literal 0x1
0162 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0163 4800 |H | Short_Literal 0x0
0164 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0165 0000 0000 | | .XXX[0x3]
0167 0000 | |
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016b | k | .CONST 0x016b ; Address of begin
0169 0004 | | .CONST 0x0004 ; Address of exception handler
016a 0001 | | .CONST 0x0001 ; Number of locals
016b BODY_0168:
016b INIT_0168:
016b 00da | | Load_Top At_Offset_2
016c 0227 | ' | Execute Access,All_Reference
016d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
016e e5fe | | Load 0x2,-0x2
016f 01db | | Execute Vector,Length
0170 027f | | Execute Discrete,Equal
0171 681d |h | Jump_Zero 0x18f
0172 00cf | | Action Mark_Auxiliary
0173 4800 |H | Short_Literal 0x0
0174 e5ff | | Load 0x2,-0x1
0175 0227 | ' | Execute Access,All_Reference
0176 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0177 0aff | | Execute_Immediate Plus,-0x1
0178 0264 | d | Execute Discrete,Below_Bound
0179 7012 |p | Jump_Nonzero 0x18c
017a 00d8 | | Load_Top At_Offset_0
017b 0a01 | | Execute_Immediate Plus,0x1
017c e5ff | | Load 0x2,-0x1
017d 0227 | ' | Execute Access,All_Reference
017e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
017f 01d7 | | Execute Vector,Field_Read
0180 00d9 | | Load_Top At_Offset_1
0181 e5fe | | Load 0x2,-0x2
0182 01dd | | Execute Vector,First
0183 0273 | s | Execute Discrete,Plus
0184 e5fe | | Load 0x2,-0x2
0185 01d7 | | Execute Vector,Field_Read
0186 027e | ~ | Execute Discrete,Not_Equal
0187 6802 |h | Jump_Zero 0x18a
0188 4800 |H | Short_Literal 0x0
0189 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
018a 00c8 | | Action Pop_Auxiliary_Range
018b 37ee |7 | Loop_Decreasing 0x17a
018c 00ce | | Action Pop_Auxiliary
018d 4801 |H | Short_Literal 0x1
018e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
018f 4800 |H | Short_Literal 0x0
0190 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0191 0000 0000 | | .BLANK 0000[0x7]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019b | | .CONST 0x019b ; Address of begin
0199 0004 | | .CONST 0x0004 ; Address of exception handler
019a 0001 | | .CONST 0x0001 ; Number of locals
019b BODY_0198:
019b INIT_0198:
019b 00da | | Load_Top At_Offset_2
019c 0227 | ' | Execute Access,All_Reference
019d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
019e 0e01 | | Execute_Immediate Not_Equal,0x1
019f 7008 |p | Jump_Nonzero 0x1a8
01a0 4801 |H | Short_Literal 0x1
01a1 00db | | Load_Top At_Offset_3
01a2 0227 | ' | Execute Access,All_Reference
01a3 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01a4 01d7 | | Execute Vector,Field_Read
01a5 e5fe | | Load 0x2,-0x2
01a6 027e | ~ | Execute Discrete,Not_Equal
01a7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01a8 4801 |H | Short_Literal 0x1
01a9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01aa 0000 0000 | | .BLANK 0000[0x6]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b3 | | .CONST 0x01b3 ; Address of begin
01b1 0004 | | .CONST 0x0004 ; Address of exception handler
01b2 0001 | | .CONST 0x0001 ; Number of locals
01b3 BODY_01b0:
01b3 INIT_01b0:
01b3 00da | | Load_Top At_Offset_2
01b4 0227 | ' | Execute Access,All_Reference
01b5 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01b6 e5fd | | Load 0x2,-0x3
01b7 027f | | Execute Discrete,Equal
01b8 6814 |h | Jump_Zero 0x1cd
01b9 00cf | | Action Mark_Auxiliary
01ba 4801 |H | Short_Literal 0x1
01bb e5fd | | Load 0x2,-0x3
01bc 0264 | d | Execute Discrete,Below_Bound
01bd 700c |p | Jump_Nonzero 0x1ca
01be 00d8 | | Load_Top At_Offset_0
01bf e5ff | | Load 0x2,-0x1
01c0 0227 | ' | Execute Access,All_Reference
01c1 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01c2 01d7 | | Execute Vector,Field_Read
01c3 e5fe | | Load 0x2,-0x2
01c4 027e | ~ | Execute Discrete,Not_Equal
01c5 6802 |h | Jump_Zero 0x1c8
01c6 4800 |H | Short_Literal 0x0
01c7 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
01c8 00c8 | | Action Pop_Auxiliary_Range
01c9 37f4 |7 | Loop_Decreasing 0x1be
01ca 00ce | | Action Pop_Auxiliary
01cb 4801 |H | Short_Literal 0x1
01cc 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
01cd 4800 |H | Short_Literal 0x0
01ce 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
01cf 0000 | | .XXX[0x1]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3 | | .CONST 0x01d3 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0001 | | .CONST 0x0001 ; Number of locals
01d3 BODY_01d0:
01d3 INIT_01d0:
01d3 00da | | Load_Top At_Offset_2
01d4 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01d5 e5fe | | Load 0x2,-0x2
01d6 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01d7 027f | | Execute Discrete,Equal
01d8 681d |h | Jump_Zero 0x1f6
01d9 00cf | | Action Mark_Auxiliary
01da 4801 |H | Short_Literal 0x1
01db e5ff | | Load 0x2,-0x1
01dc 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01dd 0264 | d | Execute Discrete,Below_Bound
01de 7014 |p | Jump_Nonzero 0x1f3
01df 00d8 | | Load_Top At_Offset_0
01e0 e5ff | | Load 0x2,-0x1
01e1 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01e2 01d7 | | Execute Vector,Field_Read
01e3 e001 | | Load 0x0,0x1
01e4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01e5 01d7 | | Execute Vector,Field_Read
01e6 00d9 | | Load_Top At_Offset_1
01e7 e5fe | | Load 0x2,-0x2
01e8 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
01e9 01d7 | | Execute Vector,Field_Read
01ea e001 | | Load 0x0,0x1
01eb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01ec 01d7 | | Execute Vector,Field_Read
01ed 027e | ~ | Execute Discrete,Not_Equal
01ee 6802 |h | Jump_Zero 0x1f1
01ef 4800 |H | Short_Literal 0x0
01f0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01f1 00c8 | | Action Pop_Auxiliary_Range
01f2 37ec |7 | Loop_Decreasing 0x1df
01f3 00ce | | Action Pop_Auxiliary
01f4 4801 |H | Short_Literal 0x1
01f5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01f6 4800 |H | Short_Literal 0x0
01f7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01fb | | .CONST 0x01fb ; Address of begin
01f9 0004 | | .CONST 0x0004 ; Address of exception handler
01fa 0001 | | .CONST 0x0001 ; Number of locals
01fb BODY_01f8:
01fb INIT_01f8:
01fb 00da | | Load_Top At_Offset_2
01fc 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
01fd e5fe | | Load 0x2,-0x2
01fe 0227 | ' | Execute Access,All_Reference
01ff 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0200 027f | | Execute Discrete,Equal
0201 681e |h | Jump_Zero 0x220
0202 00cf | | Action Mark_Auxiliary
0203 4801 |H | Short_Literal 0x1
0204 e5ff | | Load 0x2,-0x1
0205 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0206 0264 | d | Execute Discrete,Below_Bound
0207 7015 |p | Jump_Nonzero 0x21d
0208 00d8 | | Load_Top At_Offset_0
0209 e5ff | | Load 0x2,-0x1
020a 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
020b 01d7 | | Execute Vector,Field_Read
020c e001 | | Load 0x0,0x1
020d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
020e 01d7 | | Execute Vector,Field_Read
020f 00d9 | | Load_Top At_Offset_1
0210 e5fe | | Load 0x2,-0x2
0211 0227 | ' | Execute Access,All_Reference
0212 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0213 01d7 | | Execute Vector,Field_Read
0214 e001 | | Load 0x0,0x1
0215 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0216 01d7 | | Execute Vector,Field_Read
0217 027e | ~ | Execute Discrete,Not_Equal
0218 6802 |h | Jump_Zero 0x21b
0219 4800 |H | Short_Literal 0x0
021a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
021b 00c8 | | Action Pop_Auxiliary_Range
021c 37eb |7 | Loop_Decreasing 0x208
021d 00ce | | Action Pop_Auxiliary
021e 4801 |H | Short_Literal 0x1
021f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0220 4800 |H | Short_Literal 0x0
0221 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0222 0000 0000 | | .BLANK 0000[0x6]
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 022b | + | .CONST 0x022b ; Address of begin
0229 0004 | | .CONST 0x0004 ; Address of exception handler
022a 0001 | | .CONST 0x0001 ; Number of locals
022b BODY_0228:
022b INIT_0228:
022b 00da | | Load_Top At_Offset_2
022c 0227 | ' | Execute Access,All_Reference
022d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
022e e5fe | | Load 0x2,-0x2
022f 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0230 027f | | Execute Discrete,Equal
0231 681f |h | Jump_Zero 0x251
0232 00cf | | Action Mark_Auxiliary
0233 4801 |H | Short_Literal 0x1
0234 e5ff | | Load 0x2,-0x1
0235 0227 | ' | Execute Access,All_Reference
0236 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0237 0264 | d | Execute Discrete,Below_Bound
0238 7015 |p | Jump_Nonzero 0x24e
0239 00d8 | | Load_Top At_Offset_0
023a e5ff | | Load 0x2,-0x1
023b 0227 | ' | Execute Access,All_Reference
023c 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
023d 01d7 | | Execute Vector,Field_Read
023e e001 | | Load 0x0,0x1
023f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0240 01d7 | | Execute Vector,Field_Read
0241 00d9 | | Load_Top At_Offset_1
0242 e5fe | | Load 0x2,-0x2
0243 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0244 01d7 | | Execute Vector,Field_Read
0245 e001 | | Load 0x0,0x1
0246 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0247 01d7 | | Execute Vector,Field_Read
0248 027e | ~ | Execute Discrete,Not_Equal
0249 6802 |h | Jump_Zero 0x24c
024a 4800 |H | Short_Literal 0x0
024b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
024c 00c8 | | Action Pop_Auxiliary_Range
024d 37eb |7 | Loop_Decreasing 0x239
024e 00ce | | Action Pop_Auxiliary
024f 4801 |H | Short_Literal 0x1
0250 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0251 4800 |H | Short_Literal 0x0
0252 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0253 0000 0000 | | .BLANK 0000[0x5]
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 025b | [ | .CONST 0x025b ; Address of begin
0259 0004 | | .CONST 0x0004 ; Address of exception handler
025a 0001 | | .CONST 0x0001 ; Number of locals
025b BODY_0258:
025b INIT_0258:
025b 00da | | Load_Top At_Offset_2
025c 0227 | ' | Execute Access,All_Reference
025d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
025e e5fe | | Load 0x2,-0x2
025f 0227 | ' | Execute Access,All_Reference
0260 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0261 027f | | Execute Discrete,Equal
0262 6820 |h | Jump_Zero 0x283
0263 00cf | | Action Mark_Auxiliary
0264 4801 |H | Short_Literal 0x1
0265 e5ff | | Load 0x2,-0x1
0266 0227 | ' | Execute Access,All_Reference
0267 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0268 0264 | d | Execute Discrete,Below_Bound
0269 7016 |p | Jump_Nonzero 0x280
026a 00d8 | | Load_Top At_Offset_0
026b e5ff | | Load 0x2,-0x1
026c 0227 | ' | Execute Access,All_Reference
026d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
026e 01d7 | | Execute Vector,Field_Read
026f e001 | | Load 0x0,0x1
0270 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0271 01d7 | | Execute Vector,Field_Read
0272 00d9 | | Load_Top At_Offset_1
0273 e5fe | | Load 0x2,-0x2
0274 0227 | ' | Execute Access,All_Reference
0275 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0276 01d7 | | Execute Vector,Field_Read
0277 e001 | | Load 0x0,0x1
0278 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0279 01d7 | | Execute Vector,Field_Read
027a 027e | ~ | Execute Discrete,Not_Equal
027b 6802 |h | Jump_Zero 0x27e
027c 4800 |H | Short_Literal 0x0
027d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
027e 00c8 | | Action Pop_Auxiliary_Range
027f 37ea |7 | Loop_Decreasing 0x26a
0280 00ce | | Action Pop_Auxiliary
0281 4801 |H | Short_Literal 0x1
0282 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0283 4800 |H | Short_Literal 0x0
0284 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0285 0000 0000 | | .XXX[0x3]
0287 0000 | |
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 028b | | .CONST 0x028b ; Address of begin
0289 0004 | | .CONST 0x0004 ; Address of exception handler
028a 0001 | | .CONST 0x0001 ; Number of locals
028b BODY_0288:
028b INIT_0288:
028b 00da | | Load_Top At_Offset_2
028c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
028d e5fe | | Load 0x2,-0x2
028e 01db | | Execute Vector,Length
028f 027f | | Execute Discrete,Equal
0290 6821 |h! | Jump_Zero 0x2b2
0291 00cf | | Action Mark_Auxiliary
0292 4800 |H | Short_Literal 0x0
0293 e5ff | | Load 0x2,-0x1
0294 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0295 0aff | | Execute_Immediate Plus,-0x1
0296 0264 | d | Execute Discrete,Below_Bound
0297 7017 |p | Jump_Nonzero 0x2af
0298 00d8 | | Load_Top At_Offset_0
0299 0a01 | | Execute_Immediate Plus,0x1
029a e5ff | | Load 0x2,-0x1
029b 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
029c 01d7 | | Execute Vector,Field_Read
029d e001 | | Load 0x0,0x1
029e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
029f 01d7 | | Execute Vector,Field_Read
02a0 00d9 | | Load_Top At_Offset_1
02a1 e5fe | | Load 0x2,-0x2
02a2 01dd | | Execute Vector,First
02a3 0273 | s | Execute Discrete,Plus
02a4 e5fe | | Load 0x2,-0x2
02a5 01d7 | | Execute Vector,Field_Read
02a6 e001 | | Load 0x0,0x1
02a7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02a8 01d7 | | Execute Vector,Field_Read
02a9 027e | ~ | Execute Discrete,Not_Equal
02aa 6802 |h | Jump_Zero 0x2ad
02ab 4800 |H | Short_Literal 0x0
02ac 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02ad 00c8 | | Action Pop_Auxiliary_Range
02ae 37e9 |7 | Loop_Decreasing 0x298
02af 00ce | | Action Pop_Auxiliary
02b0 4801 |H | Short_Literal 0x1
02b1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02b2 4800 |H | Short_Literal 0x0
02b3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02b4 0000 0000 | | .BLANK 0000[0x4]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bb | | .CONST 0x02bb ; Address of begin
02b9 0004 | | .CONST 0x0004 ; Address of exception handler
02ba 0001 | | .CONST 0x0001 ; Number of locals
02bb BODY_02b8:
02bb INIT_02b8:
02bb 00da | | Load_Top At_Offset_2
02bc 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02bd 0e01 | | Execute_Immediate Not_Equal,0x1
02be 700d |p | Jump_Nonzero 0x2cc
02bf 4801 |H | Short_Literal 0x1
02c0 00db | | Load_Top At_Offset_3
02c1 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02c2 01d7 | | Execute Vector,Field_Read
02c3 e001 | | Load 0x0,0x1
02c4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02c5 01d7 | | Execute Vector,Field_Read
02c6 e5fe | | Load 0x2,-0x2
02c7 e001 | | Load 0x0,0x1
02c8 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02c9 01d7 | | Execute Vector,Field_Read
02ca 027e | ~ | Execute Discrete,Not_Equal
02cb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02cc 4801 |H | Short_Literal 0x1
02cd 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02ce 0000 0000 | | .XXX[0x2]
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02d8 | | .CONST 0x02d8 ; Address of begin
02d1 0004 | | .CONST 0x0004 ; Address of exception handler
02d2 0002 | | .CONST 0x0002 ; Number of locals
02d3 INIT_02d0:
02d3 00db | | Load_Top At_Offset_3
02d4 e001 | | Load 0x0,0x1
02d5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02d6 01d7 | | Execute Vector,Field_Read
02d7 0007 | | Action Break_Optional
02d8 BODY_02d0:
02d8 00db | | Load_Top At_Offset_3
02d9 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02da e5fd | | Load 0x2,-0x3
02db 027f | | Execute Discrete,Equal
02dc 6816 |h | Jump_Zero 0x2f3
02dd 00cf | | Action Mark_Auxiliary
02de 4801 |H | Short_Literal 0x1
02df e5fd | | Load 0x2,-0x3
02e0 0264 | d | Execute Discrete,Below_Bound
02e1 700e |p | Jump_Nonzero 0x2f0
02e2 00d8 | | Load_Top At_Offset_0
02e3 e5ff | | Load 0x2,-0x1
02e4 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
02e5 01d7 | | Execute Vector,Field_Read
02e6 e001 | | Load 0x0,0x1
02e7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02e8 01d7 | | Execute Vector,Field_Read
02e9 e402 | | Load 0x2,0x2
02ea 027e | ~ | Execute Discrete,Not_Equal
02eb 6802 |h | Jump_Zero 0x2ee
02ec 4800 |H | Short_Literal 0x0
02ed 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
02ee 00c8 | | Action Pop_Auxiliary_Range
02ef 37f2 |7 | Loop_Decreasing 0x2e2
02f0 00ce | | Action Pop_Auxiliary
02f1 4801 |H | Short_Literal 0x1
02f2 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
02f3 4800 |H | Short_Literal 0x0
02f4 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
02f5 0000 0000 | | .XXX[0x3]
02f7 0000 | |
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 02fb | | .CONST 0x02fb ; Address of begin
02f9 0004 | | .CONST 0x0004 ; Address of exception handler
02fa 0001 | | .CONST 0x0001 ; Number of locals
02fb BODY_02f8:
02fb INIT_02f8:
02fb 00da | | Load_Top At_Offset_2
02fc 0227 | ' | Execute Access,All_Reference
02fd 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
02fe e5fe | | Load 0x2,-0x2
02ff 01db | | Execute Vector,Length
0300 027f | | Execute Discrete,Equal
0301 6823 |h# | Jump_Zero 0x325
0302 00cf | | Action Mark_Auxiliary
0303 4800 |H | Short_Literal 0x0
0304 e5ff | | Load 0x2,-0x1
0305 0227 | ' | Execute Access,All_Reference
0306 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0307 0aff | | Execute_Immediate Plus,-0x1
0308 0264 | d | Execute Discrete,Below_Bound
0309 7018 |p | Jump_Nonzero 0x322
030a 00d8 | | Load_Top At_Offset_0
030b 0a01 | | Execute_Immediate Plus,0x1
030c e5ff | | Load 0x2,-0x1
030d 0227 | ' | Execute Access,All_Reference
030e 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
030f 01d7 | | Execute Vector,Field_Read
0310 e001 | | Load 0x0,0x1
0311 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0312 01d7 | | Execute Vector,Field_Read
0313 00d9 | | Load_Top At_Offset_1
0314 e5fe | | Load 0x2,-0x2
0315 01dd | | Execute Vector,First
0316 0273 | s | Execute Discrete,Plus
0317 e5fe | | Load 0x2,-0x2
0318 01d7 | | Execute Vector,Field_Read
0319 e001 | | Load 0x0,0x1
031a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
031b 01d7 | | Execute Vector,Field_Read
031c 027e | ~ | Execute Discrete,Not_Equal
031d 6802 |h | Jump_Zero 0x320
031e 4800 |H | Short_Literal 0x0
031f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0320 00c8 | | Action Pop_Auxiliary_Range
0321 37e8 |7 | Loop_Decreasing 0x30a
0322 00ce | | Action Pop_Auxiliary
0323 4801 |H | Short_Literal 0x1
0324 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0325 4800 |H | Short_Literal 0x0
0326 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0327 0000 | | .XXX[0x1]
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 032b | + | .CONST 0x032b ; Address of begin
0329 0004 | | .CONST 0x0004 ; Address of exception handler
032a 0001 | | .CONST 0x0001 ; Number of locals
032b BODY_0328:
032b INIT_0328:
032b 00da | | Load_Top At_Offset_2
032c 0227 | ' | Execute Access,All_Reference
032d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
032e 0e01 | | Execute_Immediate Not_Equal,0x1
032f 700e |p | Jump_Nonzero 0x33e
0330 4801 |H | Short_Literal 0x1
0331 00db | | Load_Top At_Offset_3
0332 0227 | ' | Execute Access,All_Reference
0333 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0334 01d7 | | Execute Vector,Field_Read
0335 e001 | | Load 0x0,0x1
0336 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0337 01d7 | | Execute Vector,Field_Read
0338 e5fe | | Load 0x2,-0x2
0339 e001 | | Load 0x0,0x1
033a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
033b 01d7 | | Execute Vector,Field_Read
033c 027e | ~ | Execute Discrete,Not_Equal
033d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
033e 4801 |H | Short_Literal 0x1
033f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0340 ; --------------------------------------------------------------------------------------
0340 ; SUBPROGRAM
0340 ; --------------------------------------------------------------------------------------
0340 0348 | H | .CONST 0x0348 ; Address of begin
0341 0004 | | .CONST 0x0004 ; Address of exception handler
0342 0002 | | .CONST 0x0002 ; Number of locals
0343 INIT_0340:
0343 00db | | Load_Top At_Offset_3
0344 e001 | | Load 0x0,0x1
0345 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0346 01d7 | | Execute Vector,Field_Read
0347 0007 | | Action Break_Optional
0348 BODY_0340:
0348 00db | | Load_Top At_Offset_3
0349 0227 | ' | Execute Access,All_Reference
034a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
034b e5fd | | Load 0x2,-0x3
034c 027f | | Execute Discrete,Equal
034d 6817 |h | Jump_Zero 0x365
034e 00cf | | Action Mark_Auxiliary
034f 4801 |H | Short_Literal 0x1
0350 e5fd | | Load 0x2,-0x3
0351 0264 | d | Execute Discrete,Below_Bound
0352 700f |p | Jump_Nonzero 0x362
0353 00d8 | | Load_Top At_Offset_0
0354 e5ff | | Load 0x2,-0x1
0355 0227 | ' | Execute Access,All_Reference
0356 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0357 01d7 | | Execute Vector,Field_Read
0358 e001 | | Load 0x0,0x1
0359 1b0e | | Execute Package,Field_Read,Field_Number 0xe
035a 01d7 | | Execute Vector,Field_Read
035b e402 | | Load 0x2,0x2
035c 027e | ~ | Execute Discrete,Not_Equal
035d 6802 |h | Jump_Zero 0x360
035e 4800 |H | Short_Literal 0x0
035f 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0360 00c8 | | Action Pop_Auxiliary_Range
0361 37f1 |7 | Loop_Decreasing 0x353
0362 00ce | | Action Pop_Auxiliary
0363 4801 |H | Short_Literal 0x1
0364 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0365 4800 |H | Short_Literal 0x0
0366 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0367 0000 | | .XXX[0x1]
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 036b | k | .CONST 0x036b ; Address of begin
0369 0004 | | .CONST 0x0004 ; Address of exception handler
036a 0001 | | .CONST 0x0001 ; Number of locals
036b BODY_0368:
036b INIT_0368:
036b 00da | | Load_Top At_Offset_2
036c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
036d e5fe | | Load 0x2,-0x2
036e 01db | | Execute Vector,Length
036f 027b | { | Execute Discrete,Greater_Equal
0370 681d |h | Jump_Zero 0x38e
0371 00cf | | Action Mark_Auxiliary
0372 4800 |H | Short_Literal 0x0
0373 e5fe | | Load 0x2,-0x2
0374 01db | | Execute Vector,Length
0375 0aff | | Execute_Immediate Plus,-0x1
0376 00e2 | | Load_Encached Integer_Cache
0377 025d | ] | Execute Discrete,Bounds_Check
0378 0264 | d | Execute Discrete,Below_Bound
0379 7011 |p | Jump_Nonzero 0x38b
037a 00d8 | | Load_Top At_Offset_0
037b 0a01 | | Execute_Immediate Plus,0x1
037c e5ff | | Load 0x2,-0x1
037d 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
037e 01d7 | | Execute Vector,Field_Read
037f 00d9 | | Load_Top At_Offset_1
0380 e5fe | | Load 0x2,-0x2
0381 01dd | | Execute Vector,First
0382 0273 | s | Execute Discrete,Plus
0383 e5fe | | Load 0x2,-0x2
0384 01d7 | | Execute Vector,Field_Read
0385 027e | ~ | Execute Discrete,Not_Equal
0386 6802 |h | Jump_Zero 0x389
0387 4800 |H | Short_Literal 0x0
0388 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0389 00c8 | | Action Pop_Auxiliary_Range
038a 37ef |7 | Loop_Decreasing 0x37a
038b 00ce | | Action Pop_Auxiliary
038c 4801 |H | Short_Literal 0x1
038d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
038e 4800 |H | Short_Literal 0x0
038f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; --------------------------------------------------------------------------------------
0390 0393 | | .CONST 0x0393 ; Address of begin
0391 0004 | | .CONST 0x0004 ; Address of exception handler
0392 0001 | | .CONST 0x0001 ; Number of locals
0393 BODY_0390:
0393 INIT_0390:
0393 00da | | Load_Top At_Offset_2
0394 0227 | ' | Execute Access,All_Reference
0395 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0396 e5fe | | Load 0x2,-0x2
0397 01db | | Execute Vector,Length
0398 027b | { | Execute Discrete,Greater_Equal
0399 681e |h | Jump_Zero 0x3b8
039a 00cf | | Action Mark_Auxiliary
039b 4800 |H | Short_Literal 0x0
039c e5fe | | Load 0x2,-0x2
039d 01db | | Execute Vector,Length
039e 0aff | | Execute_Immediate Plus,-0x1
039f 00e2 | | Load_Encached Integer_Cache
03a0 025d | ] | Execute Discrete,Bounds_Check
03a1 0264 | d | Execute Discrete,Below_Bound
03a2 7012 |p | Jump_Nonzero 0x3b5
03a3 00d8 | | Load_Top At_Offset_0
03a4 0a01 | | Execute_Immediate Plus,0x1
03a5 e5ff | | Load 0x2,-0x1
03a6 0227 | ' | Execute Access,All_Reference
03a7 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
03a8 01d7 | | Execute Vector,Field_Read
03a9 00d9 | | Load_Top At_Offset_1
03aa e5fe | | Load 0x2,-0x2
03ab 01dd | | Execute Vector,First
03ac 0273 | s | Execute Discrete,Plus
03ad e5fe | | Load 0x2,-0x2
03ae 01d7 | | Execute Vector,Field_Read
03af 027e | ~ | Execute Discrete,Not_Equal
03b0 6802 |h | Jump_Zero 0x3b3
03b1 4800 |H | Short_Literal 0x0
03b2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03b3 00c8 | | Action Pop_Auxiliary_Range
03b4 37ee |7 | Loop_Decreasing 0x3a3
03b5 00ce | | Action Pop_Auxiliary
03b6 4801 |H | Short_Literal 0x1
03b7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03b8 4800 |H | Short_Literal 0x0
03b9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03ba 0000 0000 | | .BLANK 0000[0x6]
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03c3 | | .CONST 0x03c3 ; Address of begin
03c1 0004 | | .CONST 0x0004 ; Address of exception handler
03c2 0001 | | .CONST 0x0001 ; Number of locals
03c3 BODY_03c0:
03c3 INIT_03c0:
03c3 00da | | Load_Top At_Offset_2
03c4 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03c5 e5fe | | Load 0x2,-0x2
03c6 01db | | Execute Vector,Length
03c7 027b | { | Execute Discrete,Greater_Equal
03c8 6823 |h# | Jump_Zero 0x3ec
03c9 00cf | | Action Mark_Auxiliary
03ca 4800 |H | Short_Literal 0x0
03cb e5fe | | Load 0x2,-0x2
03cc 01db | | Execute Vector,Length
03cd 0aff | | Execute_Immediate Plus,-0x1
03ce 00e2 | | Load_Encached Integer_Cache
03cf 025d | ] | Execute Discrete,Bounds_Check
03d0 0264 | d | Execute Discrete,Below_Bound
03d1 7017 |p | Jump_Nonzero 0x3e9
03d2 00d8 | | Load_Top At_Offset_0
03d3 0a01 | | Execute_Immediate Plus,0x1
03d4 e5ff | | Load 0x2,-0x1
03d5 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
03d6 01d7 | | Execute Vector,Field_Read
03d7 e001 | | Load 0x0,0x1
03d8 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03d9 01d7 | | Execute Vector,Field_Read
03da 00d9 | | Load_Top At_Offset_1
03db e5fe | | Load 0x2,-0x2
03dc 01dd | | Execute Vector,First
03dd 0273 | s | Execute Discrete,Plus
03de e5fe | | Load 0x2,-0x2
03df 01d7 | | Execute Vector,Field_Read
03e0 e001 | | Load 0x0,0x1
03e1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03e2 01d7 | | Execute Vector,Field_Read
03e3 027e | ~ | Execute Discrete,Not_Equal
03e4 6802 |h | Jump_Zero 0x3e7
03e5 4800 |H | Short_Literal 0x0
03e6 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03e7 00c8 | | Action Pop_Auxiliary_Range
03e8 37e9 |7 | Loop_Decreasing 0x3d2
03e9 00ce | | Action Pop_Auxiliary
03ea 4801 |H | Short_Literal 0x1
03eb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03ec 4800 |H | Short_Literal 0x0
03ed 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03ee 0000 0000 | | .XXX[0x2]
03f0 ; --------------------------------------------------------------------------------------
03f0 ; SUBPROGRAM
03f0 ; --------------------------------------------------------------------------------------
03f0 03f3 | | .CONST 0x03f3 ; Address of begin
03f1 0004 | | .CONST 0x0004 ; Address of exception handler
03f2 0001 | | .CONST 0x0001 ; Number of locals
03f3 BODY_03f0:
03f3 INIT_03f0:
03f3 00da | | Load_Top At_Offset_2
03f4 0227 | ' | Execute Access,All_Reference
03f5 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
03f6 e5fe | | Load 0x2,-0x2
03f7 01db | | Execute Vector,Length
03f8 027b | { | Execute Discrete,Greater_Equal
03f9 6824 |h$ | Jump_Zero 0x41e
03fa 00cf | | Action Mark_Auxiliary
03fb 4800 |H | Short_Literal 0x0
03fc e5fe | | Load 0x2,-0x2
03fd 01db | | Execute Vector,Length
03fe 0aff | | Execute_Immediate Plus,-0x1
03ff 00e2 | | Load_Encached Integer_Cache
0400 025d | ] | Execute Discrete,Bounds_Check
0401 0264 | d | Execute Discrete,Below_Bound
0402 7018 |p | Jump_Nonzero 0x41b
0403 00d8 | | Load_Top At_Offset_0
0404 0a01 | | Execute_Immediate Plus,0x1
0405 e5ff | | Load 0x2,-0x1
0406 0227 | ' | Execute Access,All_Reference
0407 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3
0408 01d7 | | Execute Vector,Field_Read
0409 e001 | | Load 0x0,0x1
040a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
040b 01d7 | | Execute Vector,Field_Read
040c 00d9 | | Load_Top At_Offset_1
040d e5fe | | Load 0x2,-0x2
040e 01dd | | Execute Vector,First
040f 0273 | s | Execute Discrete,Plus
0410 e5fe | | Load 0x2,-0x2
0411 01d7 | | Execute Vector,Field_Read
0412 e001 | | Load 0x0,0x1
0413 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0414 01d7 | | Execute Vector,Field_Read
0415 027e | ~ | Execute Discrete,Not_Equal
0416 6802 |h | Jump_Zero 0x419
0417 4800 |H | Short_Literal 0x0
0418 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0419 00c8 | | Action Pop_Auxiliary_Range
041a 37e8 |7 | Loop_Decreasing 0x403
041b 00ce | | Action Pop_Auxiliary
041c 4801 |H | Short_Literal 0x1
041d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
041e 4800 |H | Short_Literal 0x0
041f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0420 ; --------------------------------------------------------------------------------------
0420 ; Debug Table
0420 ; --------------------------------------------------------------------------------------
0420 0004 0004 | | .DEBUG4 0x0004,0x0004,0xa8fb,0x0000,0x0001,0x0000
0426 0000 0000 | | .XXX[0x3]
0428 0000 | |
0429 0020 0000 | | .XXX[0x2d]
042b 0000 0de2 | |
042d 2dc0 0000 |- |
042f 0010 0000 | |
0431 0010 0000 | |
0433 0020 0000 | |
0435 0020 007b | {|
0437 ab00 0000 | |
0439 0040 3789 | @7 |
043b 06c0 0000 | |
043d 0000 0000 | |
043f 0180 0000 | |
0441 0003 93b5 | |
0443 2160 002e |!` .|
0445 3a23 93b4 |:# |
0447 2160 0080 |!` |
0449 b8e0 1bc4 | |
044b 9b80 1bc4 | |
044d b3a1 c9da | |
044f 90b0 0017 | |
0451 18b1 c9da | |
0453 10b0 003c | <|
0455 14b0 | |
0456 0000 0000 | | .BLANK 0000[0x4]
045a e4ed 4858 | HX| .XXX[0x8]
045c 000b 9600 | |
045e e4ed 0858 | X|
0460 0020 35b0 | 5 |
0462 0000 0000 | | .BLANK 0000[0x4]
0466 7276 a42c |rv ,| .XXX[0x4]
0468 0005 c744 | D|
046a 0000 0000 | | .BLANK 0000[0x4]
046e 7276 a42c |rv ,| .XXX[0x4]
0470 0005 cb00 | |
0472 0000 0000 | | .BLANK 0000[0x4]
0476 7276 a42c |rv ,| .XXX[0x4]
0478 0005 cb00 | |
047a 0000 0000 | | .BLANK 0000[0x6]
0480 0378 e0f0 | x | .XXX[0x14]
0482 0000 0000 | |
0484 037d 5478 | }Tx|
0486 0000 0000 | |
0488 037d 91cc | } |
048a 0000 0000 | |
048c 037d 952c | } ,|
048e 0000 0000 | |
0490 037d 93d0 | } |
0492 4444 4400 |DDD |
0494 0000 0000 | | .BLANK 0000[0x5]
0499 0008 0000 | | .XXX[0x11]
049b 0000 0000 | |
049d 0400 0003 | |
049f 8248 0000 | H |
04a1 0008 001e | |
04a3 e640 0000 | @ |
04a5 0010 0000 | |
04a7 0000 0df6 | |
04a9 dca0 | |
04aa 0000 0000 | | .BLANK 0000[0xa]
04b4 0de2 b5c0 | | .XXX[0x2]
04b6 0000 0000 | | .BLANK 0000[0x14a]