|
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: 4096 (0x1000)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_11cacfe
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦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 0790 | | .CONST 0x0790 ; 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 8004 | | .CONST 0x8004 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 01eb | | .CONST 0x01eb ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 00e4 | | .CONST 0x00e4 ; Number of locals
000b INIT_0008:
000b 00e2 | | Load_Encached Integer_Cache
000c 0129 | ) | Execute Any,Make_Visible
000d 00c4 | | Action Make_Default
000e 00c4 | | Action Make_Default
000f 00c4 | | Action Make_Default
0010 00c4 | | Action Make_Default
0011 00c4 | | Action Make_Default
0012 e001 | | Load 0x0,0x1
0013 0129 | ) | Execute Any,Make_Visible
0014 c210 | | Store 0x1,0x10
0015 e002 | | Load 0x0,0x2
0016 0129 | ) | Execute Any,Make_Visible
0017 c211 | | Store 0x1,0x11
0018 029a 01f3 | | Declare_Subprogram INIT_01f0,For_Outer_Call,Visible,Unelaborated
001a c212 | | Store 0x1,0x12
001b 029a 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call,Visible,Unelaborated
001d c20f | | Store 0x1,0xf
001e 00bf | | Action Accept_Activation
001f 4803 |H | Short_Literal 0x3
0020 4803 |H | Short_Literal 0x3
0021 e003 | | Load 0x0,0x3
0022 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0023 03f8 | | Declare_Type Discrete,Constrained
0024 e004 | | Load 0x0,0x4
0025 1b3e | > | Execute Package,Field_Read,Field_Number 0x3e
0026 e004 | | Load 0x0,0x4
0027 1b4a | J | Execute Package,Field_Read,Field_Number 0x4a
0028 4800 |H | Short_Literal 0x0
0029 e004 | | Load 0x0,0x4
002a 1b4a | J | Execute Package,Field_Read,Field_Number 0x4a
002b 1c08 | | Execute_Immediate Run_Utility,0x8
002c 00d8 | | Load_Top At_Offset_0
002d 1c01 | | Execute_Immediate Run_Utility,0x1
002e 029b 022b | +| Declare_Subprogram INIT_0228,For_Outer_Call,Unelaborated
0030 e005 | | Load 0x0,0x5
0031 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0032 02a0 | | Declare_Subprogram Null_Subprogram
0033 4800 |H | Short_Literal 0x0
0034 032d | - | Declare_Type Record,Defined
0035 e006 | | Load 0x0,0x6
0036 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0037 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0038 e215 | | Load 0x1,0x15
0039 029f 0243 | C| Declare_Subprogram INIT_0240,For_Call
003b 4802 |H | Short_Literal 0x2
003c 032d | - | Declare_Type Record,Defined
003d 4900 |I | Short_Literal 0x100
003e e007 | | Load 0x0,0x7
003f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0040 1c07 | | Execute_Immediate Run_Utility,0x7
0041 e215 | | Load 0x1,0x15
0042 029f 025b | [| Declare_Subprogram INIT_0258,For_Call
0044 4802 |H | Short_Literal 0x2
0045 032d | - | Declare_Type Record,Defined
0046 4900 |I | Short_Literal 0x100
0047 e007 | | Load 0x0,0x7
0048 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0049 1c07 | | Execute_Immediate Run_Utility,0x7
004a 4900 |I | Short_Literal 0x100
004b e007 | | Load 0x0,0x7
004c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
004d 1c07 | | Execute_Immediate Run_Utility,0x7
004e 029f 027b | {| Declare_Subprogram INIT_0278,For_Call
0050 4802 |H | Short_Literal 0x2
0051 032d | - | Declare_Type Record,Defined
0052 4900 |I | Short_Literal 0x100
0053 e007 | | Load 0x0,0x7
0054 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0055 1c07 | | Execute_Immediate Run_Utility,0x7
0056 4900 |I | Short_Literal 0x100
0057 e007 | | Load 0x0,0x7
0058 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0059 1c07 | | Execute_Immediate Run_Utility,0x7
005a 00e1 | | Load_Encached Boolean_Cache
005b e215 | | Load 0x1,0x15
005c 029f 02a3 | | Declare_Subprogram INIT_02a0,For_Call
005e 4804 |H | Short_Literal 0x4
005f 032d | - | Declare_Type Record,Defined
0060 4900 |I | Short_Literal 0x100
0061 e007 | | Load 0x0,0x7
0062 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0063 1c07 | | Execute_Immediate Run_Utility,0x7
0064 e006 | | Load 0x0,0x6
0065 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0066 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0067 029f 02cb | | Declare_Subprogram INIT_02c8,For_Call
0069 4802 |H | Short_Literal 0x2
006a 032d | - | Declare_Type Record,Defined
006b 4900 |I | Short_Literal 0x100
006c e007 | | Load 0x0,0x7
006d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
006e 1c07 | | Execute_Immediate Run_Utility,0x7
006f e006 | | Load 0x0,0x6
0070 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0071 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0072 029f 02eb | | Declare_Subprogram INIT_02e8,For_Call
0074 4802 |H | Short_Literal 0x2
0075 032d | - | Declare_Type Record,Defined
0076 00e1 | | Load_Encached Boolean_Cache
0077 e004 | | Load 0x0,0x4
0078 1b4a | J | Execute Package,Field_Read,Field_Number 0x4a
0079 029f 030b | | Declare_Subprogram INIT_0308,For_Call
007b 4802 |H | Short_Literal 0x2
007c 032d | - | Declare_Type Record,Defined
007d 00e3 | | Load_Encached Natural_Cache
007e 4900 |I | Short_Literal 0x100
007f e007 | | Load 0x0,0x7
0080 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0081 1c07 | | Execute_Immediate Run_Utility,0x7
0082 e215 | | Load 0x1,0x15
0083 029f 0323 | #| Declare_Subprogram INIT_0320,For_Call
0085 4800 |H | Short_Literal 0x0
0086 4802 |H | Short_Literal 0x2
0087 4800 |H | Short_Literal 0x0
0088 4800 |H | Short_Literal 0x0
0089 4801 |H | Short_Literal 0x1
008a 031d | | Declare_Type Variant_Record,Defined
008b e008 | | Load 0x0,0x8
008c e009 | | Load 0x0,0x9
008d e004 | | Load 0x0,0x4
008e 1b3e | > | Execute Package,Field_Read,Field_Number 0x3e
008f e00a | | Load 0x0,0xa
0090 1b2e | . | Execute Package,Field_Read,Field_Number 0x2e
0091 0387 | | Declare_Variable Package
0092 00d8 | | Load_Top At_Offset_0
0093 020f | | Execute Module,Activate
0094 e00a | | Load 0x0,0xa
0095 1927 | ' | Execute Package,Field_Reference,Field_Number 0x27
0096 0007 | | Action Break_Optional
0097 e00a | | Load 0x0,0xa
0098 1926 | & | Execute Package,Field_Reference,Field_Number 0x26
0099 0007 | | Action Break_Optional
009a 00da | | Load_Top At_Offset_2
009b 1910 | | Execute Package,Field_Reference,Field_Number 0x10
009c 0007 | | Action Break_Optional
009d e00a | | Load 0x0,0xa
009e 1920 | | Execute Package,Field_Reference,Field_Number 0x20
009f 0007 | | Action Break_Optional
00a0 029d 0353 | S| Declare_Subprogram INIT_0350,For_Outer_Call
00a2 029d 035b | [| Declare_Subprogram INIT_0358,For_Outer_Call
00a4 029d 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call
00a6 029d 037b | {| Declare_Subprogram INIT_0378,For_Outer_Call
00a8 029d 038b | | Declare_Subprogram INIT_0388,For_Outer_Call
00aa 029d 039b | | Declare_Subprogram INIT_0398,For_Outer_Call
00ac 029d 03a3 | | Declare_Subprogram INIT_03a0,For_Outer_Call
00ae 029d 03ab | | Declare_Subprogram INIT_03a8,For_Outer_Call
00b0 029d 03bb | | Declare_Subprogram INIT_03b8,For_Outer_Call
00b2 029d 03cb | | Declare_Subprogram INIT_03c8,For_Outer_Call
00b4 029d 03db | | Declare_Subprogram INIT_03d8,For_Outer_Call
00b6 029d 03f3 | | Declare_Subprogram INIT_03f0,For_Outer_Call
00b8 029d 040b | | Declare_Subprogram INIT_0408,For_Outer_Call
00ba 029d 0423 | #| Declare_Subprogram INIT_0420,For_Outer_Call
00bc 029d 043b | ;| Declare_Subprogram INIT_0438,For_Outer_Call
00be 029d 044b | K| Declare_Subprogram INIT_0448,For_Outer_Call
00c0 029d 045b | [| Declare_Subprogram INIT_0458,For_Outer_Call
00c2 e005 | | Load 0x0,0x5
00c3 1913 | | Execute Package,Field_Reference,Field_Number 0x13
00c4 00c6 | | Action Check_Subprogram_Elaborated
00c5 e007 | | Load 0x0,0x7
00c6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00c7 e21a | | Load 0x1,0x1a
00c8 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
00c9 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f
00ca 1d37 | 7 | Execute_Immediate Reference_Lex_1,0x37
00cb e00b | | Load 0x0,0xb
00cc e00c | | Load 0x0,0xc
00cd 4800 |H | Short_Literal 0x0
00ce 0007 | | Action Break_Optional
00cf 029d 047b | {| Declare_Subprogram INIT_0478,For_Outer_Call
00d1 e005 | | Load 0x0,0x5
00d2 1913 | | Execute Package,Field_Reference,Field_Number 0x13
00d3 00c6 | | Action Check_Subprogram_Elaborated
00d4 e21e | | Load 0x1,0x1e
00d5 e215 | | Load 0x1,0x15
00d6 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33
00d7 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e
00d8 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40
00d9 e00d | | Load 0x0,0xd
00da e00e | | Load 0x0,0xe
00db 4800 |H | Short_Literal 0x0
00dc 0007 | | Action Break_Optional
00dd 029d 049b | | Declare_Subprogram INIT_0498,For_Outer_Call
00df e005 | | Load 0x0,0x5
00e0 1913 | | Execute Package,Field_Reference,Field_Number 0x13
00e1 00c6 | | Action Check_Subprogram_Elaborated
00e2 e007 | | Load 0x0,0x7
00e3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00e4 e21b | | Load 0x1,0x1b
00e5 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
00e6 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30
00e7 1d49 | I | Execute_Immediate Reference_Lex_1,0x49
00e8 e00f | | Load 0x0,0xf
00e9 e010 | | Load 0x0,0x10
00ea 4800 |H | Short_Literal 0x0
00eb 0007 | | Action Break_Optional
00ec 029d 04c3 | | Declare_Subprogram INIT_04c0,For_Outer_Call
00ee e005 | | Load 0x0,0x5
00ef 1913 | | Execute Package,Field_Reference,Field_Number 0x13
00f0 00c6 | | Action Check_Subprogram_Elaborated
00f1 e007 | | Load 0x0,0x7
00f2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00f3 e215 | | Load 0x1,0x15
00f4 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
00f5 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e
00f6 1d52 | R | Execute_Immediate Reference_Lex_1,0x52
00f7 e011 | | Load 0x0,0x11
00f8 e012 | | Load 0x0,0x12
00f9 4800 |H | Short_Literal 0x0
00fa 0007 | | Action Break_Optional
00fb 029d 04db | | Declare_Subprogram INIT_04d8,For_Outer_Call
00fd e005 | | Load 0x0,0x5
00fe 1913 | | Execute Package,Field_Reference,Field_Number 0x13
00ff 00c6 | | Action Check_Subprogram_Elaborated
0100 e007 | | Load 0x0,0x7
0101 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0102 e220 | | Load 0x1,0x20
0103 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
0104 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35
0105 1d5b | [ | Execute_Immediate Reference_Lex_1,0x5b
0106 e013 | | Load 0x0,0x13
0107 e014 | | Load 0x0,0x14
0108 4800 |H | Short_Literal 0x0
0109 0007 | | Action Break_Optional
010a 029d 04fb | | Declare_Subprogram INIT_04f8,For_Outer_Call
010c e005 | | Load 0x0,0x5
010d 1913 | | Execute Package,Field_Reference,Field_Number 0x13
010e 00c6 | | Action Check_Subprogram_Elaborated
010f e007 | | Load 0x0,0x7
0110 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0111 e21a | | Load 0x1,0x1a
0112 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
0113 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f
0114 1d64 | d | Execute_Immediate Reference_Lex_1,0x64
0115 e015 | | Load 0x0,0x15
0116 e016 | | Load 0x0,0x16
0117 4800 |H | Short_Literal 0x0
0118 0007 | | Action Break_Optional
0119 029d 051b | | Declare_Subprogram INIT_0518,For_Outer_Call
011b e005 | | Load 0x0,0x5
011c 1913 | | Execute Package,Field_Reference,Field_Number 0x13
011d 00c6 | | Action Check_Subprogram_Elaborated
011e e007 | | Load 0x0,0x7
011f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0120 e21a | | Load 0x1,0x1a
0121 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
0122 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f
0123 1d6d | m | Execute_Immediate Reference_Lex_1,0x6d
0124 e017 | | Load 0x0,0x17
0125 e018 | | Load 0x0,0x18
0126 4800 |H | Short_Literal 0x0
0127 0007 | | Action Break_Optional
0128 029d 053b | ;| Declare_Subprogram INIT_0538,For_Outer_Call
012a e005 | | Load 0x0,0x5
012b 1913 | | Execute Package,Field_Reference,Field_Number 0x13
012c 00c6 | | Action Check_Subprogram_Elaborated
012d e007 | | Load 0x0,0x7
012e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
012f e221 | ! | Load 0x1,0x21
0130 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
0131 1d36 | 6 | Execute_Immediate Reference_Lex_1,0x36
0132 1d76 | v | Execute_Immediate Reference_Lex_1,0x76
0133 e019 | | Load 0x0,0x19
0134 e01a | | Load 0x0,0x1a
0135 4800 |H | Short_Literal 0x0
0136 0007 | | Action Break_Optional
0137 029d 0553 | S| Declare_Subprogram INIT_0550,For_Outer_Call
0139 e005 | | Load 0x0,0x5
013a 1912 | | Execute Package,Field_Reference,Field_Number 0x12
013b 00c6 | | Action Check_Subprogram_Elaborated
013c e219 | | Load 0x1,0x19
013d e21b | | Load 0x1,0x1b
013e 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d
013f 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30
0140 1d7f | | Execute_Immediate Reference_Lex_1,0x7f
0141 e01b | | Load 0x0,0x1b
0142 e01c | | Load 0x0,0x1c
0143 4800 |H | Short_Literal 0x0
0144 0007 | | Action Break_Optional
0145 029d 0573 | s| Declare_Subprogram INIT_0570,For_Outer_Call
0147 e005 | | Load 0x0,0x5
0148 1912 | | Execute Package,Field_Reference,Field_Number 0x12
0149 00c6 | | Action Check_Subprogram_Elaborated
014a e219 | | Load 0x1,0x19
014b e21b | | Load 0x1,0x1b
014c 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d
014d 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30
014e 1d88 | | Execute_Immediate Reference_Lex_1,0x88
014f e01d | | Load 0x0,0x1d
0150 e01e | | Load 0x0,0x1e
0151 4800 |H | Short_Literal 0x0
0152 0007 | | Action Break_Optional
0153 029d 0593 | | Declare_Subprogram INIT_0590,For_Outer_Call
0155 e005 | | Load 0x0,0x5
0156 1913 | | Execute Package,Field_Reference,Field_Number 0x13
0157 00c6 | | Action Check_Subprogram_Elaborated
0158 e007 | | Load 0x0,0x7
0159 1b0e | | Execute Package,Field_Read,Field_Number 0xe
015a e215 | | Load 0x1,0x15
015b 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
015c 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e
015d 1d91 | | Execute_Immediate Reference_Lex_1,0x91
015e e01f | | Load 0x0,0x1f
015f e020 | | Load 0x0,0x20
0160 4800 |H | Short_Literal 0x0
0161 0007 | | Action Break_Optional
0162 029d 05ab | | Declare_Subprogram INIT_05a8,For_Outer_Call
0164 e005 | | Load 0x0,0x5
0165 1913 | | Execute Package,Field_Reference,Field_Number 0x13
0166 00c6 | | Action Check_Subprogram_Elaborated
0167 e007 | | Load 0x0,0x7
0168 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0169 e215 | | Load 0x1,0x15
016a 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
016b 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e
016c 1d9a | | Execute_Immediate Reference_Lex_1,0x9a
016d e021 | ! | Load 0x0,0x21
016e e022 | " | Load 0x0,0x22
016f 4800 |H | Short_Literal 0x0
0170 0007 | | Action Break_Optional
0171 029d 05c3 | | Declare_Subprogram INIT_05c0,For_Outer_Call
0173 e005 | | Load 0x0,0x5
0174 1912 | | Execute Package,Field_Reference,Field_Number 0x12
0175 00c6 | | Action Check_Subprogram_Elaborated
0176 e219 | | Load 0x1,0x19
0177 e215 | | Load 0x1,0x15
0178 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d
0179 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e
017a 1da3 | | Execute_Immediate Reference_Lex_1,0xa3
017b e023 | # | Load 0x0,0x23
017c e024 | $ | Load 0x0,0x24
017d 4800 |H | Short_Literal 0x0
017e 0007 | | Action Break_Optional
017f 029d 05db | | Declare_Subprogram INIT_05d8,For_Outer_Call
0181 e005 | | Load 0x0,0x5
0182 1913 | | Execute Package,Field_Reference,Field_Number 0x13
0183 00c6 | | Action Check_Subprogram_Elaborated
0184 e007 | | Load 0x0,0x7
0185 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0186 e215 | | Load 0x1,0x15
0187 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
0188 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e
0189 1dac | | Execute_Immediate Reference_Lex_1,0xac
018a e025 | % | Load 0x0,0x25
018b e026 | & | Load 0x0,0x26
018c 4800 |H | Short_Literal 0x0
018d 0007 | | Action Break_Optional
018e 029d 05f3 | | Declare_Subprogram INIT_05f0,For_Outer_Call
0190 e005 | | Load 0x0,0x5
0191 1913 | | Execute Package,Field_Reference,Field_Number 0x13
0192 00c6 | | Action Check_Subprogram_Elaborated
0193 e007 | | Load 0x0,0x7
0194 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0195 e21d | | Load 0x1,0x1d
0196 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
0197 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32
0198 1db5 | | Execute_Immediate Reference_Lex_1,0xb5
0199 e027 | ' | Load 0x0,0x27
019a e028 | ( | Load 0x0,0x28
019b 4800 |H | Short_Literal 0x0
019c 0007 | | Action Break_Optional
019d 029d 061b | | Declare_Subprogram INIT_0618,For_Outer_Call
019f e005 | | Load 0x0,0x5
01a0 1913 | | Execute Package,Field_Reference,Field_Number 0x13
01a1 00c6 | | Action Check_Subprogram_Elaborated
01a2 e007 | | Load 0x0,0x7
01a3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01a4 e21b | | Load 0x1,0x1b
01a5 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
01a6 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30
01a7 1dbe | | Execute_Immediate Reference_Lex_1,0xbe
01a8 e029 | ) | Load 0x0,0x29
01a9 e02a | * | Load 0x0,0x2a
01aa 4800 |H | Short_Literal 0x0
01ab 0007 | | Action Break_Optional
01ac 029d 063b | ;| Declare_Subprogram INIT_0638,For_Outer_Call
01ae e005 | | Load 0x0,0x5
01af 1913 | | Execute Package,Field_Reference,Field_Number 0x13
01b0 00c6 | | Action Check_Subprogram_Elaborated
01b1 e007 | | Load 0x0,0x7
01b2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01b3 e21b | | Load 0x1,0x1b
01b4 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
01b5 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30
01b6 1dc7 | | Execute_Immediate Reference_Lex_1,0xc7
01b7 e02b | + | Load 0x0,0x2b
01b8 e02c | , | Load 0x0,0x2c
01b9 4800 |H | Short_Literal 0x0
01ba 0007 | | Action Break_Optional
01bb 029d 065b | [| Declare_Subprogram INIT_0658,For_Outer_Call
01bd e005 | | Load 0x0,0x5
01be 1913 | | Execute Package,Field_Reference,Field_Number 0x13
01bf 00c6 | | Action Check_Subprogram_Elaborated
01c0 e21c | | Load 0x1,0x1c
01c1 e215 | | Load 0x1,0x15
01c2 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31
01c3 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e
01c4 1dd0 | | Execute_Immediate Reference_Lex_1,0xd0
01c5 e02d | - | Load 0x0,0x2d
01c6 e02e | . | Load 0x0,0x2e
01c7 4800 |H | Short_Literal 0x0
01c8 0007 | | Action Break_Optional
01c9 029d 066b | k| Declare_Subprogram INIT_0668,For_Outer_Call
01cb e005 | | Load 0x0,0x5
01cc 1913 | | Execute Package,Field_Reference,Field_Number 0x13
01cd 00c6 | | Action Check_Subprogram_Elaborated
01ce e21f | | Load 0x1,0x1f
01cf e215 | | Load 0x1,0x15
01d0 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34
01d1 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e
01d2 1dd9 | | Execute_Immediate Reference_Lex_1,0xd9
01d3 e02f | / | Load 0x0,0x2f
01d4 e030 | 0 | Load 0x0,0x30
01d5 4800 |H | Short_Literal 0x0
01d6 0007 | | Action Break_Optional
01d7 029d 0683 | | Declare_Subprogram INIT_0680,For_Outer_Call
01d9 029d 077b | {| Declare_Subprogram INIT_0778,For_Outer_Call
01db e031 | 1 | Load 0x0,0x31
01dc e032 | 2 | Load 0x0,0x32
01dd 4803 |H | Short_Literal 0x3
01de 4803 |H | Short_Literal 0x3
01df 1de2 | | Execute_Immediate Reference_Lex_1,0xe2
01e0 e005 | | Load 0x0,0x5
01e1 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
01e2 0387 | | Declare_Variable Package
01e3 00d8 | | Load_Top At_Offset_0
01e4 020f | | Execute Module,Activate
01e5 1d12 | | Execute_Immediate Reference_Lex_1,0x12
01e6 00c7 | | Action Elaborate_Subprogram
01e7 1d0f | | Execute_Immediate Reference_Lex_1,0xf
01e8 00c7 | | Action Elaborate_Subprogram
01e9 1d17 | | Execute_Immediate Reference_Lex_1,0x17
01ea 00c7 | | Action Elaborate_Subprogram
01eb BODY_0008:
01eb 00bc | | Action Signal_Activated
01ec 00bb | | Action Signal_Completion
01ed 0000 0000 | | .XXX[0x3]
01ef 0000 | |
01f0 ; --------------------------------------------------------------------------------------
01f0 ; SUBPROGRAM
01f0 ; --------------------------------------------------------------------------------------
01f0 01f6 | | .CONST 0x01f6 ; Address of begin
01f1 020a | | .CONST 0x020a ; Address of exception handler
01f2 0002 | | .CONST 0x0002 ; Number of locals
01f3 INIT_01f0:
01f3 e005 | | Load 0x0,0x5
01f4 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01f5 0337 | 7 | Declare_Variable Array
01f6 BODY_01f0:
01f6 00db | | Load_Top At_Offset_3
01f7 e007 | | Load 0x0,0x7
01f8 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01f9 e004 | | Load 0x0,0x4
01fa 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
01fb e5fe | | Load 0x2,-0x2
01fc e007 | | Load 0x0,0x7
01fd 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01fe e004 | | Load 0x0,0x4
01ff 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b
0200 00d8 | | Load_Top At_Offset_0
0201 6016 |` | Indirect_Literal Discrete,0x218,{0x00007fff, 0xffffffff}
0202 4800 |H | Short_Literal 0x0
0203 e2e4 | | Load 0x1,0xe4
0204 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0205 00d1 | | Pop_Control Pop_Count_1
0206 00d8 | | Load_Top At_Offset_0
0207 82e3 | | Call 0x1,0xe3
0208 a5fd | | Store_Unchecked 0x2,-0x3
0209 4503 |E | Exit_Suprogram New_Top_Offset 0x3
020a TRAP_01f0:
020a e033 | 3 | Load 0x0,0x33
020b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
020c 010f | | Execute Exception,Equal
020d 6802 |h | Jump_Zero 0x210
020e e211 | | Load 0x1,0x11
020f 0257 | W | Execute Discrete,Raise
0210 e005 | | Load 0x0,0x5
0211 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0212 010f | | Execute Exception,Equal
0213 6802 |h | Jump_Zero 0x216
0214 e210 | | Load 0x1,0x10
0215 0257 | W | Execute Discrete,Raise
0216 0100 | | Execute Exception,Raise
0217 0000 | | .XXX[0x1]
0218 0000 7fff | | .LITERAL {0x00007fff, 0xffffffff}
021c 0000 0000 | | .BLANK 0000[0x4]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0223 | # | .CONST 0x0223 ; Address of begin
0221 0004 | | .CONST 0x0004 ; Address of exception handler
0222 0001 | | .CONST 0x0001 ; Number of locals
0223 BODY_0220:
0223 INIT_0220:
0223 e2e4 | | Load 0x1,0xe4
0224 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0225 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0226 0000 0000 | | .XXX[0x2]
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 4801 |H | Short_Literal 0x1
022c e004 | | Load 0x0,0x4
022d 1b4a | J | Execute Package,Field_Read,Field_Number 0x4a
022e 1c08 | | Execute_Immediate Run_Utility,0x8
022f 00d8 | | Load_Top At_Offset_0
0230 1c01 | | Execute_Immediate Run_Utility,0x1
0231 4900 |I | Short_Literal 0x100
0232 e5ff | | Load 0x2,-0x1
0233 e007 | | Load 0x0,0x7
0234 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0235 e007 | | Load 0x0,0x7
0236 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0237 00d9 | | Load_Top At_Offset_1
0238 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
0239 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
023a 0000 0000 | | .BLANK 0000[0x6]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0243 | C | .CONST 0x0243 ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0001 | | .CONST 0x0001 ; Number of locals
0243 BODY_0240:
0243 INIT_0240:
0243 4608 |F | Jump_Case 0x9
0244 7808 |x | Jump 0x24d ; case 0x0
0245 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0246 780a |x | Jump 0x251 ; case 0x2
0247 7809 |x | Jump 0x251 ; case 0x3
0248 7808 |x | Jump 0x251 ; case 0x4
0249 7807 |x | Jump 0x251 ; case 0x5
024a 7806 |x | Jump 0x251 ; case 0x6
024b 7805 |x | Jump 0x251 ; case 0x7
024c 7804 |x | Jump 0x251 ; case 0x8
024d 00da | | Load_Top At_Offset_2
024e 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
024f 1c00 | | Execute_Immediate Run_Utility,0x0
0250 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0251 0869 | i | Execute_Immediate Raise,0x69
0252 0000 0000 | | .BLANK 0000[0x6]
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 4608 |F | Jump_Case 0x9
025c 7808 |x | Jump 0x265 ; case 0x0
025d 7811 |x | Jump 0x26f ; case 0x1
025e 7814 |x | Jump 0x273 ; case 0x2
025f 7813 |x | Jump 0x273 ; case 0x3
0260 7812 |x | Jump 0x273 ; case 0x4
0261 7811 |x | Jump 0x273 ; case 0x5
0262 7810 |x | Jump 0x273 ; case 0x6
0263 780f |x | Jump 0x273 ; case 0x7
0264 780e |x | Jump 0x273 ; case 0x8
0265 00da | | Load_Top At_Offset_2
0266 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0267 0125 | % | Execute Any,Set_Constraint
0268 00da | | Load_Top At_Offset_2
0269 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
026a 1c00 | | Execute_Immediate Run_Utility,0x0
026b 00da | | Load_Top At_Offset_2
026c 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
026d 1c00 | | Execute_Immediate Run_Utility,0x0
026e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
026f 00da | | Load_Top At_Offset_2
0270 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0271 0125 | % | Execute Any,Set_Constraint
0272 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0273 0869 | i | Execute_Immediate Raise,0x69
0274 0000 0000 | | .BLANK 0000[0x4]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027b | { | .CONST 0x027b ; Address of begin
0279 0004 | | .CONST 0x0004 ; Address of exception handler
027a 0001 | | .CONST 0x0001 ; Number of locals
027b BODY_0278:
027b INIT_0278:
027b 4608 |F | Jump_Case 0x9
027c 7808 |x | Jump 0x285 ; case 0x0
027d 7814 |x | Jump 0x292 ; case 0x1
027e 781a |x | Jump 0x299 ; case 0x2
027f 7819 |x | Jump 0x299 ; case 0x3
0280 7818 |x | Jump 0x299 ; case 0x4
0281 7817 |x | Jump 0x299 ; case 0x5
0282 7816 |x | Jump 0x299 ; case 0x6
0283 7815 |x | Jump 0x299 ; case 0x7
0284 7814 |x | Jump 0x299 ; case 0x8
0285 00da | | Load_Top At_Offset_2
0286 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0287 0125 | % | Execute Any,Set_Constraint
0288 00da | | Load_Top At_Offset_2
0289 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
028a 1c00 | | Execute_Immediate Run_Utility,0x0
028b 00da | | Load_Top At_Offset_2
028c 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
028d 0125 | % | Execute Any,Set_Constraint
028e 00da | | Load_Top At_Offset_2
028f 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0290 1c00 | | Execute_Immediate Run_Utility,0x0
0291 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0292 00da | | Load_Top At_Offset_2
0293 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0294 0125 | % | Execute Any,Set_Constraint
0295 00da | | Load_Top At_Offset_2
0296 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0297 0125 | % | Execute Any,Set_Constraint
0298 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0299 0869 | i | Execute_Immediate Raise,0x69
029a 0000 0000 | | .BLANK 0000[0x6]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a3 | | .CONST 0x02a3 ; Address of begin
02a1 0004 | | .CONST 0x0004 ; Address of exception handler
02a2 0001 | | .CONST 0x0001 ; Number of locals
02a3 BODY_02a0:
02a3 INIT_02a0:
02a3 4608 |F | Jump_Case 0x9
02a4 7808 |x | Jump 0x2ad ; case 0x0
02a5 7817 |x | Jump 0x2bd ; case 0x1
02a6 781d |x | Jump 0x2c4 ; case 0x2
02a7 781c |x | Jump 0x2c4 ; case 0x3
02a8 781b |x | Jump 0x2c4 ; case 0x4
02a9 781a |x | Jump 0x2c4 ; case 0x5
02aa 7819 |x | Jump 0x2c4 ; case 0x6
02ab 7818 |x | Jump 0x2c4 ; case 0x7
02ac 7817 |x | Jump 0x2c4 ; case 0x8
02ad 00da | | Load_Top At_Offset_2
02ae 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
02af 0125 | % | Execute Any,Set_Constraint
02b0 00da | | Load_Top At_Offset_2
02b1 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
02b2 1c00 | | Execute_Immediate Run_Utility,0x0
02b3 00da | | Load_Top At_Offset_2
02b4 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
02b5 0125 | % | Execute Any,Set_Constraint
02b6 00da | | Load_Top At_Offset_2
02b7 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
02b8 1c00 | | Execute_Immediate Run_Utility,0x0
02b9 00da | | Load_Top At_Offset_2
02ba 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
02bb 1c00 | | Execute_Immediate Run_Utility,0x0
02bc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
02bd 00da | | Load_Top At_Offset_2
02be 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
02bf 0125 | % | Execute Any,Set_Constraint
02c0 00da | | Load_Top At_Offset_2
02c1 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
02c2 0125 | % | Execute Any,Set_Constraint
02c3 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
02c4 0869 | i | Execute_Immediate Raise,0x69
02c5 0000 0000 | | .XXX[0x3]
02c7 0000 | |
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02cb | | .CONST 0x02cb ; Address of begin
02c9 0004 | | .CONST 0x0004 ; Address of exception handler
02ca 0001 | | .CONST 0x0001 ; Number of locals
02cb BODY_02c8:
02cb INIT_02c8:
02cb 4608 |F | Jump_Case 0x9
02cc 7808 |x | Jump 0x2d5 ; case 0x0
02cd 780e |x | Jump 0x2dc ; case 0x1
02ce 7811 |x | Jump 0x2e0 ; case 0x2
02cf 7810 |x | Jump 0x2e0 ; case 0x3
02d0 780f |x | Jump 0x2e0 ; case 0x4
02d1 780e |x | Jump 0x2e0 ; case 0x5
02d2 780d |x | Jump 0x2e0 ; case 0x6
02d3 780c |x | Jump 0x2e0 ; case 0x7
02d4 780b |x | Jump 0x2e0 ; case 0x8
02d5 00da | | Load_Top At_Offset_2
02d6 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
02d7 0125 | % | Execute Any,Set_Constraint
02d8 00da | | Load_Top At_Offset_2
02d9 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
02da 1c00 | | Execute_Immediate Run_Utility,0x0
02db 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
02dc 00da | | Load_Top At_Offset_2
02dd 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
02de 0125 | % | Execute Any,Set_Constraint
02df 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
02e0 0869 | i | Execute_Immediate Raise,0x69
02e1 0000 0000 | | .BLANK 0000[0x7]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02eb | | .CONST 0x02eb ; Address of begin
02e9 0004 | | .CONST 0x0004 ; Address of exception handler
02ea 0001 | | .CONST 0x0001 ; Number of locals
02eb BODY_02e8:
02eb INIT_02e8:
02eb 4608 |F | Jump_Case 0x9
02ec 7808 |x | Jump 0x2f5 ; case 0x0
02ed 780e |x | Jump 0x2fc ; case 0x1
02ee 7811 |x | Jump 0x300 ; case 0x2
02ef 7810 |x | Jump 0x300 ; case 0x3
02f0 780f |x | Jump 0x300 ; case 0x4
02f1 780e |x | Jump 0x300 ; case 0x5
02f2 780d |x | Jump 0x300 ; case 0x6
02f3 780c |x | Jump 0x300 ; case 0x7
02f4 780b |x | Jump 0x300 ; case 0x8
02f5 00da | | Load_Top At_Offset_2
02f6 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
02f7 0125 | % | Execute Any,Set_Constraint
02f8 00da | | Load_Top At_Offset_2
02f9 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
02fa 1c00 | | Execute_Immediate Run_Utility,0x0
02fb 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
02fc 00da | | Load_Top At_Offset_2
02fd 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
02fe 0125 | % | Execute Any,Set_Constraint
02ff 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0300 0869 | i | Execute_Immediate Raise,0x69
0301 0000 0000 | | .BLANK 0000[0x7]
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 030b | | .CONST 0x030b ; Address of begin
0309 0004 | | .CONST 0x0004 ; Address of exception handler
030a 0001 | | .CONST 0x0001 ; Number of locals
030b BODY_0308:
030b INIT_0308:
030b 4608 |F | Jump_Case 0x9
030c 7808 |x | Jump 0x315 ; case 0x0
030d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
030e 780a |x | Jump 0x319 ; case 0x2
030f 7809 |x | Jump 0x319 ; case 0x3
0310 7808 |x | Jump 0x319 ; case 0x4
0311 7807 |x | Jump 0x319 ; case 0x5
0312 7806 |x | Jump 0x319 ; case 0x6
0313 7805 |x | Jump 0x319 ; case 0x7
0314 7804 |x | Jump 0x319 ; case 0x8
0315 00da | | Load_Top At_Offset_2
0316 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0317 1c00 | | Execute_Immediate Run_Utility,0x0
0318 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0319 0869 | i | Execute_Immediate Raise,0x69
031a 0000 0000 | | .BLANK 0000[0x6]
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0323 | # | .CONST 0x0323 ; Address of begin
0321 0004 | | .CONST 0x0004 ; Address of exception handler
0322 0001 | | .CONST 0x0001 ; Number of locals
0323 BODY_0320:
0323 INIT_0320:
0323 4608 |F | Jump_Case 0x9
0324 7808 |x | Jump 0x32d ; case 0x0
0325 781c |x | Jump 0x342 ; case 0x1
0326 7826 |x& | Jump 0x34d ; case 0x2
0327 7825 |x% | Jump 0x34d ; case 0x3
0328 7824 |x$ | Jump 0x34d ; case 0x4
0329 7823 |x# | Jump 0x34d ; case 0x5
032a 7822 |x" | Jump 0x34d ; case 0x6
032b 7819 |x | Jump 0x345 ; case 0x7
032c 781c |x | Jump 0x349 ; case 0x8
032d 00da | | Load_Top At_Offset_2
032e 016c | l | Execute Variant_Record,Is_Constrained
032f 7009 |p | Jump_Nonzero 0x339
0330 00cf | | Action Mark_Auxiliary
0331 4800 |H | Short_Literal 0x0
0332 e5ff | | Load 0x2,-0x1
0333 1c08 | | Execute_Immediate Run_Utility,0x8
0334 00d8 | | Load_Top At_Offset_0
0335 1c00 | | Execute_Immediate Run_Utility,0x0
0336 c5ff | | Store 0x2,-0x1
0337 00ce | | Action Pop_Auxiliary
0338 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0339 00da | | Load_Top At_Offset_2
033a 2202 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x2
033b 00da | | Load_Top At_Offset_2
033c 2402 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2
033d 1c00 | | Execute_Immediate Run_Utility,0x0
033e 00da | | Load_Top At_Offset_2
033f 2403 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x3
0340 1c00 | | Execute_Immediate Run_Utility,0x0
0341 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0342 00da | | Load_Top At_Offset_2
0343 2202 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x2
0344 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0345 00db | | Load_Top At_Offset_3
0346 e5ff | | Load 0x2,-0x1
0347 031b | | Declare_Type Variant_Record,Constrained
0348 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0349 00db | | Load_Top At_Offset_3
034a 00db | | Load_Top At_Offset_3
034b 02fc | | Declare_Variable Variant_Record,With_Constraint
034c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
034d 0869 | i | Execute_Immediate Raise,0x69
034e 0000 0000 | | .XXX[0x2]
0350 ; --------------------------------------------------------------------------------------
0350 ; SUBPROGRAM
0350 ; --------------------------------------------------------------------------------------
0350 0353 | S | .CONST 0x0353 ; Address of begin
0351 0004 | | .CONST 0x0004 ; Address of exception handler
0352 0001 | | .CONST 0x0001 ; Number of locals
0353 BODY_0350:
0353 INIT_0350:
0353 00da | | Load_Top At_Offset_2
0354 8223 | # | Call 0x1,0x23
0355 e007 | | Load 0x0,0x7
0356 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0357 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0358 ; --------------------------------------------------------------------------------------
0358 ; SUBPROGRAM
0358 ; --------------------------------------------------------------------------------------
0358 035b | [ | .CONST 0x035b ; Address of begin
0359 0004 | | .CONST 0x0004 ; Address of exception handler
035a 0001 | | .CONST 0x0001 ; Number of locals
035b BODY_0358:
035b INIT_0358:
035b 00db | | Load_Top At_Offset_3
035c 00db | | Load_Top At_Offset_3
035d 8223 | # | Call 0x1,0x23
035e e007 | | Load 0x0,0x7
035f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0360 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0361 0000 0000 | | .BLANK 0000[0x7]
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 00db | | Load_Top At_Offset_3
036c e007 | | Load 0x0,0x7
036d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
036e 00db | | Load_Top At_Offset_3
036f 8224 | $ | Call 0x1,0x24
0370 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0371 0000 0000 | | .BLANK 0000[0x7]
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 037b | { | .CONST 0x037b ; Address of begin
0379 0004 | | .CONST 0x0004 ; Address of exception handler
037a 0001 | | .CONST 0x0001 ; Number of locals
037b BODY_0378:
037b INIT_0378:
037b 00da | | Load_Top At_Offset_2
037c 8223 | # | Call 0x1,0x23
037d e006 | | Load 0x0,0x6
037e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
037f 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0380 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0381 0000 0000 | | .BLANK 0000[0x7]
0388 ; --------------------------------------------------------------------------------------
0388 ; SUBPROGRAM
0388 ; --------------------------------------------------------------------------------------
0388 038b | | .CONST 0x038b ; Address of begin
0389 0004 | | .CONST 0x0004 ; Address of exception handler
038a 0001 | | .CONST 0x0001 ; Number of locals
038b BODY_0388:
038b INIT_0388:
038b 00db | | Load_Top At_Offset_3
038c e006 | | Load 0x0,0x6
038d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
038e 1816 | | Execute Package,Field_Execute,Field_Number 0x16
038f 00db | | Load_Top At_Offset_3
0390 8224 | $ | Call 0x1,0x24
0391 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0392 0000 0000 | | .BLANK 0000[0x6]
0398 ; --------------------------------------------------------------------------------------
0398 ; SUBPROGRAM
0398 ; --------------------------------------------------------------------------------------
0398 039b | | .CONST 0x039b ; Address of begin
0399 0004 | | .CONST 0x0004 ; Address of exception handler
039a 0001 | | .CONST 0x0001 ; Number of locals
039b BODY_0398:
039b INIT_0398:
039b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
039c 0000 0000 | | .BLANK 0000[0x4]
03a0 ; --------------------------------------------------------------------------------------
03a0 ; SUBPROGRAM
03a0 ; --------------------------------------------------------------------------------------
03a0 03a3 | | .CONST 0x03a3 ; Address of begin
03a1 0004 | | .CONST 0x0004 ; Address of exception handler
03a2 0001 | | .CONST 0x0001 ; Number of locals
03a3 BODY_03a0:
03a3 INIT_03a0:
03a3 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03a4 0000 0000 | | .BLANK 0000[0x4]
03a8 ; --------------------------------------------------------------------------------------
03a8 ; SUBPROGRAM
03a8 ; --------------------------------------------------------------------------------------
03a8 03ab | | .CONST 0x03ab ; Address of begin
03a9 0004 | | .CONST 0x0004 ; Address of exception handler
03aa 0001 | | .CONST 0x0001 ; Number of locals
03ab BODY_03a8:
03ab INIT_03a8:
03ab 00db | | Load_Top At_Offset_3
03ac 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
03ad 00db | | Load_Top At_Offset_3
03ae 8225 | % | Call 0x1,0x25
03af 00db | | Load_Top At_Offset_3
03b0 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
03b1 6804 |h | Jump_Zero 0x3b6
03b2 00db | | Load_Top At_Offset_3
03b3 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
03b4 00db | | Load_Top At_Offset_3
03b5 8229 | ) | Call 0x1,0x29
03b6 4503 |E | Exit_Suprogram New_Top_Offset 0x3
03b7 0000 | | .XXX[0x1]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03bb | | .CONST 0x03bb ; Address of begin
03b9 0004 | | .CONST 0x0004 ; Address of exception handler
03ba 0001 | | .CONST 0x0001 ; Number of locals
03bb BODY_03b8:
03bb INIT_03b8:
03bb 00db | | Load_Top At_Offset_3
03bc 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03bd 00db | | Load_Top At_Offset_3
03be 822b | + | Call 0x1,0x2b
03bf 00db | | Load_Top At_Offset_3
03c0 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
03c1 00db | | Load_Top At_Offset_3
03c2 822e | . | Call 0x1,0x2e
03c3 4503 |E | Exit_Suprogram New_Top_Offset 0x3
03c4 0000 0000 | | .BLANK 0000[0x4]
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03cb | | .CONST 0x03cb ; Address of begin
03c9 0004 | | .CONST 0x0004 ; Address of exception handler
03ca 0001 | | .CONST 0x0001 ; Number of locals
03cb BODY_03c8:
03cb INIT_03c8:
03cb 00db | | Load_Top At_Offset_3
03cc 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
03cd 00db | | Load_Top At_Offset_3
03ce 8229 | ) | Call 0x1,0x29
03cf 00db | | Load_Top At_Offset_3
03d0 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
03d1 00db | | Load_Top At_Offset_3
03d2 822e | . | Call 0x1,0x2e
03d3 4503 |E | Exit_Suprogram New_Top_Offset 0x3
03d4 0000 0000 | | .BLANK 0000[0x4]
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; --------------------------------------------------------------------------------------
03d8 03e1 | | .CONST 0x03e1 ; Address of begin
03d9 0004 | | .CONST 0x0004 ; Address of exception handler
03da 0003 | | .CONST 0x0003 ; Number of locals
03db INIT_03d8:
03db 4900 |I | Short_Literal 0x100
03dc 00db | | Load_Top At_Offset_3
03dd 8228 | ( | Call 0x1,0x28
03de 4900 |I | Short_Literal 0x100
03df e5ff | | Load 0x2,-0x1
03e0 8228 | ( | Call 0x1,0x28
03e1 BODY_03d8:
03e1 e21c | | Load 0x1,0x1c
03e2 0322 | " | Declare_Variable Record
03e3 00d8 | | Load_Top At_Offset_0
03e4 1c01 | | Execute_Immediate Run_Utility,0x1
03e5 00da | | Load_Top At_Offset_2
03e6 00d9 | | Load_Top At_Offset_1
03e7 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
03e8 00d9 | | Load_Top At_Offset_1
03e9 00d9 | | Load_Top At_Offset_1
03ea 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
03eb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03ec 0000 0000 | | .BLANK 0000[0x4]
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 00db | | Load_Top At_Offset_3
03f4 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
03f5 00db | | Load_Top At_Offset_3
03f6 8229 | ) | Call 0x1,0x29
03f7 00db | | Load_Top At_Offset_3
03f8 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
03f9 00db | | Load_Top At_Offset_3
03fa 8229 | ) | Call 0x1,0x29
03fb 00db | | Load_Top At_Offset_3
03fc 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
03fd 00db | | Load_Top At_Offset_3
03fe 8226 | & | Call 0x1,0x26
03ff 00db | | Load_Top At_Offset_3
0400 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0401 00db | | Load_Top At_Offset_3
0402 822e | . | Call 0x1,0x2e
0403 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0404 0000 0000 | | .BLANK 0000[0x4]
0408 ; --------------------------------------------------------------------------------------
0408 ; SUBPROGRAM
0408 ; --------------------------------------------------------------------------------------
0408 040e | | .CONST 0x040e ; Address of begin
0409 0004 | | .CONST 0x0004 ; Address of exception handler
040a 0002 | | .CONST 0x0002 ; Number of locals
040b INIT_0408:
040b 4900 |I | Short_Literal 0x100
040c 00db | | Load_Top At_Offset_3
040d 8228 | ( | Call 0x1,0x28
040e BODY_0408:
040e e21e | | Load 0x1,0x1e
040f 0322 | " | Declare_Variable Record
0410 00d8 | | Load_Top At_Offset_0
0411 1c01 | | Execute_Immediate Run_Utility,0x1
0412 00d9 | | Load_Top At_Offset_1
0413 00d9 | | Load_Top At_Offset_1
0414 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0415 e5ff | | Load 0x2,-0x1
0416 822a | * | Call 0x1,0x2a
0417 00d9 | | Load_Top At_Offset_1
0418 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0419 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
041a 0000 0000 | | .BLANK 0000[0x6]
0420 ; --------------------------------------------------------------------------------------
0420 ; SUBPROGRAM
0420 ; --------------------------------------------------------------------------------------
0420 0426 | & | .CONST 0x0426 ; Address of begin
0421 0004 | | .CONST 0x0004 ; Address of exception handler
0422 0002 | | .CONST 0x0002 ; Number of locals
0423 INIT_0420:
0423 4900 |I | Short_Literal 0x100
0424 00db | | Load_Top At_Offset_3
0425 8228 | ( | Call 0x1,0x28
0426 BODY_0420:
0426 e21f | | Load 0x1,0x1f
0427 0322 | " | Declare_Variable Record
0428 00d8 | | Load_Top At_Offset_0
0429 1c01 | | Execute_Immediate Run_Utility,0x1
042a 00d9 | | Load_Top At_Offset_1
042b 00d9 | | Load_Top At_Offset_1
042c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
042d e5ff | | Load 0x2,-0x1
042e 822a | * | Call 0x1,0x2a
042f 00d9 | | Load_Top At_Offset_1
0430 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0431 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0432 0000 0000 | | .BLANK 0000[0x6]
0438 ; --------------------------------------------------------------------------------------
0438 ; SUBPROGRAM
0438 ; --------------------------------------------------------------------------------------
0438 043b | ; | .CONST 0x043b ; Address of begin
0439 0004 | | .CONST 0x0004 ; Address of exception handler
043a 0001 | | .CONST 0x0001 ; Number of locals
043b BODY_0438:
043b INIT_0438:
043b 00db | | Load_Top At_Offset_3
043c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
043d 00db | | Load_Top At_Offset_3
043e 8226 | & | Call 0x1,0x26
043f 00db | | Load_Top At_Offset_3
0440 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
0441 00db | | Load_Top At_Offset_3
0442 822e | . | Call 0x1,0x2e
0443 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0444 0000 0000 | | .BLANK 0000[0x4]
0448 ; --------------------------------------------------------------------------------------
0448 ; SUBPROGRAM
0448 ; --------------------------------------------------------------------------------------
0448 044b | K | .CONST 0x044b ; Address of begin
0449 0004 | | .CONST 0x0004 ; Address of exception handler
044a 0001 | | .CONST 0x0001 ; Number of locals
044b BODY_0448:
044b INIT_0448:
044b 00db | | Load_Top At_Offset_3
044c 2402 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x2
044d 00db | | Load_Top At_Offset_3
044e 8229 | ) | Call 0x1,0x29
044f 00db | | Load_Top At_Offset_3
0450 2403 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x3
0451 00db | | Load_Top At_Offset_3
0452 822e | . | Call 0x1,0x2e
0453 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0454 0000 0000 | | .BLANK 0000[0x4]
0458 ; --------------------------------------------------------------------------------------
0458 ; SUBPROGRAM
0458 ; --------------------------------------------------------------------------------------
0458 045b | [ | .CONST 0x045b ; Address of begin
0459 0467 | g | .CONST 0x0467 ; Address of exception handler
045a 0001 | | .CONST 0x0001 ; Number of locals
045b BODY_0458:
045b INIT_0458:
045b e006 | | Load 0x0,0x6
045c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
045d 1b11 | | Execute Package,Field_Read,Field_Number 0x11
045e 00db | | Load_Top At_Offset_3
045f e004 | | Load 0x0,0x4
0460 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
0461 e5fe | | Load 0x2,-0x2
0462 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0463 e216 | | Load 0x1,0x16
0464 e5fe | | Load 0x2,-0x2
0465 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0466 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0467 TRAP_0458:
0467 e033 | 3 | Load 0x0,0x33
0468 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0469 010f | | Execute Exception,Equal
046a 6806 |h | Jump_Zero 0x471
046b e033 | 3 | Load 0x0,0x33
046c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
046d 8217 | | Call 0x1,0x17
046e e5fe | | Load 0x2,-0x2
046f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0470 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0471 0100 | | Execute Exception,Raise
0472 0000 0000 | | .BLANK 0000[0x6]
0478 ; --------------------------------------------------------------------------------------
0478 ; SUBPROGRAM
0478 ; --------------------------------------------------------------------------------------
0478 047f | | .CONST 0x047f ; Address of begin
0479 0486 | | .CONST 0x0486 ; Address of exception handler
047a 0002 | | .CONST 0x0002 ; Number of locals
047b INIT_0478:
047b e21b | | Load 0x1,0x1b
047c 0322 | " | Declare_Variable Record
047d 00d8 | | Load_Top At_Offset_0
047e 1c00 | | Execute_Immediate Run_Utility,0x0
047f BODY_0478:
047f 00db | | Load_Top At_Offset_3
0480 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0481 e5ff | | Load 0x2,-0x1
0482 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0483 e004 | | Load 0x0,0x4
0484 184e | N | Execute Package,Field_Execute,Field_Number 0x4e
0485 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0486 TRAP_0478:
0486 e033 | 3 | Load 0x0,0x33
0487 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0488 010f | | Execute Exception,Equal
0489 6806 |h | Jump_Zero 0x490
048a e033 | 3 | Load 0x0,0x33
048b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
048c 8217 | | Call 0x1,0x17
048d e5fe | | Load 0x2,-0x2
048e 016d | m | Execute Variant_Record,Structure_Write
048f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0490 0100 | | Execute Exception,Raise
0491 0000 0000 | | .BLANK 0000[0x7]
0498 ; --------------------------------------------------------------------------------------
0498 ; SUBPROGRAM
0498 ; --------------------------------------------------------------------------------------
0498 04a1 | | .CONST 0x04a1 ; Address of begin
0499 04b3 | | .CONST 0x04b3 ; Address of exception handler
049a 0002 | | .CONST 0x0002 ; Number of locals
049b INIT_0498:
049b 4900 |I | Short_Literal 0x100
049c e007 | | Load 0x0,0x7
049d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
049e 1c08 | | Execute_Immediate Run_Utility,0x8
049f 00d8 | | Load_Top At_Offset_0
04a0 1c00 | | Execute_Immediate Run_Utility,0x0
04a1 BODY_0498:
04a1 00d8 | | Load_Top At_Offset_0
04a2 e5ff | | Load 0x2,-0x1
04a3 e004 | | Load 0x0,0x4
04a4 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
04a5 00d1 | | Pop_Control Pop_Count_1
04a6 e21b | | Load 0x1,0x1b
04a7 0322 | " | Declare_Variable Record
04a8 00d8 | | Load_Top At_Offset_0
04a9 1c01 | | Execute_Immediate Run_Utility,0x1
04aa 00d9 | | Load_Top At_Offset_1
04ab 00d9 | | Load_Top At_Offset_1
04ac 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
04ad e216 | | Load 0x1,0x16
04ae 00d9 | | Load_Top At_Offset_1
04af 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
04b0 e5fe | | Load 0x2,-0x2
04b1 017d | } | Execute Record,Structure_Write
04b2 4502 |E | Exit_Suprogram New_Top_Offset 0x2
04b3 TRAP_0498:
04b3 e033 | 3 | Load 0x0,0x33
04b4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04b5 010f | | Execute Exception,Equal
04b6 6806 |h | Jump_Zero 0x4bd
04b7 e033 | 3 | Load 0x0,0x33
04b8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04b9 8217 | | Call 0x1,0x17
04ba e5fe | | Load 0x2,-0x2
04bb 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
04bc 4502 |E | Exit_Suprogram New_Top_Offset 0x2
04bd 0100 | | Execute Exception,Raise
04be 0000 0000 | | .XXX[0x2]
04c0 ; --------------------------------------------------------------------------------------
04c0 ; SUBPROGRAM
04c0 ; --------------------------------------------------------------------------------------
04c0 04c3 | | .CONST 0x04c3 ; Address of begin
04c1 04ca | | .CONST 0x04ca ; Address of exception handler
04c2 0001 | | .CONST 0x0001 ; Number of locals
04c3 BODY_04c0:
04c3 INIT_04c0:
04c3 00da | | Load_Top At_Offset_2
04c4 e004 | | Load 0x0,0x4
04c5 1853 | S | Execute Package,Field_Execute,Field_Number 0x53
04c6 e216 | | Load 0x1,0x16
04c7 e5fe | | Load 0x2,-0x2
04c8 016d | m | Execute Variant_Record,Structure_Write
04c9 4502 |E | Exit_Suprogram New_Top_Offset 0x2
04ca TRAP_04c0:
04ca e033 | 3 | Load 0x0,0x33
04cb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04cc 010f | | Execute Exception,Equal
04cd 6806 |h | Jump_Zero 0x4d4
04ce e033 | 3 | Load 0x0,0x33
04cf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04d0 8217 | | Call 0x1,0x17
04d1 e5fe | | Load 0x2,-0x2
04d2 016d | m | Execute Variant_Record,Structure_Write
04d3 4502 |E | Exit_Suprogram New_Top_Offset 0x2
04d4 0100 | | Execute Exception,Raise
04d5 0000 0000 | | .XXX[0x3]
04d7 0000 | |
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04df | | .CONST 0x04df ; Address of begin
04d9 04e9 | | .CONST 0x04e9 ; Address of exception handler
04da 0002 | | .CONST 0x0002 ; Number of locals
04db INIT_04d8:
04db e220 | | Load 0x1,0x20
04dc 0322 | " | Declare_Variable Record
04dd 00d8 | | Load_Top At_Offset_0
04de 1c00 | | Execute_Immediate Run_Utility,0x0
04df BODY_04d8:
04df 00e1 | | Load_Encached Boolean_Cache
04e0 e5ff | | Load 0x2,-0x1
04e1 e004 | | Load 0x0,0x4
04e2 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
04e3 e5fe | | Load 0x2,-0x2
04e4 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
04e5 e216 | | Load 0x1,0x16
04e6 e5fe | | Load 0x2,-0x2
04e7 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
04e8 4502 |E | Exit_Suprogram New_Top_Offset 0x2
04e9 TRAP_04d8:
04e9 e033 | 3 | Load 0x0,0x33
04ea 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04eb 010f | | Execute Exception,Equal
04ec 6806 |h | Jump_Zero 0x4f3
04ed e033 | 3 | Load 0x0,0x33
04ee 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04ef 8217 | | Call 0x1,0x17
04f0 e5fe | | Load 0x2,-0x2
04f1 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
04f2 4502 |E | Exit_Suprogram New_Top_Offset 0x2
04f3 0100 | | Execute Exception,Raise
04f4 0000 0000 | | .BLANK 0000[0x4]
04f8 ; --------------------------------------------------------------------------------------
04f8 ; SUBPROGRAM
04f8 ; --------------------------------------------------------------------------------------
04f8 04fb | | .CONST 0x04fb ; Address of begin
04f9 0507 | | .CONST 0x0507 ; Address of exception handler
04fa 0001 | | .CONST 0x0001 ; Number of locals
04fb BODY_04f8:
04fb INIT_04f8:
04fb e006 | | Load 0x0,0x6
04fc 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04fd 1b11 | | Execute Package,Field_Read,Field_Number 0x11
04fe 00db | | Load_Top At_Offset_3
04ff e004 | | Load 0x0,0x4
0500 1855 | U | Execute Package,Field_Execute,Field_Number 0x55
0501 e5fe | | Load 0x2,-0x2
0502 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0503 e216 | | Load 0x1,0x16
0504 e5fe | | Load 0x2,-0x2
0505 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0506 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0507 TRAP_04f8:
0507 e033 | 3 | Load 0x0,0x33
0508 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0509 010f | | Execute Exception,Equal
050a 6806 |h | Jump_Zero 0x511
050b e033 | 3 | Load 0x0,0x33
050c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
050d 8217 | | Call 0x1,0x17
050e e5fe | | Load 0x2,-0x2
050f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0510 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0511 0100 | | Execute Exception,Raise
0512 0000 0000 | | .BLANK 0000[0x6]
0518 ; --------------------------------------------------------------------------------------
0518 ; SUBPROGRAM
0518 ; --------------------------------------------------------------------------------------
0518 051b | | .CONST 0x051b ; Address of begin
0519 0527 | ' | .CONST 0x0527 ; Address of exception handler
051a 0001 | | .CONST 0x0001 ; Number of locals
051b BODY_0518:
051b INIT_0518:
051b e006 | | Load 0x0,0x6
051c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
051d 1b11 | | Execute Package,Field_Read,Field_Number 0x11
051e 00db | | Load_Top At_Offset_3
051f e004 | | Load 0x0,0x4
0520 1856 | V | Execute Package,Field_Execute,Field_Number 0x56
0521 e5fe | | Load 0x2,-0x2
0522 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0523 e216 | | Load 0x1,0x16
0524 e5fe | | Load 0x2,-0x2
0525 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0526 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0527 TRAP_0518:
0527 e033 | 3 | Load 0x0,0x33
0528 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0529 010f | | Execute Exception,Equal
052a 6806 |h | Jump_Zero 0x531
052b e033 | 3 | Load 0x0,0x33
052c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
052d 8217 | | Call 0x1,0x17
052e e5fe | | Load 0x2,-0x2
052f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0530 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0531 0100 | | Execute Exception,Raise
0532 0000 0000 | | .BLANK 0000[0x6]
0538 ; --------------------------------------------------------------------------------------
0538 ; SUBPROGRAM
0538 ; --------------------------------------------------------------------------------------
0538 053b | ; | .CONST 0x053b ; Address of begin
0539 0545 | E | .CONST 0x0545 ; Address of exception handler
053a 0001 | | .CONST 0x0001 ; Number of locals
053b BODY_0538:
053b INIT_0538:
053b 00db | | Load_Top At_Offset_3
053c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
053d 00db | | Load_Top At_Offset_3
053e e004 | | Load 0x0,0x4
053f 1857 | W | Execute Package,Field_Execute,Field_Number 0x57
0540 00d1 | | Pop_Control Pop_Count_1
0541 e216 | | Load 0x1,0x16
0542 e5fe | | Load 0x2,-0x2
0543 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
0544 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0545 TRAP_0538:
0545 e033 | 3 | Load 0x0,0x33
0546 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0547 010f | | Execute Exception,Equal
0548 6806 |h | Jump_Zero 0x54f
0549 e033 | 3 | Load 0x0,0x33
054a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
054b 8217 | | Call 0x1,0x17
054c e5fe | | Load 0x2,-0x2
054d 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
054e 4502 |E | Exit_Suprogram New_Top_Offset 0x2
054f 0100 | | Execute Exception,Raise
0550 ; --------------------------------------------------------------------------------------
0550 ; SUBPROGRAM
0550 ; --------------------------------------------------------------------------------------
0550 0557 | W | .CONST 0x0557 ; Address of begin
0551 0563 | c | .CONST 0x0563 ; Address of exception handler
0552 0002 | | .CONST 0x0002 ; Number of locals
0553 INIT_0550:
0553 e21b | | Load 0x1,0x1b
0554 0322 | " | Declare_Variable Record
0555 00d8 | | Load_Top At_Offset_0
0556 1c00 | | Execute_Immediate Run_Utility,0x0
0557 BODY_0550:
0557 00d8 | | Load_Top At_Offset_0
0558 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0559 e004 | | Load 0x0,0x4
055a 1858 | X | Execute Package,Field_Execute,Field_Number 0x58
055b 00d1 | | Pop_Control Pop_Count_1
055c e216 | | Load 0x1,0x16
055d 00d9 | | Load_Top At_Offset_1
055e 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
055f 00d8 | | Load_Top At_Offset_0
0560 e5fe | | Load 0x2,-0x2
0561 017d | } | Execute Record,Structure_Write
0562 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0563 TRAP_0550:
0563 e033 | 3 | Load 0x0,0x33
0564 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0565 010f | | Execute Exception,Equal
0566 6806 |h | Jump_Zero 0x56d
0567 e033 | 3 | Load 0x0,0x33
0568 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0569 8217 | | Call 0x1,0x17
056a e5fe | | Load 0x2,-0x2
056b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
056c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
056d 0100 | | Execute Exception,Raise
056e 0000 0000 | | .XXX[0x2]
0570 ; --------------------------------------------------------------------------------------
0570 ; SUBPROGRAM
0570 ; --------------------------------------------------------------------------------------
0570 0577 | w | .CONST 0x0577 ; Address of begin
0571 0583 | | .CONST 0x0583 ; Address of exception handler
0572 0002 | | .CONST 0x0002 ; Number of locals
0573 INIT_0570:
0573 e21b | | Load 0x1,0x1b
0574 0322 | " | Declare_Variable Record
0575 00d8 | | Load_Top At_Offset_0
0576 1c00 | | Execute_Immediate Run_Utility,0x0
0577 BODY_0570:
0577 00d8 | | Load_Top At_Offset_0
0578 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0579 e004 | | Load 0x0,0x4
057a 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59
057b 00d1 | | Pop_Control Pop_Count_1
057c e216 | | Load 0x1,0x16
057d 00d9 | | Load_Top At_Offset_1
057e 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
057f 00d8 | | Load_Top At_Offset_0
0580 e5fe | | Load 0x2,-0x2
0581 017d | } | Execute Record,Structure_Write
0582 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0583 TRAP_0570:
0583 e033 | 3 | Load 0x0,0x33
0584 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0585 010f | | Execute Exception,Equal
0586 6806 |h | Jump_Zero 0x58d
0587 e033 | 3 | Load 0x0,0x33
0588 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0589 8217 | | Call 0x1,0x17
058a e5fe | | Load 0x2,-0x2
058b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
058c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
058d 0100 | | Execute Exception,Raise
058e 0000 0000 | | .XXX[0x2]
0590 ; --------------------------------------------------------------------------------------
0590 ; SUBPROGRAM
0590 ; --------------------------------------------------------------------------------------
0590 0593 | | .CONST 0x0593 ; Address of begin
0591 059a | | .CONST 0x059a ; Address of exception handler
0592 0001 | | .CONST 0x0001 ; Number of locals
0593 BODY_0590:
0593 INIT_0590:
0593 00da | | Load_Top At_Offset_2
0594 e004 | | Load 0x0,0x4
0595 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
0596 e216 | | Load 0x1,0x16
0597 e5fe | | Load 0x2,-0x2
0598 016d | m | Execute Variant_Record,Structure_Write
0599 4502 |E | Exit_Suprogram New_Top_Offset 0x2
059a TRAP_0590:
059a e033 | 3 | Load 0x0,0x33
059b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
059c 010f | | Execute Exception,Equal
059d 6806 |h | Jump_Zero 0x5a4
059e e033 | 3 | Load 0x0,0x33
059f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05a0 8217 | | Call 0x1,0x17
05a1 e5fe | | Load 0x2,-0x2
05a2 016d | m | Execute Variant_Record,Structure_Write
05a3 4502 |E | Exit_Suprogram New_Top_Offset 0x2
05a4 0100 | | Execute Exception,Raise
05a5 0000 0000 | | .XXX[0x3]
05a7 0000 | |
05a8 ; --------------------------------------------------------------------------------------
05a8 ; SUBPROGRAM
05a8 ; --------------------------------------------------------------------------------------
05a8 05ab | | .CONST 0x05ab ; Address of begin
05a9 05b2 | | .CONST 0x05b2 ; Address of exception handler
05aa 0001 | | .CONST 0x0001 ; Number of locals
05ab BODY_05a8:
05ab INIT_05a8:
05ab 00da | | Load_Top At_Offset_2
05ac e004 | | Load 0x0,0x4
05ad 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b
05ae e216 | | Load 0x1,0x16
05af e5fe | | Load 0x2,-0x2
05b0 016d | m | Execute Variant_Record,Structure_Write
05b1 4502 |E | Exit_Suprogram New_Top_Offset 0x2
05b2 TRAP_05a8:
05b2 e033 | 3 | Load 0x0,0x33
05b3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05b4 010f | | Execute Exception,Equal
05b5 6806 |h | Jump_Zero 0x5bc
05b6 e033 | 3 | Load 0x0,0x33
05b7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05b8 8217 | | Call 0x1,0x17
05b9 e5fe | | Load 0x2,-0x2
05ba 016d | m | Execute Variant_Record,Structure_Write
05bb 4502 |E | Exit_Suprogram New_Top_Offset 0x2
05bc 0100 | | Execute Exception,Raise
05bd 0000 0000 | | .XXX[0x3]
05bf 0000 | |
05c0 ; --------------------------------------------------------------------------------------
05c0 ; SUBPROGRAM
05c0 ; --------------------------------------------------------------------------------------
05c0 05c3 | | .CONST 0x05c3 ; Address of begin
05c1 05c9 | | .CONST 0x05c9 ; Address of exception handler
05c2 0001 | | .CONST 0x0001 ; Number of locals
05c3 BODY_05c0:
05c3 INIT_05c0:
05c3 e004 | | Load 0x0,0x4
05c4 181f | | Execute Package,Field_Execute,Field_Number 0x1f
05c5 e216 | | Load 0x1,0x16
05c6 e5fe | | Load 0x2,-0x2
05c7 016d | m | Execute Variant_Record,Structure_Write
05c8 4502 |E | Exit_Suprogram New_Top_Offset 0x2
05c9 TRAP_05c0:
05c9 e033 | 3 | Load 0x0,0x33
05ca 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05cb 010f | | Execute Exception,Equal
05cc 6806 |h | Jump_Zero 0x5d3
05cd e033 | 3 | Load 0x0,0x33
05ce 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05cf 8217 | | Call 0x1,0x17
05d0 e5fe | | Load 0x2,-0x2
05d1 016d | m | Execute Variant_Record,Structure_Write
05d2 4502 |E | Exit_Suprogram New_Top_Offset 0x2
05d3 0100 | | Execute Exception,Raise
05d4 0000 0000 | | .BLANK 0000[0x4]
05d8 ; --------------------------------------------------------------------------------------
05d8 ; SUBPROGRAM
05d8 ; --------------------------------------------------------------------------------------
05d8 05db | | .CONST 0x05db ; Address of begin
05d9 05e2 | | .CONST 0x05e2 ; Address of exception handler
05da 0001 | | .CONST 0x0001 ; Number of locals
05db BODY_05d8:
05db INIT_05d8:
05db 00da | | Load_Top At_Offset_2
05dc e004 | | Load 0x0,0x4
05dd 185c | \ | Execute Package,Field_Execute,Field_Number 0x5c
05de e216 | | Load 0x1,0x16
05df e5fe | | Load 0x2,-0x2
05e0 016d | m | Execute Variant_Record,Structure_Write
05e1 4502 |E | Exit_Suprogram New_Top_Offset 0x2
05e2 TRAP_05d8:
05e2 e033 | 3 | Load 0x0,0x33
05e3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05e4 010f | | Execute Exception,Equal
05e5 6806 |h | Jump_Zero 0x5ec
05e6 e033 | 3 | Load 0x0,0x33
05e7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05e8 8217 | | Call 0x1,0x17
05e9 e5fe | | Load 0x2,-0x2
05ea 016d | m | Execute Variant_Record,Structure_Write
05eb 4502 |E | Exit_Suprogram New_Top_Offset 0x2
05ec 0100 | | Execute Exception,Raise
05ed 0000 0000 | | .XXX[0x3]
05ef 0000 | |
05f0 ; --------------------------------------------------------------------------------------
05f0 ; SUBPROGRAM
05f0 ; --------------------------------------------------------------------------------------
05f0 05f7 | | .CONST 0x05f7 ; Address of begin
05f1 0609 | | .CONST 0x0609 ; Address of exception handler
05f2 0002 | | .CONST 0x0002 ; Number of locals
05f3 INIT_05f0:
05f3 e21d | | Load 0x1,0x1d
05f4 0322 | " | Declare_Variable Record
05f5 00d8 | | Load_Top At_Offset_0
05f6 1c00 | | Execute_Immediate Run_Utility,0x0
05f7 BODY_05f0:
05f7 00e1 | | Load_Encached Boolean_Cache
05f8 00d9 | | Load_Top At_Offset_1
05f9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
05fa 00da | | Load_Top At_Offset_2
05fb 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
05fc e5ff | | Load 0x2,-0x1
05fd e004 | | Load 0x0,0x4
05fe 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
05ff 00d2 | | Pop_Control Pop_Count_2
0600 00d9 | | Load_Top At_Offset_1
0601 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0602 e216 | | Load 0x1,0x16
0603 00d9 | | Load_Top At_Offset_1
0604 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0605 00d8 | | Load_Top At_Offset_0
0606 e5fe | | Load 0x2,-0x2
0607 017d | } | Execute Record,Structure_Write
0608 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0609 TRAP_05f0:
0609 e033 | 3 | Load 0x0,0x33
060a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
060b 010f | | Execute Exception,Equal
060c 6806 |h | Jump_Zero 0x613
060d e033 | 3 | Load 0x0,0x33
060e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
060f 8217 | | Call 0x1,0x17
0610 e5fe | | Load 0x2,-0x2
0611 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0612 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0613 0100 | | Execute Exception,Raise
0614 0000 0000 | | .BLANK 0000[0x4]
0618 ; --------------------------------------------------------------------------------------
0618 ; SUBPROGRAM
0618 ; --------------------------------------------------------------------------------------
0618 061f | | .CONST 0x061f ; Address of begin
0619 062c | , | .CONST 0x062c ; Address of exception handler
061a 0002 | | .CONST 0x0002 ; Number of locals
061b INIT_0618:
061b e21b | | Load 0x1,0x1b
061c 0322 | " | Declare_Variable Record
061d 00d8 | | Load_Top At_Offset_0
061e 1c00 | | Execute_Immediate Run_Utility,0x0
061f BODY_0618:
061f 00d8 | | Load_Top At_Offset_0
0620 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0621 e5ff | | Load 0x2,-0x1
0622 e004 | | Load 0x0,0x4
0623 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
0624 00d1 | | Pop_Control Pop_Count_1
0625 e216 | | Load 0x1,0x16
0626 e5fe | | Load 0x2,-0x2
0627 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0628 00d8 | | Load_Top At_Offset_0
0629 e5fe | | Load 0x2,-0x2
062a 017d | } | Execute Record,Structure_Write
062b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
062c TRAP_0618:
062c e033 | 3 | Load 0x0,0x33
062d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
062e 010f | | Execute Exception,Equal
062f 6806 |h | Jump_Zero 0x636
0630 e033 | 3 | Load 0x0,0x33
0631 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0632 8217 | | Call 0x1,0x17
0633 e5fe | | Load 0x2,-0x2
0634 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0635 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0636 0100 | | Execute Exception,Raise
0637 0000 | | .XXX[0x1]
0638 ; --------------------------------------------------------------------------------------
0638 ; SUBPROGRAM
0638 ; --------------------------------------------------------------------------------------
0638 063f | ? | .CONST 0x063f ; Address of begin
0639 064c | L | .CONST 0x064c ; Address of exception handler
063a 0002 | | .CONST 0x0002 ; Number of locals
063b INIT_0638:
063b e21b | | Load 0x1,0x1b
063c 0322 | " | Declare_Variable Record
063d 00d8 | | Load_Top At_Offset_0
063e 1c00 | | Execute_Immediate Run_Utility,0x0
063f BODY_0638:
063f 00d8 | | Load_Top At_Offset_0
0640 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0641 e5ff | | Load 0x2,-0x1
0642 e004 | | Load 0x0,0x4
0643 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
0644 00d1 | | Pop_Control Pop_Count_1
0645 e216 | | Load 0x1,0x16
0646 e5fe | | Load 0x2,-0x2
0647 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0648 00d8 | | Load_Top At_Offset_0
0649 e5fe | | Load 0x2,-0x2
064a 017d | } | Execute Record,Structure_Write
064b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
064c TRAP_0638:
064c e033 | 3 | Load 0x0,0x33
064d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
064e 010f | | Execute Exception,Equal
064f 6806 |h | Jump_Zero 0x656
0650 e033 | 3 | Load 0x0,0x33
0651 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0652 8217 | | Call 0x1,0x17
0653 e5fe | | Load 0x2,-0x2
0654 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0655 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0656 0100 | | Execute Exception,Raise
0657 0000 | | .XXX[0x1]
0658 ; --------------------------------------------------------------------------------------
0658 ; SUBPROGRAM
0658 ; --------------------------------------------------------------------------------------
0658 065b | [ | .CONST 0x065b ; Address of begin
0659 0004 | | .CONST 0x0004 ; Address of exception handler
065a 0001 | | .CONST 0x0001 ; Number of locals
065b BODY_0658:
065b INIT_0658:
065b 00da | | Load_Top At_Offset_2
065c 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1
065d 00db | | Load_Top At_Offset_3
065e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
065f e004 | | Load 0x0,0x4
0660 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
0661 e216 | | Load 0x1,0x16
0662 e5fe | | Load 0x2,-0x2
0663 016d | m | Execute Variant_Record,Structure_Write
0664 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0665 0000 0000 | | .XXX[0x3]
0667 0000 | |
0668 ; --------------------------------------------------------------------------------------
0668 ; SUBPROGRAM
0668 ; --------------------------------------------------------------------------------------
0668 066b | k | .CONST 0x066b ; Address of begin
0669 0675 | u | .CONST 0x0675 ; Address of exception handler
066a 0001 | | .CONST 0x0001 ; Number of locals
066b BODY_0668:
066b INIT_0668:
066b 00da | | Load_Top At_Offset_2
066c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
066d 00db | | Load_Top At_Offset_3
066e 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
066f e004 | | Load 0x0,0x4
0670 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51
0671 e216 | | Load 0x1,0x16
0672 e5fe | | Load 0x2,-0x2
0673 016d | m | Execute Variant_Record,Structure_Write
0674 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0675 TRAP_0668:
0675 e033 | 3 | Load 0x0,0x33
0676 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0677 010f | | Execute Exception,Equal
0678 6806 |h | Jump_Zero 0x67f
0679 e033 | 3 | Load 0x0,0x33
067a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
067b 8217 | | Call 0x1,0x17
067c e5fe | | Load 0x2,-0x2
067d 016d | m | Execute Variant_Record,Structure_Write
067e 4502 |E | Exit_Suprogram New_Top_Offset 0x2
067f 0100 | | Execute Exception,Raise
0680 ; --------------------------------------------------------------------------------------
0680 ; SUBPROGRAM
0680 ; --------------------------------------------------------------------------------------
0680 0683 | | .CONST 0x0683 ; Address of begin
0681 0004 | | .CONST 0x0004 ; Address of exception handler
0682 0001 | | .CONST 0x0001 ; Number of locals
0683 BODY_0680:
0683 INIT_0680:
0683 00db | | Load_Top At_Offset_3
0684 60eb |` | Indirect_Literal Discrete,0x770,{0x00000000, 0x20000888}
0685 027f | | Execute Discrete,Equal
0686 7002 |p | Jump_Nonzero 0x689
0687 4801 |H | Short_Literal 0x1
0688 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0689 e5fd | | Load 0x2,-0x3
068a 0f03 | | Execute_Immediate Equal,0x3
068b 7002 |p | Jump_Nonzero 0x68e
068c 4802 |H | Short_Literal 0x2
068d 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
068e e5fc | | Load 0x2,-0x4
068f 00d8 | | Load_Top At_Offset_0
0690 4801 |H | Short_Literal 0x1
0691 4814 |H | Short_Literal 0x14
0692 0262 | b | Execute Discrete,In_Range
0693 68d4 |h | Jump_Zero 0x768
0694 0aff | | Execute_Immediate Plus,-0x1
0695 4613 |F | Jump_Case 0x14
0696 781d |x | Jump 0x6b4 ; case 0x0
0697 7826 |x& | Jump 0x6be ; case 0x1
0698 782f |x/ | Jump 0x6c8 ; case 0x2
0699 7838 |x8 | Jump 0x6d2 ; case 0x3
069a 7841 |xA | Jump 0x6dc ; case 0x4
069b 784a |xJ | Jump 0x6e6 ; case 0x5
069c 7853 |xS | Jump 0x6f0 ; case 0x6
069d 785c |x\ | Jump 0x6fa ; case 0x7
069e 7865 |xe | Jump 0x704 ; case 0x8
069f 786e |xn | Jump 0x70e ; case 0x9
06a0 7877 |xw | Jump 0x718 ; case 0xa
06a1 7880 |x | Jump 0x722 ; case 0xb
06a2 7889 |x | Jump 0x72c ; case 0xc
06a3 7892 |x | Jump 0x736 ; case 0xd
06a4 78c4 |x | Jump 0x769 ; case 0xe
06a5 789a |x | Jump 0x740 ; case 0xf
06a6 78a3 |x | Jump 0x74a ; case 0x10
06a7 78ac |x | Jump 0x754 ; case 0x11
06a8 78b5 |x | Jump 0x75e ; case 0x12
06a9 7800 |x | Jump 0x6aa ; case 0x13
06aa 00da | | Load_Top At_Offset_2
06ab e2da | | Load 0x1,0xda
06ac e2db | | Load 0x1,0xdb
06ad 1ddc | | Execute_Immediate Reference_Lex_1,0xdc
06ae 1ddd | | Execute_Immediate Reference_Lex_1,0xdd
06af 1dde | | Execute_Immediate Reference_Lex_1,0xde
06b0 1ddf | | Execute_Immediate Reference_Lex_1,0xdf
06b1 e005 | | Load 0x0,0x5
06b2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06b3 78b7 |x | Jump 0x76b
06b4 00da | | Load_Top At_Offset_2
06b5 e238 | 8 | Load 0x1,0x38
06b6 e239 | 9 | Load 0x1,0x39
06b7 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a
06b8 1d3b | ; | Execute_Immediate Reference_Lex_1,0x3b
06b9 1d3c | < | Execute_Immediate Reference_Lex_1,0x3c
06ba 1d3d | = | Execute_Immediate Reference_Lex_1,0x3d
06bb e005 | | Load 0x0,0x5
06bc 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06bd 78ad |x | Jump 0x76b
06be 00da | | Load_Top At_Offset_2
06bf e241 | A | Load 0x1,0x41
06c0 e242 | B | Load 0x1,0x42
06c1 1d43 | C | Execute_Immediate Reference_Lex_1,0x43
06c2 1d44 | D | Execute_Immediate Reference_Lex_1,0x44
06c3 1d45 | E | Execute_Immediate Reference_Lex_1,0x45
06c4 1d46 | F | Execute_Immediate Reference_Lex_1,0x46
06c5 e005 | | Load 0x0,0x5
06c6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06c7 78a3 |x | Jump 0x76b
06c8 00da | | Load_Top At_Offset_2
06c9 e24a | J | Load 0x1,0x4a
06ca e24b | K | Load 0x1,0x4b
06cb 1d4c | L | Execute_Immediate Reference_Lex_1,0x4c
06cc 1d4d | M | Execute_Immediate Reference_Lex_1,0x4d
06cd 1d4e | N | Execute_Immediate Reference_Lex_1,0x4e
06ce 1d4f | O | Execute_Immediate Reference_Lex_1,0x4f
06cf e005 | | Load 0x0,0x5
06d0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06d1 7899 |x | Jump 0x76b
06d2 00da | | Load_Top At_Offset_2
06d3 e253 | S | Load 0x1,0x53
06d4 e254 | T | Load 0x1,0x54
06d5 1d55 | U | Execute_Immediate Reference_Lex_1,0x55
06d6 1d56 | V | Execute_Immediate Reference_Lex_1,0x56
06d7 1d57 | W | Execute_Immediate Reference_Lex_1,0x57
06d8 1d58 | X | Execute_Immediate Reference_Lex_1,0x58
06d9 e005 | | Load 0x0,0x5
06da 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06db 788f |x | Jump 0x76b
06dc 00da | | Load_Top At_Offset_2
06dd e25c | \ | Load 0x1,0x5c
06de e25d | ] | Load 0x1,0x5d
06df 1d5e | ^ | Execute_Immediate Reference_Lex_1,0x5e
06e0 1d5f | _ | Execute_Immediate Reference_Lex_1,0x5f
06e1 1d60 | ` | Execute_Immediate Reference_Lex_1,0x60
06e2 1d61 | a | Execute_Immediate Reference_Lex_1,0x61
06e3 e005 | | Load 0x0,0x5
06e4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06e5 7885 |x | Jump 0x76b
06e6 00da | | Load_Top At_Offset_2
06e7 e265 | e | Load 0x1,0x65
06e8 e266 | f | Load 0x1,0x66
06e9 1d67 | g | Execute_Immediate Reference_Lex_1,0x67
06ea 1d68 | h | Execute_Immediate Reference_Lex_1,0x68
06eb 1d69 | i | Execute_Immediate Reference_Lex_1,0x69
06ec 1d6a | j | Execute_Immediate Reference_Lex_1,0x6a
06ed e005 | | Load 0x0,0x5
06ee 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06ef 787b |x{ | Jump 0x76b
06f0 00da | | Load_Top At_Offset_2
06f1 e26e | n | Load 0x1,0x6e
06f2 e26f | o | Load 0x1,0x6f
06f3 1d70 | p | Execute_Immediate Reference_Lex_1,0x70
06f4 1d71 | q | Execute_Immediate Reference_Lex_1,0x71
06f5 1d72 | r | Execute_Immediate Reference_Lex_1,0x72
06f6 1d73 | s | Execute_Immediate Reference_Lex_1,0x73
06f7 e005 | | Load 0x0,0x5
06f8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
06f9 7871 |xq | Jump 0x76b
06fa 00da | | Load_Top At_Offset_2
06fb e277 | w | Load 0x1,0x77
06fc e278 | x | Load 0x1,0x78
06fd 1d79 | y | Execute_Immediate Reference_Lex_1,0x79
06fe 1d7a | z | Execute_Immediate Reference_Lex_1,0x7a
06ff 1d7b | { | Execute_Immediate Reference_Lex_1,0x7b
0700 1d7c | | | Execute_Immediate Reference_Lex_1,0x7c
0701 e005 | | Load 0x0,0x5
0702 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0703 7867 |xg | Jump 0x76b
0704 00da | | Load_Top At_Offset_2
0705 e280 | | Load 0x1,0x80
0706 e281 | | Load 0x1,0x81
0707 1d82 | | Execute_Immediate Reference_Lex_1,0x82
0708 1d83 | | Execute_Immediate Reference_Lex_1,0x83
0709 1d84 | | Execute_Immediate Reference_Lex_1,0x84
070a 1d85 | | Execute_Immediate Reference_Lex_1,0x85
070b e005 | | Load 0x0,0x5
070c 1812 | | Execute Package,Field_Execute,Field_Number 0x12
070d 785d |x] | Jump 0x76b
070e 00da | | Load_Top At_Offset_2
070f e289 | | Load 0x1,0x89
0710 e28a | | Load 0x1,0x8a
0711 1d8b | | Execute_Immediate Reference_Lex_1,0x8b
0712 1d8c | | Execute_Immediate Reference_Lex_1,0x8c
0713 1d8d | | Execute_Immediate Reference_Lex_1,0x8d
0714 1d8e | | Execute_Immediate Reference_Lex_1,0x8e
0715 e005 | | Load 0x0,0x5
0716 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0717 7853 |xS | Jump 0x76b
0718 00da | | Load_Top At_Offset_2
0719 e292 | | Load 0x1,0x92
071a e293 | | Load 0x1,0x93
071b 1d94 | | Execute_Immediate Reference_Lex_1,0x94
071c 1d95 | | Execute_Immediate Reference_Lex_1,0x95
071d 1d96 | | Execute_Immediate Reference_Lex_1,0x96
071e 1d97 | | Execute_Immediate Reference_Lex_1,0x97
071f e005 | | Load 0x0,0x5
0720 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0721 7849 |xI | Jump 0x76b
0722 00da | | Load_Top At_Offset_2
0723 e29b | | Load 0x1,0x9b
0724 e29c | | Load 0x1,0x9c
0725 1d9d | | Execute_Immediate Reference_Lex_1,0x9d
0726 1d9e | | Execute_Immediate Reference_Lex_1,0x9e
0727 1d9f | | Execute_Immediate Reference_Lex_1,0x9f
0728 1da0 | | Execute_Immediate Reference_Lex_1,0xa0
0729 e005 | | Load 0x0,0x5
072a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
072b 783f |x? | Jump 0x76b
072c 00da | | Load_Top At_Offset_2
072d e2a4 | | Load 0x1,0xa4
072e e2a5 | | Load 0x1,0xa5
072f 1da6 | | Execute_Immediate Reference_Lex_1,0xa6
0730 1da7 | | Execute_Immediate Reference_Lex_1,0xa7
0731 1da8 | | Execute_Immediate Reference_Lex_1,0xa8
0732 1da9 | | Execute_Immediate Reference_Lex_1,0xa9
0733 e005 | | Load 0x0,0x5
0734 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0735 7835 |x5 | Jump 0x76b
0736 00da | | Load_Top At_Offset_2
0737 e2ad | | Load 0x1,0xad
0738 e2ae | | Load 0x1,0xae
0739 1daf | | Execute_Immediate Reference_Lex_1,0xaf
073a 1db0 | | Execute_Immediate Reference_Lex_1,0xb0
073b 1db1 | | Execute_Immediate Reference_Lex_1,0xb1
073c 1db2 | | Execute_Immediate Reference_Lex_1,0xb2
073d e005 | | Load 0x0,0x5
073e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
073f 782b |x+ | Jump 0x76b
0740 00da | | Load_Top At_Offset_2
0741 e2b6 | | Load 0x1,0xb6
0742 e2b7 | | Load 0x1,0xb7
0743 1db8 | | Execute_Immediate Reference_Lex_1,0xb8
0744 1db9 | | Execute_Immediate Reference_Lex_1,0xb9
0745 1dba | | Execute_Immediate Reference_Lex_1,0xba
0746 1dbb | | Execute_Immediate Reference_Lex_1,0xbb
0747 e005 | | Load 0x0,0x5
0748 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0749 7821 |x! | Jump 0x76b
074a 00da | | Load_Top At_Offset_2
074b e2bf | | Load 0x1,0xbf
074c e2c0 | | Load 0x1,0xc0
074d 1dc1 | | Execute_Immediate Reference_Lex_1,0xc1
074e 1dc2 | | Execute_Immediate Reference_Lex_1,0xc2
074f 1dc3 | | Execute_Immediate Reference_Lex_1,0xc3
0750 1dc4 | | Execute_Immediate Reference_Lex_1,0xc4
0751 e005 | | Load 0x0,0x5
0752 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0753 7817 |x | Jump 0x76b
0754 00da | | Load_Top At_Offset_2
0755 e2c8 | | Load 0x1,0xc8
0756 e2c9 | | Load 0x1,0xc9
0757 1dca | | Execute_Immediate Reference_Lex_1,0xca
0758 1dcb | | Execute_Immediate Reference_Lex_1,0xcb
0759 1dcc | | Execute_Immediate Reference_Lex_1,0xcc
075a 1dcd | | Execute_Immediate Reference_Lex_1,0xcd
075b e005 | | Load 0x0,0x5
075c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
075d 780d |x | Jump 0x76b
075e 00da | | Load_Top At_Offset_2
075f e2d1 | | Load 0x1,0xd1
0760 e2d2 | | Load 0x1,0xd2
0761 1dd3 | | Execute_Immediate Reference_Lex_1,0xd3
0762 1dd4 | | Execute_Immediate Reference_Lex_1,0xd4
0763 1dd5 | | Execute_Immediate Reference_Lex_1,0xd5
0764 1dd6 | | Execute_Immediate Reference_Lex_1,0xd6
0765 e005 | | Load 0x0,0x5
0766 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0767 7803 |x | Jump 0x76b
0768 00d1 | | Pop_Control Pop_Count_1
0769 4803 |H | Short_Literal 0x3
076a 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
076b 4800 |H | Short_Literal 0x0
076c 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
076d 0000 0000 | | .XXX[0x3]
076f 0000 | |
0770 0000 0000 | | .LITERAL {0x00000000, 0x20000888}
0774 0000 0000 | | .BLANK 0000[0x4]
0778 ; --------------------------------------------------------------------------------------
0778 ; SUBPROGRAM
0778 ; --------------------------------------------------------------------------------------
0778 077b | { | .CONST 0x077b ; Address of begin
0779 0004 | | .CONST 0x0004 ; Address of exception handler
077a 0001 | | .CONST 0x0001 ; Number of locals
077b BODY_0778:
077b INIT_0778:
077b 4800 |H | Short_Literal 0x0
077c 00db | | Load_Top At_Offset_3
077d 01d7 | | Execute Vector,Field_Read
077e 0908 | | Execute_Immediate Binary_Scale,0x8
077f 4801 |H | Short_Literal 0x1
0780 e5ff | | Load 0x2,-0x1
0781 01d7 | | Execute Vector,Field_Read
0782 0273 | s | Execute Discrete,Plus
0783 00d8 | | Load_Top At_Offset_0
0784 e20d | | Load 0x1,0xd
0785 0260 | ` | Execute Discrete,In_Type
0786 7001 |p | Jump_Nonzero 0x788
0787 0801 | | Execute_Immediate Raise,0x1
0788 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0789 0000 0000 | | .BLANK 0000[0x7]
0790 ; --------------------------------------------------------------------------------------
0790 ; Debug Table
0790 ; --------------------------------------------------------------------------------------
0790 0004 0011 | | .DEBUG4 0x0004,0x0011,0x8451,0x0000,0x0001,0x0000
0796 0000 0000 | | .BLANK 0000[0x62]
07f8 6e65 7269 |neri| .XXX[0x8]
07fa 632e 6465 |c.de|
07fc 6c65 7465 |lete|
07fe 0000 0009 | |