|
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: 12288 (0x3000) Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df
└─⟦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 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 14d8 | | .CONST 0x14d8 ; 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 000b | | .CONST 0x000b ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 01c8 | | .CONST 0x01c8 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0046 | F | .CONST 0x0046 ; Number of locals 000b INIT_0008: 000b 0007 | | Action Break_Optional ; Debug Table 0x0 = .DEBUG 0x000b,0x15ca,0x8000,0x0000,0x005a,0x1125,0x0000,0x0005 ; Debug Table 0x0.0x0 = 0xb,0xffff 000c 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x1 = 0xc,0xfffe 000d 4812 |H | Short_Literal 0x12 000e 029f 01d3 | | Declare_Subprogram INIT_01d0,For_Call 0010 03fe | | Declare_Type Discrete,Defined,Visible 0011 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x2 = 0x11,0xfffd 0012 48be |H | Short_Literal 0xbe 0013 029f 01eb | | Declare_Subprogram INIT_01e8,For_Call 0015 03fe | | Declare_Type Discrete,Defined,Visible 0016 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x3 = 0x16,0xfffc 0017 4804 |H | Short_Literal 0x4 0018 029f 0203 | | Declare_Subprogram INIT_0200,For_Call 001a 03fe | | Declare_Type Discrete,Defined,Visible 001b 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x0.0x4 = 0x1b,0xfffb 001c 00e1 | | Load_Encached Boolean_Cache 001d 00e1 | | Load_Encached Boolean_Cache 001e 00e1 | | Load_Encached Boolean_Cache 001f 00e1 | | Load_Encached Boolean_Cache 0020 00e1 | | Load_Encached Boolean_Cache 0021 00e1 | | Load_Encached Boolean_Cache 0022 02a0 | | Declare_Subprogram Null_Subprogram 0023 4807 |H | Short_Literal 0x7 0024 032e | . | Declare_Type Record,Defined,Visible 0025 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x5 = 0x25,0xfffa 0026 4805 |H | Short_Literal 0x5 0027 029f 021b | | Declare_Subprogram INIT_0218,For_Call 0029 03fe | | Declare_Type Discrete,Defined,Visible 002a 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x0.0x6 = 0x2a,0xfff9 002b 00e1 | | Load_Encached Boolean_Cache 002c 00e1 | | Load_Encached Boolean_Cache 002d 00e1 | | Load_Encached Boolean_Cache 002e 00e1 | | Load_Encached Boolean_Cache 002f 00e1 | | Load_Encached Boolean_Cache 0030 00e1 | | Load_Encached Boolean_Cache 0031 00e1 | | Load_Encached Boolean_Cache 0032 00e1 | | Load_Encached Boolean_Cache 0033 02a0 | | Declare_Subprogram Null_Subprogram 0034 4809 |H | Short_Literal 0x9 0035 032e | . | Declare_Type Record,Defined,Visible 0036 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x7 = 0x36,0xfff8 0037 4803 |H | Short_Literal 0x3 0038 029f 0233 | 3| Declare_Subprogram INIT_0230,For_Call 003a 03fe | | Declare_Type Discrete,Defined,Visible 003b 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x0.0x8 = 0x3b,0xfff7 003c 00e1 | | Load_Encached Boolean_Cache 003d 00e1 | | Load_Encached Boolean_Cache 003e 02a0 | | Declare_Subprogram Null_Subprogram 003f 4803 |H | Short_Literal 0x3 0040 032e | . | Declare_Type Record,Defined,Visible 0041 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x0.0x9 = 0x41,0xfff6 0042 00e1 | | Load_Encached Boolean_Cache 0043 02a0 | | Declare_Subprogram Null_Subprogram 0044 4802 |H | Short_Literal 0x2 0045 032e | . | Declare_Type Record,Defined,Visible 0046 0007 | | Action Break_Optional ; Debug Table 0x0.0xa = 0x46,0xfff5 0047 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0xb = 0x47,0xfff4 0048 48ff |H | Short_Literal 0xff 0049 00e2 | | Load_Encached Integer_Cache 004a 03f9 | | Declare_Type Discrete,Constrained,Visible 004b 4801 |H | Short_Literal 0x1 ; Debug Table 0x0.0xc = 0x4b,0xfff3 004c 48ff |H | Short_Literal 0xff 004d 00da | | Load_Top At_Offset_2 004e 03f9 | | Declare_Type Discrete,Constrained,Visible 004f 0007 | | Action Break_Optional ; Debug Table 0x0.0xd = 0x4f,0xfff2 0050 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0xe = 0x50,0xfff1 0051 4801 |H | Short_Literal 0x1 0052 029f 024b | K| Declare_Subprogram INIT_0248,For_Call 0054 03fe | | Declare_Type Discrete,Defined,Visible 0055 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0xf = 0x55,0xfff0 0056 4801 |H | Short_Literal 0x1 0057 029f 0263 | c| Declare_Subprogram INIT_0260,For_Call 0059 03fe | | Declare_Type Discrete,Defined,Visible 005a 4879 |Hy | Short_Literal 0x79 ; Debug Table 0x0.0x10 = 0x5a,0xffef 005b 4889 |H | Short_Literal 0x89 005c e20e | | Load 0x1,0xe 005d 03f9 | | Declare_Type Discrete,Constrained,Visible 005e 4879 |Hy | Short_Literal 0x79 ; Debug Table 0x0.0x11 = 0x5e,0xffee 005f 487c |H| | Short_Literal 0x7c 0060 00da | | Load_Top At_Offset_2 0061 03f9 | | Declare_Type Discrete,Constrained,Visible 0062 e20e | | Load 0x1,0xe ; Debug Table 0x0.0x12 = 0x62,0xffed 0063 4802 |H | Short_Literal 0x2 0064 e218 | | Load 0x1,0x18 0065 e219 | | Load 0x1,0x19 0066 029f 027b | {| Declare_Subprogram INIT_0278,For_Call 0068 4802 |H | Short_Literal 0x2 0069 4800 |H | Short_Literal 0x0 006a 4801 |H | Short_Literal 0x1 006b 4800 |H | Short_Literal 0x0 006c 4801 |H | Short_Literal 0x1 006d 031e | | Declare_Type Variant_Record,Defined,Visible 006e e20d | | Load 0x1,0xd ; Debug Table 0x0.0x13 = 0x6e,0xffec 006f e20e | | Load 0x1,0xe 0070 4801 |H | Short_Literal 0x1 0071 4801 |H | Short_Literal 0x1 0072 e216 | | Load 0x1,0x16 0073 4801 |H | Short_Literal 0x1 0074 4801 |H | Short_Literal 0x1 0075 e216 | | Load 0x1,0x16 0076 4802 |H | Short_Literal 0x2 0077 4801 |H | Short_Literal 0x1 0078 e216 | | Load 0x1,0x16 0079 e21c | | Load 0x1,0x1c 007a 029f 02c3 | | Declare_Subprogram INIT_02c0,For_Call 007c 4804 |H | Short_Literal 0x4 007d 4800 |H | Short_Literal 0x0 007e 4800 |H | Short_Literal 0x0 007f 4803 |H | Short_Literal 0x3 0080 4801 |H | Short_Literal 0x1 0081 4802 |H | Short_Literal 0x2 0082 031e | | Declare_Type Variant_Record,Defined,Visible 0083 e20d | | Load 0x1,0xd ; Debug Table 0x0.0x14 = 0x83,0xffeb 0084 e20e | | Load 0x1,0xe 0085 4801 |H | Short_Literal 0x1 0086 4800 |H | Short_Literal 0x0 0087 e21d | | Load 0x1,0x1d 0088 029f 0373 | s| Declare_Subprogram INIT_0370,For_Call 008a 4801 |H | Short_Literal 0x1 008b 4800 |H | Short_Literal 0x0 008c 4800 |H | Short_Literal 0x0 008d 4801 |H | Short_Literal 0x1 008e 4801 |H | Short_Literal 0x1 008f 4802 |H | Short_Literal 0x2 0090 031e | | Declare_Type Variant_Record,Defined,Visible 0091 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x15 = 0x91,0xffea 0092 480f |H | Short_Literal 0xf 0093 00e2 | | Load_Encached Integer_Cache 0094 03f9 | | Declare_Type Discrete,Constrained,Visible 0095 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x16 = 0x95,0xffe9 0096 49ff |I | Short_Literal 0x1ff 0097 00e2 | | Load_Encached Integer_Cache 0098 03f9 | | Declare_Type Discrete,Constrained,Visible 0099 4f00 |O | Short_Literal -0x100 ; Debug Table 0x0.0x17 = 0x99,0xffe8 009a 48ff |H | Short_Literal 0xff 009b 00e2 | | Load_Encached Integer_Cache 009c 03f9 | | Declare_Type Discrete,Constrained,Visible 009d 00da | | Load_Top At_Offset_2 ; Debug Table 0x0.0x18 = 0x9d,0xffe7 009e 4801 |H | Short_Literal 0x1 009f 00db | | Load_Top At_Offset_3 00a0 4801 |H | Short_Literal 0x1 00a1 e221 | ! | Load 0x1,0x21 00a2 029f 03e3 | | Declare_Subprogram INIT_03e0,For_Call 00a4 4802 |H | Short_Literal 0x2 00a5 4800 |H | Short_Literal 0x0 00a6 4802 |H | Short_Literal 0x2 00a7 4800 |H | Short_Literal 0x0 00a8 4801 |H | Short_Literal 0x1 00a9 031e | | Declare_Type Variant_Record,Defined,Visible 00aa 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x19 = 0xaa,0xffe6 00ab 48ff |H | Short_Literal 0xff 00ac 00e2 | | Load_Encached Integer_Cache 00ad 03f9 | | Declare_Type Discrete,Constrained,Visible 00ae 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x1a = 0xae,0xffe5 00af 48ff |H | Short_Literal 0xff 00b0 00e2 | | Load_Encached Integer_Cache 00b1 03f9 | | Declare_Type Discrete,Constrained,Visible 00b2 4c00 |L | Short_Literal -0x400 ; Debug Table 0x0.0x1b = 0xb2,0xffe4 00b3 4bff |K | Short_Literal 0x3ff 00b4 00e2 | | Load_Encached Integer_Cache 00b5 03f9 | | Declare_Type Discrete,Constrained,Visible 00b6 4e00 |N | Short_Literal -0x200 ; Debug Table 0x0.0x1c = 0xb6,0xffe3 00b7 4fff |O | Short_Literal -0x1 00b8 00da | | Load_Top At_Offset_2 00b9 03f9 | | Declare_Type Discrete,Constrained,Visible 00ba 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x1d = 0xba,0xffe2 00bb 49ff |I | Short_Literal 0x1ff 00bc 00e2 | | Load_Encached Integer_Cache 00bd 03f9 | | Declare_Type Discrete,Constrained,Visible 00be 4ffa |O | Short_Literal -0x6 ; Debug Table 0x0.0x1e = 0xbe,0xffe1 00bf 4800 |H | Short_Literal 0x0 00c0 00e2 | | Load_Encached Integer_Cache 00c1 03f9 | | Declare_Type Discrete,Constrained,Visible 00c2 4801 |H | Short_Literal 0x1 ; Debug Table 0x0.0x1f = 0xc2,0xffe0 00c3 4807 |H | Short_Literal 0x7 00c4 00e2 | | Load_Encached Integer_Cache 00c5 03f9 | | Declare_Type Discrete,Constrained,Visible 00c6 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x20 = 0xc6,0xffdf 00c7 481f |H | Short_Literal 0x1f 00c8 00e2 | | Load_Encached Integer_Cache 00c9 03f9 | | Declare_Type Discrete,Constrained,Visible 00ca 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x21 = 0xca,0xffde 00cb 4807 |H | Short_Literal 0x7 00cc 00e2 | | Load_Encached Integer_Cache 00cd 03f9 | | Declare_Type Discrete,Constrained,Visible 00ce 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x22 = 0xce,0xffdd 00cf 629c |b | Indirect_Literal Discrete,0x36c,{0x00000000, 0x00000fff} 00d0 00e2 | | Load_Encached Integer_Cache 00d1 03f9 | | Declare_Type Discrete,Constrained,Visible 00d2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x23 = 0xd2,0xffdc 00d3 00da | | Load_Top At_Offset_2 00d4 02a0 | | Declare_Subprogram Null_Subprogram 00d5 4802 |H | Short_Literal 0x2 00d6 032e | . | Declare_Type Record,Defined,Visible 00d7 e20d | | Load 0x1,0xd ; Debug Table 0x0.0x24 = 0xd7,0xffdb 00d8 4801 |H | Short_Literal 0x1 00d9 e001 | | Load 0x0,0x1 00da 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00db 4801 |H | Short_Literal 0x1 00dc e001 | | Load 0x0,0x1 00dd 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00de 4801 |H | Short_Literal 0x1 00df e001 | | Load 0x0,0x1 00e0 1b11 | | Execute Package,Field_Read,Field_Number 0x11 00e1 029f 042b | +| Declare_Subprogram INIT_0428,For_Call 00e3 4803 |H | Short_Literal 0x3 00e4 4800 |H | Short_Literal 0x0 00e5 4803 |H | Short_Literal 0x3 00e6 4800 |H | Short_Literal 0x0 00e7 4801 |H | Short_Literal 0x1 00e8 031e | | Declare_Type Variant_Record,Defined,Visible 00e9 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x25 = 0xe9,0xffda 00ea 48ff |H | Short_Literal 0xff 00eb 00e2 | | Load_Encached Integer_Cache 00ec 03f9 | | Declare_Type Discrete,Constrained,Visible 00ed 4f80 |O | Short_Literal -0x80 ; Debug Table 0x0.0x26 = 0xed,0xffd9 00ee 487f |H | Short_Literal 0x7f 00ef 00e2 | | Load_Encached Integer_Cache 00f0 03f9 | | Declare_Type Discrete,Constrained,Visible 00f1 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x0.0x27 = 0xf1,0xffd8 00f2 4801 |H | Short_Literal 0x1 00f3 00da | | Load_Top At_Offset_2 00f4 4801 |H | Short_Literal 0x1 00f5 e22f | / | Load 0x1,0x2f 00f6 029f 0483 | | Declare_Subprogram INIT_0480,For_Call 00f8 4802 |H | Short_Literal 0x2 00f9 4800 |H | Short_Literal 0x0 00fa 4802 |H | Short_Literal 0x2 00fb 4800 |H | Short_Literal 0x0 00fc 4801 |H | Short_Literal 0x1 00fd 031e | | Declare_Type Variant_Record,Defined,Visible 00fe 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x28 = 0xfe,0xffd7 00ff 6268 |bh | Indirect_Literal Discrete,0x368,{0x00000000, 0x0000ffff} 0100 00e2 | | Load_Encached Integer_Cache 0101 03f9 | | Declare_Type Discrete,Constrained,Visible 0102 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x29 = 0x102,0xffd6 0103 4801 |H | Short_Literal 0x1 0104 029f 04bb | | Declare_Subprogram INIT_04b8,For_Call 0106 03fe | | Declare_Type Discrete,Defined,Visible 0107 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x2a = 0x107,0xffd5 0108 4801 |H | Short_Literal 0x1 0109 00db | | Load_Top At_Offset_3 010a 4801 |H | Short_Literal 0x1 010b e22d | - | Load 0x1,0x2d 010c 029f 04d3 | | Declare_Subprogram INIT_04d0,For_Call 010e 4802 |H | Short_Literal 0x2 010f 4800 |H | Short_Literal 0x0 0110 4802 |H | Short_Literal 0x2 0111 4800 |H | Short_Literal 0x0 0112 4801 |H | Short_Literal 0x1 0113 031e | | Declare_Type Variant_Record,Defined,Visible 0114 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x2b = 0x114,0xffd4 0115 483c |H< | Short_Literal 0x3c 0116 029f 050b | | Declare_Subprogram INIT_0508,For_Call 0118 03fe | | Declare_Type Discrete,Defined,Visible 0119 4815 |H | Short_Literal 0x15 ; Debug Table 0x0.0x2c = 0x119,0xffd3 011a 4819 |H | Short_Literal 0x19 011b 00da | | Load_Top At_Offset_2 011c 03f9 | | Declare_Type Discrete,Constrained,Visible 011d 481c |H | Short_Literal 0x1c ; Debug Table 0x0.0x2d = 0x11d,0xffd2 011e 4824 |H$ | Short_Literal 0x24 011f 00db | | Load_Top At_Offset_3 0120 03f9 | | Declare_Type Discrete,Constrained,Visible 0121 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x2e = 0x121,0xffd1 0122 481f |H | Short_Literal 0x1f 0123 029f 0523 | #| Declare_Subprogram INIT_0520,For_Call 0125 03fe | | Declare_Type Discrete,Defined,Visible 0126 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x2f = 0x126,0xffd0 0127 4803 |H | Short_Literal 0x3 0128 e20d | | Load 0x1,0xd 0129 e20f | | Load 0x1,0xf 012a e210 | | Load 0x1,0x10 012b 4802 |H | Short_Literal 0x2 012c e20d | | Load 0x1,0xd 012d e211 | | Load 0x1,0x11 012e 4802 |H | Short_Literal 0x2 012f e20d | | Load 0x1,0xd 0130 e212 | | Load 0x1,0x12 0131 4802 |H | Short_Literal 0x2 0132 e213 | | Load 0x1,0x13 0133 e214 | | Load 0x1,0x14 0134 4801 |H | Short_Literal 0x1 0135 e222 | " | Load 0x1,0x22 0136 4802 |H | Short_Literal 0x2 0137 e223 | # | Load 0x1,0x23 0138 e215 | | Load 0x1,0x15 0139 4801 |H | Short_Literal 0x1 013a e224 | $ | Load 0x1,0x24 013b 4801 |H | Short_Literal 0x1 013c e21e | | Load 0x1,0x1e 013d 4801 |H | Short_Literal 0x1 013e e235 | 5 | Load 0x1,0x35 013f 4802 |H | Short_Literal 0x2 0140 e20e | | Load 0x1,0xe 0141 e231 | 1 | Load 0x1,0x31 0142 4801 |H | Short_Literal 0x1 0143 e225 | % | Load 0x1,0x25 0144 4801 |H | Short_Literal 0x1 0145 e227 | ' | Load 0x1,0x27 0146 4801 |H | Short_Literal 0x1 0147 e229 | ) | Load 0x1,0x29 0148 4801 |H | Short_Literal 0x1 0149 e001 | | Load 0x0,0x1 014a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 014b 4802 |H | Short_Literal 0x2 014c e20d | | Load 0x1,0xd 014d e225 | % | Load 0x1,0x25 014e 4801 |H | Short_Literal 0x1 014f e228 | ( | Load 0x1,0x28 0150 4802 |H | Short_Literal 0x2 0151 e20d | | Load 0x1,0xd 0152 e228 | ( | Load 0x1,0x28 0153 4801 |H | Short_Literal 0x1 0154 e22a | * | Load 0x1,0x2a 0155 4801 |H | Short_Literal 0x1 0156 e234 | 4 | Load 0x1,0x34 0157 4801 |H | Short_Literal 0x1 0158 e22e | . | Load 0x1,0x2e 0159 4801 |H | Short_Literal 0x1 015a e22d | - | Load 0x1,0x2d 015b 4801 |H | Short_Literal 0x1 015c e232 | 2 | Load 0x1,0x32 015d 029f 053b | ;| Declare_Subprogram INIT_0538,For_Call 015f 481f |H | Short_Literal 0x1f 0160 4800 |H | Short_Literal 0x0 0161 4816 |H | Short_Literal 0x16 0162 4800 |H | Short_Literal 0x0 0163 4801 |H | Short_Literal 0x1 0164 031e | | Declare_Type Variant_Record,Defined,Visible 0165 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x30 = 0x165,0xffcf 0166 4807 |H | Short_Literal 0x7 0167 00da | | Load_Top At_Offset_2 0168 029f 0633 | 3| Declare_Subprogram INIT_0630,For_Call 016a 4801 |H | Short_Literal 0x1 016b 035e | ^ | Declare_Type Array,Defined,Visible 016c e22c | , | Load 0x1,0x2c ; Debug Table 0x0.0x31 = 0x16c,0xffce 016d 0266 | f | Execute Discrete,Bounds 016e 00da | | Load_Top At_Offset_2 016f 029f 064b | K| Declare_Subprogram INIT_0648,For_Call 0171 4801 |H | Short_Literal 0x1 0172 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object 0173 480c |H | Short_Literal 0xc ; Debug Table 0x0.0x32 = 0x173,0xffcd 0174 00db | | Load_Top At_Offset_3 0175 1c08 | | Execute_Immediate Run_Utility,0x8 0176 4800 |H | Short_Literal 0x0 0177 00d9 | | Load_Top At_Offset_1 0178 2a10 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x10 0179 0129 | ) | Execute Any,Make_Visible 017a 480c |H | Short_Literal 0xc ; Debug Table 0x0.0x33 = 0x17a,0xffcc 017b e239 | 9 | Load 0x1,0x39 017c 1c08 | | Execute_Immediate Run_Utility,0x8 017d 4801 |H | Short_Literal 0x1 017e 00d9 | | Load_Top At_Offset_1 017f 2a10 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x10 0180 0129 | ) | Execute Any,Make_Visible 0181 00db | | Load_Top At_Offset_3 ; Debug Table 0x0.0x34 = 0x181,0xffcb 0182 0336 | 6 | Declare_Variable Array,Visible 0183 e23a | : | Load 0x1,0x3a 0184 0337 | 7 | Declare_Variable Array 0185 4807 |H | Short_Literal 0x7 0186 4800 |H | Short_Literal 0x0 0187 e23d | = | Load 0x1,0x3d 0188 00d9 | | Load_Top At_Offset_1 0189 e23f | ? | Load 0x1,0x3f 018a 01d6 | | Execute Vector,Field_Write 018b 3ffb |? | Loop_Increasing 0x187 018c e23a | : | Load 0x1,0x3a 018d 01c3 | | Execute Vector,Check_In_Type 018e 00d9 | | Load_Top At_Offset_1 018f 01d4 | | Execute Vector,Structure_Write 0190 029a 0663 | c| Declare_Subprogram INIT_0660,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x35 = 0x190,0xffca 0192 029a 06bb | | Declare_Subprogram INIT_06b8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x36 = 0x192,0xffc9 0194 029a 0733 | 3| Declare_Subprogram INIT_0730,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x37 = 0x194,0xffc8 0196 029a 0753 | S| Declare_Subprogram INIT_0750,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x38 = 0x196,0xffc7 0198 0007 | | Action Break_Optional ; Debug Table 0x0.0x39 = 0x198,0xffc6 0199 0007 | | Action Break_Optional ; Debug Table 0x0.0x3a = 0x199,0xffc5 019a 0007 | | Action Break_Optional ; Debug Table 0x0.0x3b = 0x19a,0xffc4 019b 0007 | | Action Break_Optional ; Debug Table 0x0.0x3c = 0x19b,0xffc3 019c 0007 | | Action Break_Optional ; Debug Table 0x0.0x3d = 0x19c,0xffc2 019d 0007 | | Action Break_Optional ; Debug Table 0x0.0x3e = 0x19d,0xffc1 019e 0007 | | Action Break_Optional ; Debug Table 0x0.0x3f = 0x19e,0xffc0 019f 0007 | | Action Break_Optional ; Debug Table 0x0.0x40 = 0x19f,0xffbf 01a0 0007 | | Action Break_Optional ; Debug Table 0x0.0x41 = 0x1a0,0xffbe 01a1 0007 | | Action Break_Optional ; Debug Table 0x0.0x42 = 0x1a1,0xffbd 01a2 0007 | | Action Break_Optional ; Debug Table 0x0.0x43 = 0x1a2,0xffbc 01a3 0007 | | Action Break_Optional ; Debug Table 0x0.0x44 = 0x1a3,0xffbb 01a4 0007 | | Action Break_Optional ; Debug Table 0x0.0x45 = 0x1a4,0xffba 01a5 0007 | | Action Break_Optional ; Debug Table 0x0.0x46 = 0x1a5,0xffb9 01a6 0007 | | Action Break_Optional ; Debug Table 0x0.0x47 = 0x1a6,0xffb8 01a7 0007 | | Action Break_Optional ; Debug Table 0x0.0x48 = 0x1a7,0xffb7 01a8 0007 | | Action Break_Optional ; Debug Table 0x0.0x49 = 0x1a8,0xffb6 01a9 0007 | | Action Break_Optional ; Debug Table 0x0.0x4a = 0x1a9,0xffb5 01aa 0007 | | Action Break_Optional ; Debug Table 0x0.0x4b = 0x1aa,0xffb4 01ab 0007 | | Action Break_Optional ; Debug Table 0x0.0x4c = 0x1ab,0xffb3 01ac 0007 | | Action Break_Optional ; Debug Table 0x0.0x4d = 0x1ac,0xffb2 01ad 0007 | | Action Break_Optional ; Debug Table 0x0.0x4e = 0x1ad,0xffb1 01ae 0007 | | Action Break_Optional ; Debug Table 0x0.0x4f = 0x1ae,0xffb0 01af 0007 | | Action Break_Optional ; Debug Table 0x0.0x50 = 0x1af,0xffaf 01b0 0007 | | Action Break_Optional ; Debug Table 0x0.0x51 = 0x1b0,0xffae 01b1 0007 | | Action Break_Optional ; Debug Table 0x0.0x52 = 0x1b1,0xffad 01b2 0007 | | Action Break_Optional ; Debug Table 0x0.0x53 = 0x1b2,0xffac 01b3 0007 | | Action Break_Optional ; Debug Table 0x0.0x54 = 0x1b3,0xffab 01b4 0007 | | Action Break_Optional ; Debug Table 0x0.0x55 = 0x1b4,0xffaa 01b5 0007 | | Action Break_Optional ; Debug Table 0x0.0x56 = 0x1b5,0xffa9 01b6 0007 | | Action Break_Optional ; Debug Table 0x0.0x57 = 0x1b6,0xffa8 01b7 00bf | | Action Accept_Activation ; Debug Table 0x0.0x58 = 0x1b7,0xffa7 01b8 029d 0763 | c| Declare_Subprogram INIT_0760,For_Outer_Call ; Debug Table 0x1 = .DEBUG 0x01b8,0x167e,0x8000,0x0000,0x005a,0x3425,0x0000,0x0003 ; Debug Table 0x1.0x0 = 0x1b8,0xffff 01ba 029d 07a3 | | Declare_Subprogram INIT_07a0,For_Outer_Call ; Debug Table 0x1.0x1 = 0x1ba,0xfffe 01bc 1d3f | ? | Execute_Immediate Reference_Lex_1,0x3f ; Debug Table 0x1.0x2 = 0x1bc,0xfffd 01bd 00c7 | | Action Elaborate_Subprogram 01be 029d 0873 | s| Declare_Subprogram INIT_0870,For_Outer_Call ; Debug Table 0x1.0x3 = 0x1be,0xfffc 01c0 029d 09bb | | Declare_Subprogram INIT_09b8,For_Outer_Call ; Debug Table 0x1.0x4 = 0x1c0,0xfffb 01c2 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40 ; Debug Table 0x1.0x5 = 0x1c2,0xfffa 01c3 00c7 | | Action Elaborate_Subprogram 01c4 1d41 | A | Execute_Immediate Reference_Lex_1,0x41 ; Debug Table 0x1.0x6 = 0x1c4,0xfff9 01c5 00c7 | | Action Elaborate_Subprogram 01c6 1d42 | B | Execute_Immediate Reference_Lex_1,0x42 ; Debug Table 0x1.0x7 = 0x1c6,0xfff8 01c7 00c7 | | Action Elaborate_Subprogram 01c8 BODY_0008: 01c8 00bc | | Action Signal_Activated 01c9 00bb | | Action Signal_Completion 01ca 0000 0000 | | .BLANK 0000[0x6] 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 4603 |F | Jump_Case 0x4 ; Debug Table 0x2 = .DEBUG 0x01d3,0x1690,0x0005,0x0000,0x005a,0x1125,0x0000,0x000a 01d4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 01d5 7802 |x | Jump 0x1d8 ; case 0x1 01d6 7805 |x | Jump 0x1dc ; case 0x2 01d7 7809 |x | Jump 0x1e1 ; case 0x3 01d8 00da | | Load_Top At_Offset_2 01d9 0091 0a0f | | Action Push_String_Extended_Indexed,0xa0f ; "DISCRETE_CLASS" 01db 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 01dc 00db | | Load_Top At_Offset_3 01dd 00db | | Load_Top At_Offset_3 01de 00e0 | | Load_Encached Standard_Cache 01df 181b | | Execute Package,Field_Execute,Field_Number 0x1b 01e0 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01e1 00da | | Load_Top At_Offset_2 01e2 00e0 | | Load_Encached Standard_Cache 01e3 181c | | Execute Package,Field_Execute,Field_Number 0x1c 01e4 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 01e5 0000 0000 | | .XXX[0x3] 01e7 0000 | | 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; SUBPROGRAM 01e8 ; -------------------------------------------------------------------------------------- 01e8 01eb | | .CONST 0x01eb ; Address of begin 01e9 0004 | | .CONST 0x0004 ; Address of exception handler 01ea 0001 | | .CONST 0x0001 ; Number of locals 01eb BODY_01e8: 01eb INIT_01e8: 01eb 4603 |F | Jump_Case 0x4 ; Debug Table 0x3 = .DEBUG 0x01eb,0x1692,0x0005,0x0000,0x005a,0x1125,0x0000,0x0021 01ec 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 01ed 7802 |x | Jump 0x1f0 ; case 0x1 01ee 7805 |x | Jump 0x1f4 ; case 0x2 01ef 7809 |x | Jump 0x1f9 ; case 0x3 01f0 00da | | Load_Top At_Offset_2 01f1 0091 0a22 | "| Action Push_String_Extended_Indexed,0xa22 ; "EQUAL_OP" 01f3 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 01f4 00db | | Load_Top At_Offset_3 01f5 00db | | Load_Top At_Offset_3 01f6 00e0 | | Load_Encached Standard_Cache 01f7 181b | | Execute Package,Field_Execute,Field_Number 0x1b 01f8 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 01f9 00da | | Load_Top At_Offset_2 01fa 00e0 | | Load_Encached Standard_Cache 01fb 181c | | Execute Package,Field_Execute,Field_Number 0x1c 01fc 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 01fd 0000 0000 | | .XXX[0x3] 01ff 0000 | | 0200 ; -------------------------------------------------------------------------------------- 0200 ; SUBPROGRAM 0200 ; -------------------------------------------------------------------------------------- 0200 0203 | | .CONST 0x0203 ; Address of begin 0201 0004 | | .CONST 0x0004 ; Address of exception handler 0202 0001 | | .CONST 0x0001 ; Number of locals 0203 BODY_0200: 0203 INIT_0200: 0203 4603 |F | Jump_Case 0x4 ; Debug Table 0x4 = .DEBUG 0x0203,0x1694,0x0005,0x0000,0x005a,0x1125,0x0000,0x00e4 0204 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0205 7802 |x | Jump 0x208 ; case 0x1 0206 7805 |x | Jump 0x20c ; case 0x2 0207 7809 |x | Jump 0x211 ; case 0x3 0208 00da | | Load_Top At_Offset_2 0209 0091 0ae1 | | Action Push_String_Extended_Indexed,0xae1 ; "DEFINED" 020b 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 020c 00db | | Load_Top At_Offset_3 020d 00db | | Load_Top At_Offset_3 020e 00e0 | | Load_Encached Standard_Cache 020f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0210 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0211 00da | | Load_Top At_Offset_2 0212 00e0 | | Load_Encached Standard_Cache 0213 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0214 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0215 0000 0000 | | .XXX[0x3] 0217 0000 | | 0218 ; -------------------------------------------------------------------------------------- 0218 ; SUBPROGRAM 0218 ; -------------------------------------------------------------------------------------- 0218 021b | | .CONST 0x021b ; Address of begin 0219 0004 | | .CONST 0x0004 ; Address of exception handler 021a 0001 | | .CONST 0x0001 ; Number of locals 021b BODY_0218: 021b INIT_0218: 021b 4603 |F | Jump_Case 0x4 ; Debug Table 0x5 = .DEBUG 0x021b,0x1696,0x0005,0x0000,0x005a,0x1125,0x0000,0x0114 021c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 021d 7802 |x | Jump 0x220 ; case 0x1 021e 7805 |x | Jump 0x224 ; case 0x2 021f 7809 |x | Jump 0x229 ; case 0x3 0220 00da | | Load_Top At_Offset_2 0221 0091 0ae6 | | Action Push_String_Extended_Indexed,0xae6 ; "BY_DEFINING" 0223 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0224 00db | | Load_Top At_Offset_3 0225 00db | | Load_Top At_Offset_3 0226 00e0 | | Load_Encached Standard_Cache 0227 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0228 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0229 00da | | Load_Top At_Offset_2 022a 00e0 | | Load_Encached Standard_Cache 022b 181c | | Execute Package,Field_Execute,Field_Number 0x1c 022c 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 022d 0000 0000 | | .XXX[0x3] 022f 0000 | | 0230 ; -------------------------------------------------------------------------------------- 0230 ; SUBPROGRAM 0230 ; -------------------------------------------------------------------------------------- 0230 0233 | 3 | .CONST 0x0233 ; Address of begin 0231 0004 | | .CONST 0x0004 ; Address of exception handler 0232 0001 | | .CONST 0x0001 ; Number of locals 0233 BODY_0230: 0233 INIT_0230: 0233 4603 |F | Jump_Case 0x4 ; Debug Table 0x6 = .DEBUG 0x0233,0x1698,0x0005,0x0000,0x005a,0x1125,0x0000,0x014f 0234 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0235 7802 |x | Jump 0x238 ; case 0x1 0236 7805 |x | Jump 0x23c ; case 0x2 0237 7809 |x | Jump 0x241 ; case 0x3 0238 00da | | Load_Top At_Offset_2 0239 0091 0aec | | Action Push_String_Extended_Indexed,0xaec ; "FOR_CALL" 023b 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 023c 00db | | Load_Top At_Offset_3 023d 00db | | Load_Top At_Offset_3 023e 00e0 | | Load_Encached Standard_Cache 023f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0240 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0241 00da | | Load_Top At_Offset_2 0242 00e0 | | Load_Encached Standard_Cache 0243 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0244 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0245 0000 0000 | | .XXX[0x3] 0247 0000 | | 0248 ; -------------------------------------------------------------------------------------- 0248 ; SUBPROGRAM 0248 ; -------------------------------------------------------------------------------------- 0248 024b | K | .CONST 0x024b ; Address of begin 0249 0004 | | .CONST 0x0004 ; Address of exception handler 024a 0001 | | .CONST 0x0001 ; Number of locals 024b BODY_0248: 024b INIT_0248: 024b 4603 |F | Jump_Case 0x4 ; Debug Table 0x7 = .DEBUG 0x024b,0x169a,0x0005,0x0000,0x005a,0x1125,0x0000,0x01a0 024c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 024d 7802 |x | Jump 0x250 ; case 0x1 024e 7805 |x | Jump 0x254 ; case 0x2 024f 7809 |x | Jump 0x259 ; case 0x3 0250 00da | | Load_Top At_Offset_2 0251 0091 0af0 | | Action Push_String_Extended_Indexed,0xaf0 ; "FIXED" 0253 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0254 00db | | Load_Top At_Offset_3 0255 00db | | Load_Top At_Offset_3 0256 00e0 | | Load_Encached Standard_Cache 0257 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0258 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0259 00da | | Load_Top At_Offset_2 025a 00e0 | | Load_Encached Standard_Cache 025b 181c | | Execute Package,Field_Execute,Field_Number 0x1c 025c 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 025d 0000 0000 | | .XXX[0x3] 025f 0000 | | 0260 ; -------------------------------------------------------------------------------------- 0260 ; SUBPROGRAM 0260 ; -------------------------------------------------------------------------------------- 0260 0263 | c | .CONST 0x0263 ; Address of begin 0261 0004 | | .CONST 0x0004 ; Address of exception handler 0262 0001 | | .CONST 0x0001 ; Number of locals 0263 BODY_0260: 0263 INIT_0260: 0263 4603 |F | Jump_Case 0x4 ; Debug Table 0x8 = .DEBUG 0x0263,0x169c,0x0005,0x0000,0x005a,0x1125,0x0000,0x01a6 0264 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0265 7802 |x | Jump 0x268 ; case 0x1 0266 7805 |x | Jump 0x26c ; case 0x2 0267 7809 |x | Jump 0x271 ; case 0x3 0268 00da | | Load_Top At_Offset_2 0269 0091 0af2 | | Action Push_String_Extended_Indexed,0xaf2 ; "DIRECT" 026b 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 026c 00db | | Load_Top At_Offset_3 026d 00db | | Load_Top At_Offset_3 026e 00e0 | | Load_Encached Standard_Cache 026f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0270 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0271 00da | | Load_Top At_Offset_2 0272 00e0 | | Load_Encached Standard_Cache 0273 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0274 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0275 0000 0000 | | .XXX[0x3] 0277 0000 | | 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 ; Debug Table 0x9 = .DEBUG 0x027b,0x169e,0x0005,0x0000,0x005a,0x1125,0x0000,0x01ba 027c 7808 |x | Jump 0x285 ; case 0x0 027d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 027e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 027f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0280 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0281 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 0282 7817 |x | Jump 0x29a ; case 0x6 0283 7822 |x" | Jump 0x2a6 ; case 0x7 0284 7830 |x0 | Jump 0x2b5 ; case 0x8 0285 00da | | Load_Top At_Offset_2 0286 016c | l | Execute Variant_Record,Is_Constrained 0287 7009 |p | Jump_Nonzero 0x291 0288 00cf | | Action Mark_Auxiliary 0289 4800 |H | Short_Literal 0x0 028a e5ff | | Load 0x2,-0x1 028b 1c08 | | Execute_Immediate Run_Utility,0x8 028c 00d8 | | Load_Top At_Offset_0 028d 1c00 | | Execute_Immediate Run_Utility,0x0 028e c5ff | | Store 0x2,-0x1 028f 00ce | | Action Pop_Auxiliary 0290 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0291 00da | | Load_Top At_Offset_2 0292 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0293 00d8 | | Load_Top At_Offset_0 0294 4879 |Hy | Short_Literal 0x79 0295 487c |H| | Short_Literal 0x7c 0296 0262 | b | Execute Discrete,In_Range 0297 7000 |p | Jump_Nonzero 0x298 0298 00d1 | | Pop_Control Pop_Count_1 0299 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 029a 00db | | Load_Top At_Offset_3 029b 00d8 | | Load_Top At_Offset_0 029c 4879 |Hy | Short_Literal 0x79 029d 487c |H| | Short_Literal 0x7c 029e 0262 | b | Execute Discrete,In_Range 029f 7002 |p | Jump_Nonzero 0x2a2 02a0 48ff |H | Short_Literal 0xff 02a1 7801 |x | Jump 0x2a3 02a2 4801 |H | Short_Literal 0x1 02a3 00d0 | | Action Swap_Control 02a4 00d1 | | Pop_Control Pop_Count_1 02a5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02a6 00db | | Load_Top At_Offset_3 02a7 e5fe | | Load 0x2,-0x2 02a8 00d8 | | Load_Top At_Offset_0 02a9 4879 |Hy | Short_Literal 0x79 02aa 487c |H| | Short_Literal 0x7c 02ab 0262 | b | Execute Discrete,In_Range 02ac 7003 |p | Jump_Nonzero 0x2b0 02ad 00d1 | | Pop_Control Pop_Count_1 02ae 48ff |H | Short_Literal 0xff 02af 7802 |x | Jump 0x2b2 02b0 00d1 | | Pop_Control Pop_Count_1 02b1 4801 |H | Short_Literal 0x1 02b2 e5ff | | Load 0x2,-0x1 02b3 031b | | Declare_Type Variant_Record,Constrained 02b4 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02b5 00db | | Load_Top At_Offset_3 02b6 e5fe | | Load 0x2,-0x2 02b7 e5ff | | Load 0x2,-0x1 02b8 1c06 | | Execute_Immediate Run_Utility,0x6 02b9 e5ff | | Load 0x2,-0x1 02ba 02fc | | Declare_Variable Variant_Record,With_Constraint 02bb 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02bc 0000 0000 | | .BLANK 0000[0x4] 02c0 ; -------------------------------------------------------------------------------------- 02c0 ; SUBPROGRAM 02c0 ; -------------------------------------------------------------------------------------- 02c0 02c3 | | .CONST 0x02c3 ; Address of begin 02c1 0004 | | .CONST 0x0004 ; Address of exception handler 02c2 0001 | | .CONST 0x0001 ; Number of locals 02c3 BODY_02c0: 02c3 INIT_02c0: 02c3 4608 |F | Jump_Case 0x9 ; Debug Table 0xa = .DEBUG 0x02c3,0x16a0,0x0005,0x0000,0x005a,0x1125,0x0000,0x01d9 02c4 7808 |x | Jump 0x2cd ; case 0x0 02c5 7830 |x0 | Jump 0x2f6 ; case 0x1 02c6 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 02c7 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 02c8 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 02c9 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 02ca 7833 |x3 | Jump 0x2fe ; case 0x6 02cb 784f |xO | Jump 0x31b ; case 0x7 02cc 7876 |xv | Jump 0x343 ; case 0x8 02cd 00da | | Load_Top At_Offset_2 02ce 016c | l | Execute Variant_Record,Is_Constrained 02cf 700a |p | Jump_Nonzero 0x2da 02d0 00cf | | Action Mark_Auxiliary 02d1 4800 |H | Short_Literal 0x0 02d2 4800 |H | Short_Literal 0x0 02d3 e5ff | | Load 0x2,-0x1 02d4 1c08 | | Execute_Immediate Run_Utility,0x8 02d5 00d8 | | Load_Top At_Offset_0 02d6 1c00 | | Execute_Immediate Run_Utility,0x0 02d7 c5ff | | Store 0x2,-0x1 02d8 00ce | | Action Pop_Auxiliary 02d9 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 02da 00da | | Load_Top At_Offset_2 02db 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 02dc 4612 |F | Jump_Case 0x13 02dd 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 02de 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 02df 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 02e0 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 02e1 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 02e2 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 02e3 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6 02e4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x7 02e5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x8 02e6 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x9 02e7 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0xa 02e8 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0xb 02e9 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0xc 02ea 7805 |x | Jump 0x2f0 ; case 0xd 02eb 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0xe 02ec 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0xf 02ed 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x10 02ee 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x11 02ef 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x12 02f0 00da | | Load_Top At_Offset_2 02f1 2206 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x6 02f2 00da | | Load_Top At_Offset_2 02f3 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 02f4 1c00 | | Execute_Immediate Run_Utility,0x0 02f5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 02f6 00da | | Load_Top At_Offset_2 02f7 016b | k | Execute Variant_Record,Read_Variant 02f8 00d8 | | Load_Top At_Offset_0 02f9 0f03 | | Execute_Immediate Equal,0x3 02fa 6802 |h | Jump_Zero 0x2fd 02fb 00db | | Load_Top At_Offset_3 02fc 2206 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x6 02fd 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 02fe e5fd | | Load 0x2,-0x3 02ff 4612 |F | Jump_Case 0x13 0300 7818 |x | Jump 0x319 ; case 0x0 0301 7817 |x | Jump 0x319 ; case 0x1 0302 7816 |x | Jump 0x319 ; case 0x2 0303 7815 |x | Jump 0x319 ; case 0x3 0304 780e |x | Jump 0x313 ; case 0x4 0305 780d |x | Jump 0x313 ; case 0x5 0306 7812 |x | Jump 0x319 ; case 0x6 0307 7811 |x | Jump 0x319 ; case 0x7 0308 7810 |x | Jump 0x319 ; case 0x8 0309 780f |x | Jump 0x319 ; case 0x9 030a 780e |x | Jump 0x319 ; case 0xa 030b 780d |x | Jump 0x319 ; case 0xb 030c 7808 |x | Jump 0x315 ; case 0xc 030d 7809 |x | Jump 0x317 ; case 0xd 030e 7806 |x | Jump 0x315 ; case 0xe 030f 7809 |x | Jump 0x319 ; case 0xf 0310 7808 |x | Jump 0x319 ; case 0x10 0311 7807 |x | Jump 0x319 ; case 0x11 0312 7806 |x | Jump 0x319 ; case 0x12 0313 4801 |H | Short_Literal 0x1 0314 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 0315 4802 |H | Short_Literal 0x2 0316 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 0317 4803 |H | Short_Literal 0x3 0318 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 0319 48ff |H | Short_Literal 0xff 031a 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 031b e5fd | | Load 0x2,-0x3 031c e5fe | | Load 0x2,-0x2 031d e5fd | | Load 0x2,-0x3 031e 4612 |F | Jump_Case 0x13 031f 781e |x | Jump 0x33e ; case 0x0 0320 781d |x | Jump 0x33e ; case 0x1 0321 781c |x | Jump 0x33e ; case 0x2 0322 781b |x | Jump 0x33e ; case 0x3 0323 780e |x | Jump 0x332 ; case 0x4 0324 780d |x | Jump 0x332 ; case 0x5 0325 7818 |x | Jump 0x33e ; case 0x6 0326 7817 |x | Jump 0x33e ; case 0x7 0327 7816 |x | Jump 0x33e ; case 0x8 0328 7815 |x | Jump 0x33e ; case 0x9 0329 7814 |x | Jump 0x33e ; case 0xa 032a 7813 |x | Jump 0x33e ; case 0xb 032b 7809 |x | Jump 0x335 ; case 0xc 032c 780b |x | Jump 0x338 ; case 0xd 032d 7807 |x | Jump 0x335 ; case 0xe 032e 780f |x | Jump 0x33e ; case 0xf 032f 780e |x | Jump 0x33e ; case 0x10 0330 780d |x | Jump 0x33e ; case 0x11 0331 780c |x | Jump 0x33e ; case 0x12 0332 4800 |H | Short_Literal 0x0 0333 4801 |H | Short_Literal 0x1 0334 780b |x | Jump 0x340 0335 4800 |H | Short_Literal 0x0 0336 4802 |H | Short_Literal 0x2 0337 7808 |x | Jump 0x340 0338 e5fe | | Load 0x2,-0x2 0339 e21c | | Load 0x1,0x1c 033a 1c07 | | Execute_Immediate Run_Utility,0x7 033b 4801 |H | Short_Literal 0x1 033c 4803 |H | Short_Literal 0x3 033d 7802 |x | Jump 0x340 033e 4800 |H | Short_Literal 0x0 033f 48ff |H | Short_Literal 0xff 0340 e5ff | | Load 0x2,-0x1 0341 031b | | Declare_Type Variant_Record,Constrained 0342 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 0343 e5fd | | Load 0x2,-0x3 0344 e5fe | | Load 0x2,-0x2 0345 e5fd | | Load 0x2,-0x3 0346 e5fe | | Load 0x2,-0x2 0347 e5ff | | Load 0x2,-0x1 0348 1c06 | | Execute_Immediate Run_Utility,0x6 0349 e5ff | | Load 0x2,-0x1 034a 02fc | | Declare_Variable Variant_Record,With_Constraint 034b e5fd | | Load 0x2,-0x3 034c 4612 |F | Jump_Case 0x13 034d 7816 |x | Jump 0x364 ; case 0x0 034e 7815 |x | Jump 0x364 ; case 0x1 034f 7814 |x | Jump 0x364 ; case 0x2 0350 7813 |x | Jump 0x364 ; case 0x3 0351 7812 |x | Jump 0x364 ; case 0x4 0352 7811 |x | Jump 0x364 ; case 0x5 0353 7810 |x | Jump 0x364 ; case 0x6 0354 780f |x | Jump 0x364 ; case 0x7 0355 780e |x | Jump 0x364 ; case 0x8 0356 780d |x | Jump 0x364 ; case 0x9 0357 780c |x | Jump 0x364 ; case 0xa 0358 780b |x | Jump 0x364 ; case 0xb 0359 780a |x | Jump 0x364 ; case 0xc 035a 7805 |x | Jump 0x360 ; case 0xd 035b 7808 |x | Jump 0x364 ; case 0xe 035c 7807 |x | Jump 0x364 ; case 0xf 035d 7806 |x | Jump 0x364 ; case 0x10 035e 7805 |x | Jump 0x364 ; case 0x11 035f 7804 |x | Jump 0x364 ; case 0x12 0360 e5fe | | Load 0x2,-0x2 0361 e21c | | Load 0x1,0x1c 0362 1c08 | | Execute_Immediate Run_Utility,0x8 0363 2f06 |/ | Execute Variant_Record,Field_Append,Variant,Indirect,Field_Number 0x6 0364 016a | j | QQ_execute Variant_Record,XXX 0365 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 0366 0000 0000 | | .XXX[0x2] 0368 0000 0000 | | .LITERAL {0x00000000, 0x0000ffff} 036c 0000 0000 | | .LITERAL {0x00000000, 0x00000fff} 0370 ; -------------------------------------------------------------------------------------- 0370 ; SUBPROGRAM 0370 ; -------------------------------------------------------------------------------------- 0370 0373 | s | .CONST 0x0373 ; Address of begin 0371 0004 | | .CONST 0x0004 ; Address of exception handler 0372 0001 | | .CONST 0x0001 ; Number of locals 0373 BODY_0370: 0373 INIT_0370: 0373 4608 |F | Jump_Case 0x9 ; Debug Table 0xb = .DEBUG 0x0373,0x16a2,0x0005,0x0000,0x005a,0x1125,0x0000,0x0213 0374 7808 |x | Jump 0x37d ; case 0x0 0375 7823 |x# | Jump 0x399 ; case 0x1 0376 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 0377 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0378 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0379 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 037a 7829 |x) | Jump 0x3a4 ; case 0x6 037b 7834 |x4 | Jump 0x3b0 ; case 0x7 037c 7849 |xI | Jump 0x3c6 ; case 0x8 037d 00da | | Load_Top At_Offset_2 037e 016c | l | Execute Variant_Record,Is_Constrained 037f 700a |p | Jump_Nonzero 0x38a 0380 00cf | | Action Mark_Auxiliary 0381 4800 |H | Short_Literal 0x0 0382 4800 |H | Short_Literal 0x0 0383 e5ff | | Load 0x2,-0x1 0384 1c08 | | Execute_Immediate Run_Utility,0x8 0385 00d8 | | Load_Top At_Offset_0 0386 1c00 | | Execute_Immediate Run_Utility,0x0 0387 c5ff | | Store 0x2,-0x1 0388 00ce | | Action Pop_Auxiliary 0389 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 038a 00da | | Load_Top At_Offset_2 038b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 038c 00d8 | | Load_Top At_Offset_0 038d 4879 |Hy | Short_Literal 0x79 038e 4889 |H | Short_Literal 0x89 038f 0262 | b | Execute Discrete,In_Range 0390 7001 |p | Jump_Nonzero 0x392 0391 7805 |x | Jump 0x397 0392 00db | | Load_Top At_Offset_3 0393 2203 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x3 0394 00db | | Load_Top At_Offset_3 0395 2703 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3 0396 1c00 | | Execute_Immediate Run_Utility,0x0 0397 00d1 | | Pop_Control Pop_Count_1 0398 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0399 00da | | Load_Top At_Offset_2 039a 016b | k | Execute Variant_Record,Read_Variant 039b 00d8 | | Load_Top At_Offset_0 039c 0f01 | | Execute_Immediate Equal,0x1 039d 6805 |h | Jump_Zero 0x3a3 039e 00db | | Load_Top At_Offset_3 039f 2203 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x3 03a0 00db | | Load_Top At_Offset_3 03a1 2703 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x3 03a2 1c01 | | Execute_Immediate Run_Utility,0x1 03a3 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 03a4 00db | | Load_Top At_Offset_3 03a5 00d8 | | Load_Top At_Offset_0 03a6 4879 |Hy | Short_Literal 0x79 03a7 4889 |H | Short_Literal 0x89 03a8 0262 | b | Execute Discrete,In_Range 03a9 7002 |p | Jump_Nonzero 0x3ac 03aa 48ff |H | Short_Literal 0xff 03ab 7801 |x | Jump 0x3ad 03ac 4801 |H | Short_Literal 0x1 03ad 00d0 | | Action Swap_Control 03ae 00d1 | | Pop_Control Pop_Count_1 03af 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 03b0 e5fd | | Load 0x2,-0x3 03b1 e5fe | | Load 0x2,-0x2 03b2 e5fe | | Load 0x2,-0x2 03b3 00d8 | | Load_Top At_Offset_0 03b4 4879 |Hy | Short_Literal 0x79 03b5 4889 |H | Short_Literal 0x89 03b6 0262 | b | Execute Discrete,In_Range 03b7 7004 |p | Jump_Nonzero 0x3bc 03b8 00d1 | | Pop_Control Pop_Count_1 03b9 4800 |H | Short_Literal 0x0 03ba 48ff |H | Short_Literal 0xff 03bb 7807 |x | Jump 0x3c3 03bc 00d1 | | Pop_Control Pop_Count_1 03bd e5fd | | Load 0x2,-0x3 03be e5fe | | Load 0x2,-0x2 03bf e21d | | Load 0x1,0x1d 03c0 1c07 | | Execute_Immediate Run_Utility,0x7 03c1 4801 |H | Short_Literal 0x1 03c2 4801 |H | Short_Literal 0x1 03c3 e5ff | | Load 0x2,-0x1 03c4 031b | | Declare_Type Variant_Record,Constrained 03c5 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 03c6 e5fd | | Load 0x2,-0x3 03c7 e5fe | | Load 0x2,-0x2 03c8 e5fd | | Load 0x2,-0x3 03c9 e5fe | | Load 0x2,-0x2 03ca e5ff | | Load 0x2,-0x1 03cb 1c06 | | Execute_Immediate Run_Utility,0x6 03cc e5ff | | Load 0x2,-0x1 03cd 02fc | | Declare_Variable Variant_Record,With_Constraint 03ce e5fe | | Load 0x2,-0x2 03cf 00d8 | | Load_Top At_Offset_0 03d0 4879 |Hy | Short_Literal 0x79 03d1 4889 |H | Short_Literal 0x89 03d2 0262 | b | Execute Discrete,In_Range 03d3 7002 |p | Jump_Nonzero 0x3d6 03d4 00d1 | | Pop_Control Pop_Count_1 03d5 7806 |x | Jump 0x3dc 03d6 00d1 | | Pop_Control Pop_Count_1 03d7 e5fd | | Load 0x2,-0x3 03d8 e5fe | | Load 0x2,-0x2 03d9 e21d | | Load 0x1,0x1d 03da 1c08 | | Execute_Immediate Run_Utility,0x8 03db 2f03 |/ | Execute Variant_Record,Field_Append,Variant,Indirect,Field_Number 0x3 03dc 016a | j | QQ_execute Variant_Record,XXX 03dd 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 03de 0000 0000 | | .XXX[0x2] 03e0 ; -------------------------------------------------------------------------------------- 03e0 ; SUBPROGRAM 03e0 ; -------------------------------------------------------------------------------------- 03e0 03e3 | | .CONST 0x03e3 ; Address of begin 03e1 0004 | | .CONST 0x0004 ; Address of exception handler 03e2 0001 | | .CONST 0x0001 ; Number of locals 03e3 BODY_03e0: 03e3 INIT_03e0: 03e3 4608 |F | Jump_Case 0x9 ; Debug Table 0xc = .DEBUG 0x03e3,0x16a4,0x0005,0x0000,0x005a,0x1125,0x0000,0x0253 03e4 7808 |x | Jump 0x3ed ; case 0x0 03e5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 03e6 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 03e7 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 03e8 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 03e9 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 03ea 7817 |x | Jump 0x402 ; case 0x6 03eb 7822 |x" | Jump 0x40e ; case 0x7 03ec 7830 |x0 | Jump 0x41d ; case 0x8 03ed 00da | | Load_Top At_Offset_2 03ee 016c | l | Execute Variant_Record,Is_Constrained 03ef 7009 |p | Jump_Nonzero 0x3f9 03f0 00cf | | Action Mark_Auxiliary 03f1 4800 |H | Short_Literal 0x0 03f2 e5ff | | Load 0x2,-0x1 03f3 1c08 | | Execute_Immediate Run_Utility,0x8 03f4 00d8 | | Load_Top At_Offset_0 03f5 1c00 | | Execute_Immediate Run_Utility,0x0 03f6 c5ff | | Store 0x2,-0x1 03f7 00ce | | Action Pop_Auxiliary 03f8 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 03f9 00da | | Load_Top At_Offset_2 03fa 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 03fb 00d8 | | Load_Top At_Offset_0 03fc 4800 |H | Short_Literal 0x0 03fd 4801 |H | Short_Literal 0x1 03fe 0262 | b | Execute Discrete,In_Range 03ff 7000 |p | Jump_Nonzero 0x400 0400 00d1 | | Pop_Control Pop_Count_1 0401 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0402 00db | | Load_Top At_Offset_3 0403 00d8 | | Load_Top At_Offset_0 0404 4800 |H | Short_Literal 0x0 0405 4801 |H | Short_Literal 0x1 0406 0262 | b | Execute Discrete,In_Range 0407 7002 |p | Jump_Nonzero 0x40a 0408 4802 |H | Short_Literal 0x2 0409 7801 |x | Jump 0x40b 040a 4801 |H | Short_Literal 0x1 040b 00d0 | | Action Swap_Control 040c 00d1 | | Pop_Control Pop_Count_1 040d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 040e 00db | | Load_Top At_Offset_3 040f e5fe | | Load 0x2,-0x2 0410 00d8 | | Load_Top At_Offset_0 0411 4800 |H | Short_Literal 0x0 0412 4801 |H | Short_Literal 0x1 0413 0262 | b | Execute Discrete,In_Range 0414 7003 |p | Jump_Nonzero 0x418 0415 00d1 | | Pop_Control Pop_Count_1 0416 4802 |H | Short_Literal 0x2 0417 7802 |x | Jump 0x41a 0418 00d1 | | Pop_Control Pop_Count_1 0419 4801 |H | Short_Literal 0x1 041a e5ff | | Load 0x2,-0x1 041b 031b | | Declare_Type Variant_Record,Constrained 041c 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 041d 00db | | Load_Top At_Offset_3 041e e5fe | | Load 0x2,-0x2 041f e5ff | | Load 0x2,-0x1 0420 1c06 | | Execute_Immediate Run_Utility,0x6 0421 e5ff | | Load 0x2,-0x1 0422 02fc | | Declare_Variable Variant_Record,With_Constraint 0423 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0424 0000 0000 | | .BLANK 0000[0x4] 0428 ; -------------------------------------------------------------------------------------- 0428 ; SUBPROGRAM 0428 ; -------------------------------------------------------------------------------------- 0428 042b | + | .CONST 0x042b ; Address of begin 0429 0004 | | .CONST 0x0004 ; Address of exception handler 042a 0001 | | .CONST 0x0001 ; Number of locals 042b BODY_0428: 042b INIT_0428: 042b 4608 |F | Jump_Case 0x9 ; Debug Table 0xd = .DEBUG 0x042b,0x16a6,0x0005,0x0000,0x005a,0x1125,0x0000,0x031d 042c 7808 |x | Jump 0x435 ; case 0x0 042d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 042e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 042f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0430 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0431 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 0432 7818 |x | Jump 0x44b ; case 0x6 0433 7828 |x( | Jump 0x45c ; case 0x7 0434 783d |x= | Jump 0x472 ; case 0x8 0435 00da | | Load_Top At_Offset_2 0436 016c | l | Execute Variant_Record,Is_Constrained 0437 7009 |p | Jump_Nonzero 0x441 0438 00cf | | Action Mark_Auxiliary 0439 4800 |H | Short_Literal 0x0 043a e5ff | | Load 0x2,-0x1 043b 1c08 | | Execute_Immediate Run_Utility,0x8 043c 00d8 | | Load_Top At_Offset_0 043d 1c00 | | Execute_Immediate Run_Utility,0x0 043e c5ff | | Store 0x2,-0x1 043f 00ce | | Action Pop_Auxiliary 0440 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0441 00da | | Load_Top At_Offset_2 0442 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0443 0b00 | | Execute_Immediate Case_Compare,0x0 0444 7004 |p | Jump_Nonzero 0x449 0445 0b01 | | Execute_Immediate Case_Compare,0x1 0446 7002 |p | Jump_Nonzero 0x449 0447 0b12 | | Execute_Immediate Case_Compare,0x12 0448 7000 |p | Jump_Nonzero 0x449 0449 00d1 | | Pop_Control Pop_Count_1 044a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 044b 00db | | Load_Top At_Offset_3 044c 0b00 | | Execute_Immediate Case_Compare,0x0 044d 7006 |p | Jump_Nonzero 0x454 044e 0b01 | | Execute_Immediate Case_Compare,0x1 044f 7006 |p | Jump_Nonzero 0x456 0450 0b12 | | Execute_Immediate Case_Compare,0x12 0451 7006 |p | Jump_Nonzero 0x458 0452 48ff |H | Short_Literal 0xff 0453 7805 |x | Jump 0x459 0454 4801 |H | Short_Literal 0x1 0455 7803 |x | Jump 0x459 0456 4802 |H | Short_Literal 0x2 0457 7801 |x | Jump 0x459 0458 4803 |H | Short_Literal 0x3 0459 00d0 | | Action Swap_Control 045a 00d1 | | Pop_Control Pop_Count_1 045b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 045c 00db | | Load_Top At_Offset_3 045d e5fe | | Load 0x2,-0x2 045e 0b00 | | Execute_Immediate Case_Compare,0x0 045f 7007 |p | Jump_Nonzero 0x467 0460 0b01 | | Execute_Immediate Case_Compare,0x1 0461 7008 |p | Jump_Nonzero 0x46a 0462 0b12 | | Execute_Immediate Case_Compare,0x12 0463 7009 |p | Jump_Nonzero 0x46d 0464 00d1 | | Pop_Control Pop_Count_1 0465 48ff |H | Short_Literal 0xff 0466 7808 |x | Jump 0x46f 0467 00d1 | | Pop_Control Pop_Count_1 0468 4801 |H | Short_Literal 0x1 0469 7805 |x | Jump 0x46f 046a 00d1 | | Pop_Control Pop_Count_1 046b 4802 |H | Short_Literal 0x2 046c 7802 |x | Jump 0x46f 046d 00d1 | | Pop_Control Pop_Count_1 046e 4803 |H | Short_Literal 0x3 046f e5ff | | Load 0x2,-0x1 0470 031b | | Declare_Type Variant_Record,Constrained 0471 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0472 00db | | Load_Top At_Offset_3 0473 e5fe | | Load 0x2,-0x2 0474 e5ff | | Load 0x2,-0x1 0475 1c06 | | Execute_Immediate Run_Utility,0x6 0476 e5ff | | Load 0x2,-0x1 0477 02fc | | Declare_Variable Variant_Record,With_Constraint 0478 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0479 0000 0000 | | .BLANK 0000[0x7] 0480 ; -------------------------------------------------------------------------------------- 0480 ; SUBPROGRAM 0480 ; -------------------------------------------------------------------------------------- 0480 0483 | | .CONST 0x0483 ; Address of begin 0481 0004 | | .CONST 0x0004 ; Address of exception handler 0482 0001 | | .CONST 0x0001 ; Number of locals 0483 BODY_0480: 0483 INIT_0480: 0483 4608 |F | Jump_Case 0x9 ; Debug Table 0xe = .DEBUG 0x0483,0x16a8,0x0005,0x0000,0x005a,0x1125,0x0000,0x0364 0484 7808 |x | Jump 0x48d ; case 0x0 0485 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0486 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 0487 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0488 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0489 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 048a 7813 |x | Jump 0x49e ; case 0x6 048b 781a |x | Jump 0x4a6 ; case 0x7 048c 7824 |x$ | Jump 0x4b1 ; case 0x8 048d 00da | | Load_Top At_Offset_2 048e 016c | l | Execute Variant_Record,Is_Constrained 048f 7009 |p | Jump_Nonzero 0x499 0490 00cf | | Action Mark_Auxiliary 0491 4801 |H | Short_Literal 0x1 0492 e5ff | | Load 0x2,-0x1 0493 1c08 | | Execute_Immediate Run_Utility,0x8 0494 00d8 | | Load_Top At_Offset_0 0495 1c00 | | Execute_Immediate Run_Utility,0x0 0496 c5ff | | Store 0x2,-0x1 0497 00ce | | Action Pop_Auxiliary 0498 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0499 00da | | Load_Top At_Offset_2 049a 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 049b 4601 |F | Jump_Case 0x2 049c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 049d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 049e 00db | | Load_Top At_Offset_3 049f 4601 |F | Jump_Case 0x2 04a0 7803 |x | Jump 0x4a4 ; case 0x0 04a1 7800 |x | Jump 0x4a2 ; case 0x1 04a2 4801 |H | Short_Literal 0x1 04a3 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 04a4 4802 |H | Short_Literal 0x2 04a5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 04a6 00db | | Load_Top At_Offset_3 04a7 e5fe | | Load 0x2,-0x2 04a8 4601 |F | Jump_Case 0x2 04a9 7803 |x | Jump 0x4ad ; case 0x0 04aa 7800 |x | Jump 0x4ab ; case 0x1 04ab 4801 |H | Short_Literal 0x1 04ac 7801 |x | Jump 0x4ae 04ad 4802 |H | Short_Literal 0x2 04ae e5ff | | Load 0x2,-0x1 04af 031b | | Declare_Type Variant_Record,Constrained 04b0 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 04b1 00db | | Load_Top At_Offset_3 04b2 e5fe | | Load 0x2,-0x2 04b3 e5ff | | Load 0x2,-0x1 04b4 1c06 | | Execute_Immediate Run_Utility,0x6 04b5 e5ff | | Load 0x2,-0x1 04b6 02fc | | Declare_Variable Variant_Record,With_Constraint 04b7 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 04b8 ; -------------------------------------------------------------------------------------- 04b8 ; SUBPROGRAM 04b8 ; -------------------------------------------------------------------------------------- 04b8 04bb | | .CONST 0x04bb ; Address of begin 04b9 0004 | | .CONST 0x0004 ; Address of exception handler 04ba 0001 | | .CONST 0x0001 ; Number of locals 04bb BODY_04b8: 04bb INIT_04b8: 04bb 4603 |F | Jump_Case 0x4 ; Debug Table 0xf = .DEBUG 0x04bb,0x16aa,0x0005,0x0000,0x005a,0x1125,0x0000,0x0393 04bc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 04bd 7802 |x | Jump 0x4c0 ; case 0x1 04be 7805 |x | Jump 0x4c4 ; case 0x2 04bf 7809 |x | Jump 0x4c9 ; case 0x3 04c0 00da | | Load_Top At_Offset_2 04c1 0091 0af4 | | Action Push_String_Extended_Indexed,0xaf4 ; "IS_LITERAL" 04c3 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 04c4 00db | | Load_Top At_Offset_3 04c5 00db | | Load_Top At_Offset_3 04c6 00e0 | | Load_Encached Standard_Cache 04c7 181b | | Execute Package,Field_Execute,Field_Number 0x1b 04c8 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 04c9 00da | | Load_Top At_Offset_2 04ca 00e0 | | Load_Encached Standard_Cache 04cb 181c | | Execute Package,Field_Execute,Field_Number 0x1c 04cc 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 04cd 0000 0000 | | .XXX[0x3] 04cf 0000 | | 04d0 ; -------------------------------------------------------------------------------------- 04d0 ; SUBPROGRAM 04d0 ; -------------------------------------------------------------------------------------- 04d0 04d3 | | .CONST 0x04d3 ; Address of begin 04d1 0004 | | .CONST 0x0004 ; Address of exception handler 04d2 0001 | | .CONST 0x0001 ; Number of locals 04d3 BODY_04d0: 04d3 INIT_04d0: 04d3 4608 |F | Jump_Case 0x9 ; Debug Table 0x10 = .DEBUG 0x04d3,0x16ac,0x0005,0x0000,0x005a,0x1125,0x0000,0x0399 04d4 7808 |x | Jump 0x4dd ; case 0x0 04d5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 04d6 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 04d7 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 04d8 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 04d9 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 04da 7813 |x | Jump 0x4ee ; case 0x6 04db 781a |x | Jump 0x4f6 ; case 0x7 04dc 7824 |x$ | Jump 0x501 ; case 0x8 04dd 00da | | Load_Top At_Offset_2 04de 016c | l | Execute Variant_Record,Is_Constrained 04df 7009 |p | Jump_Nonzero 0x4e9 04e0 00cf | | Action Mark_Auxiliary 04e1 4800 |H | Short_Literal 0x0 04e2 e5ff | | Load 0x2,-0x1 04e3 1c08 | | Execute_Immediate Run_Utility,0x8 04e4 00d8 | | Load_Top At_Offset_0 04e5 1c00 | | Execute_Immediate Run_Utility,0x0 04e6 c5ff | | Store 0x2,-0x1 04e7 00ce | | Action Pop_Auxiliary 04e8 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 04e9 00da | | Load_Top At_Offset_2 04ea 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 04eb 4601 |F | Jump_Case 0x2 04ec 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 04ed 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 04ee 00db | | Load_Top At_Offset_3 04ef 4601 |F | Jump_Case 0x2 04f0 7801 |x | Jump 0x4f2 ; case 0x0 04f1 7802 |x | Jump 0x4f4 ; case 0x1 04f2 4801 |H | Short_Literal 0x1 04f3 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 04f4 4802 |H | Short_Literal 0x2 04f5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 04f6 00db | | Load_Top At_Offset_3 04f7 e5fe | | Load 0x2,-0x2 04f8 4601 |F | Jump_Case 0x2 04f9 7801 |x | Jump 0x4fb ; case 0x0 04fa 7802 |x | Jump 0x4fd ; case 0x1 04fb 4801 |H | Short_Literal 0x1 04fc 7801 |x | Jump 0x4fe 04fd 4802 |H | Short_Literal 0x2 04fe e5ff | | Load 0x2,-0x1 04ff 031b | | Declare_Type Variant_Record,Constrained 0500 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0501 00db | | Load_Top At_Offset_3 0502 e5fe | | Load 0x2,-0x2 0503 e5ff | | Load 0x2,-0x1 0504 1c06 | | Execute_Immediate Run_Utility,0x6 0505 e5ff | | Load 0x2,-0x1 0506 02fc | | Declare_Variable Variant_Record,With_Constraint 0507 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0508 ; -------------------------------------------------------------------------------------- 0508 ; SUBPROGRAM 0508 ; -------------------------------------------------------------------------------------- 0508 050b | | .CONST 0x050b ; Address of begin 0509 0004 | | .CONST 0x0004 ; Address of exception handler 050a 0001 | | .CONST 0x0001 ; Number of locals 050b BODY_0508: 050b INIT_0508: 050b 4603 |F | Jump_Case 0x4 ; Debug Table 0x11 = .DEBUG 0x050b,0x16ae,0x0005,0x0000,0x005a,0x1125,0x0000,0x03b7 050c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 050d 7802 |x | Jump 0x510 ; case 0x1 050e 7805 |x | Jump 0x514 ; case 0x2 050f 7809 |x | Jump 0x519 ; case 0x3 0510 00da | | Load_Top At_Offset_2 0511 0091 0af6 | | Action Push_String_Extended_Indexed,0xaf6 ; "ILLEGAL" 0513 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0514 00db | | Load_Top At_Offset_3 0515 00db | | Load_Top At_Offset_3 0516 00e0 | | Load_Encached Standard_Cache 0517 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0518 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0519 00da | | Load_Top At_Offset_2 051a 00e0 | | Load_Encached Standard_Cache 051b 181c | | Execute Package,Field_Execute,Field_Number 0x1c 051c 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 051d 0000 0000 | | .XXX[0x3] 051f 0000 | | 0520 ; -------------------------------------------------------------------------------------- 0520 ; SUBPROGRAM 0520 ; -------------------------------------------------------------------------------------- 0520 0523 | # | .CONST 0x0523 ; Address of begin 0521 0004 | | .CONST 0x0004 ; Address of exception handler 0522 0001 | | .CONST 0x0001 ; Number of locals 0523 BODY_0520: 0523 INIT_0520: 0523 4603 |F | Jump_Case 0x4 ; Debug Table 0x12 = .DEBUG 0x0523,0x16b0,0x0005,0x0000,0x005a,0x1125,0x0000,0x0406 0524 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0525 7802 |x | Jump 0x528 ; case 0x1 0526 7805 |x | Jump 0x52c ; case 0x2 0527 7809 |x | Jump 0x531 ; case 0x3 0528 00da | | Load_Top At_Offset_2 0529 0091 0b33 | 3| Action Push_String_Extended_Indexed,0xb33 ; "DECLARE_TYPE" 052b 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 052c 00db | | Load_Top At_Offset_3 052d 00db | | Load_Top At_Offset_3 052e 00e0 | | Load_Encached Standard_Cache 052f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0530 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0531 00da | | Load_Top At_Offset_2 0532 00e0 | | Load_Encached Standard_Cache 0533 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0534 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0535 0000 0000 | | .XXX[0x3] 0537 0000 | | 0538 ; -------------------------------------------------------------------------------------- 0538 ; SUBPROGRAM 0538 ; -------------------------------------------------------------------------------------- 0538 053b | ; | .CONST 0x053b ; Address of begin 0539 0004 | | .CONST 0x0004 ; Address of exception handler 053a 0001 | | .CONST 0x0001 ; Number of locals 053b BODY_0538: 053b INIT_0538: 053b 4608 |F | Jump_Case 0x9 ; Debug Table 0x13 = .DEBUG 0x053b,0x16b2,0x0005,0x0000,0x005a,0x1125,0x0000,0x042a 053c 7808 |x | Jump 0x545 ; case 0x0 053d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 053e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 053f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0540 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0541 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 0542 7845 |xE | Jump 0x588 ; case 0x6 0543 7892 |x | Jump 0x5d6 ; case 0x7 0544 78e2 |x | Jump 0x627 ; case 0x8 0545 00da | | Load_Top At_Offset_2 0546 016c | l | Execute Variant_Record,Is_Constrained 0547 7009 |p | Jump_Nonzero 0x551 0548 00cf | | Action Mark_Auxiliary 0549 480c |H | Short_Literal 0xc 054a e5ff | | Load 0x2,-0x1 054b 1c08 | | Execute_Immediate Run_Utility,0x8 054c 00d8 | | Load_Top At_Offset_0 054d 1c00 | | Execute_Immediate Run_Utility,0x0 054e c5ff | | Store 0x2,-0x1 054f 00ce | | Action Pop_Auxiliary 0550 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0551 00da | | Load_Top At_Offset_2 0552 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0553 461f |F | Jump_Case 0x20 0554 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0555 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 0556 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 0557 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0558 781b |x | Jump 0x574 ; case 0x4 0559 781a |x | Jump 0x574 ; case 0x5 055a 7819 |x | Jump 0x574 ; case 0x6 055b 7818 |x | Jump 0x574 ; case 0x7 055c 7817 |x | Jump 0x574 ; case 0x8 055d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x9 055e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0xa 055f 7818 |x | Jump 0x578 ; case 0xb 0560 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0xc 0561 781a |x | Jump 0x57c ; case 0xd 0562 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0xe 0563 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0xf 0564 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x10 0565 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x11 0566 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x12 0567 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x13 0568 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x14 0569 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x15 056a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x16 056b 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x17 056c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x18 056d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x19 056e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1a 056f 7810 |x | Jump 0x580 ; case 0x1b 0570 7813 |x | Jump 0x584 ; case 0x1c 0571 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1d 0572 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1e 0573 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1f 0574 00da | | Load_Top At_Offset_2 0575 260b |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xb 0576 1c00 | | Execute_Immediate Run_Utility,0x0 0577 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0578 00da | | Load_Top At_Offset_2 0579 260f |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0xf 057a 1c00 | | Execute_Immediate Run_Utility,0x0 057b 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 057c 00da | | Load_Top At_Offset_2 057d 2612 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x12 057e 1c00 | | Execute_Immediate Run_Utility,0x0 057f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0580 00da | | Load_Top At_Offset_2 0581 261d |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1d 0582 1c00 | | Execute_Immediate Run_Utility,0x0 0583 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0584 00da | | Load_Top At_Offset_2 0585 261e |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1e 0586 1c00 | | Execute_Immediate Run_Utility,0x0 0587 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0588 00db | | Load_Top At_Offset_3 0589 461f |F | Jump_Case 0x20 058a 781f |x | Jump 0x5aa ; case 0x0 058b 7820 |x | Jump 0x5ac ; case 0x1 058c 7821 |x! | Jump 0x5ae ; case 0x2 058d 7822 |x" | Jump 0x5b0 ; case 0x3 058e 7823 |x# | Jump 0x5b2 ; case 0x4 058f 7822 |x" | Jump 0x5b2 ; case 0x5 0590 7821 |x! | Jump 0x5b2 ; case 0x6 0591 7820 |x | Jump 0x5b2 ; case 0x7 0592 781f |x | Jump 0x5b2 ; case 0x8 0593 7820 |x | Jump 0x5b4 ; case 0x9 0594 7821 |x! | Jump 0x5b6 ; case 0xa 0595 7822 |x" | Jump 0x5b8 ; case 0xb 0596 7823 |x# | Jump 0x5ba ; case 0xc 0597 7824 |x$ | Jump 0x5bc ; case 0xd 0598 7825 |x% | Jump 0x5be ; case 0xe 0599 7824 |x$ | Jump 0x5be ; case 0xf 059a 7823 |x# | Jump 0x5be ; case 0x10 059b 7824 |x$ | Jump 0x5c0 ; case 0x11 059c 7821 |x! | Jump 0x5be ; case 0x12 059d 7820 |x | Jump 0x5be ; case 0x13 059e 7825 |x% | Jump 0x5c4 ; case 0x14 059f 7826 |x& | Jump 0x5c6 ; case 0x15 05a0 7821 |x! | Jump 0x5c2 ; case 0x16 05a1 7826 |x& | Jump 0x5c8 ; case 0x17 05a2 7827 |x' | Jump 0x5ca ; case 0x18 05a3 7826 |x& | Jump 0x5ca ; case 0x19 05a4 7827 |x' | Jump 0x5cc ; case 0x1a 05a5 7828 |x( | Jump 0x5ce ; case 0x1b 05a6 7829 |x) | Jump 0x5d0 ; case 0x1c 05a7 782a |x* | Jump 0x5d2 ; case 0x1d 05a8 7829 |x) | Jump 0x5d2 ; case 0x1e 05a9 782a |x* | Jump 0x5d4 ; case 0x1f 05aa 4801 |H | Short_Literal 0x1 05ab 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05ac 4802 |H | Short_Literal 0x2 05ad 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05ae 4803 |H | Short_Literal 0x3 05af 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05b0 4804 |H | Short_Literal 0x4 05b1 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05b2 4805 |H | Short_Literal 0x5 05b3 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05b4 4806 |H | Short_Literal 0x6 05b5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05b6 4807 |H | Short_Literal 0x7 05b7 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05b8 4808 |H | Short_Literal 0x8 05b9 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05ba 4809 |H | Short_Literal 0x9 05bb 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05bc 480a |H | Short_Literal 0xa 05bd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05be 480b |H | Short_Literal 0xb 05bf 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05c0 480c |H | Short_Literal 0xc 05c1 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05c2 480d |H | Short_Literal 0xd 05c3 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05c4 480e |H | Short_Literal 0xe 05c5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05c6 480f |H | Short_Literal 0xf 05c7 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05c8 4810 |H | Short_Literal 0x10 05c9 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05ca 4811 |H | Short_Literal 0x11 05cb 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05cc 4812 |H | Short_Literal 0x12 05cd 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05ce 4813 |H | Short_Literal 0x13 05cf 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05d0 4814 |H | Short_Literal 0x14 05d1 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05d2 4815 |H | Short_Literal 0x15 05d3 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05d4 4816 |H | Short_Literal 0x16 05d5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 05d6 00db | | Load_Top At_Offset_3 05d7 e5fe | | Load 0x2,-0x2 05d8 461f |F | Jump_Case 0x20 05d9 781f |x | Jump 0x5f9 ; case 0x0 05da 7820 |x | Jump 0x5fb ; case 0x1 05db 7821 |x! | Jump 0x5fd ; case 0x2 05dc 7822 |x" | Jump 0x5ff ; case 0x3 05dd 7823 |x# | Jump 0x601 ; case 0x4 05de 7822 |x" | Jump 0x601 ; case 0x5 05df 7821 |x! | Jump 0x601 ; case 0x6 05e0 7820 |x | Jump 0x601 ; case 0x7 05e1 781f |x | Jump 0x601 ; case 0x8 05e2 7820 |x | Jump 0x603 ; case 0x9 05e3 7821 |x! | Jump 0x605 ; case 0xa 05e4 7822 |x" | Jump 0x607 ; case 0xb 05e5 7823 |x# | Jump 0x609 ; case 0xc 05e6 7824 |x$ | Jump 0x60b ; case 0xd 05e7 7825 |x% | Jump 0x60d ; case 0xe 05e8 7824 |x$ | Jump 0x60d ; case 0xf 05e9 7823 |x# | Jump 0x60d ; case 0x10 05ea 7824 |x$ | Jump 0x60f ; case 0x11 05eb 7821 |x! | Jump 0x60d ; case 0x12 05ec 7820 |x | Jump 0x60d ; case 0x13 05ed 7825 |x% | Jump 0x613 ; case 0x14 05ee 7826 |x& | Jump 0x615 ; case 0x15 05ef 7821 |x! | Jump 0x611 ; case 0x16 05f0 7826 |x& | Jump 0x617 ; case 0x17 05f1 7827 |x' | Jump 0x619 ; case 0x18 05f2 7826 |x& | Jump 0x619 ; case 0x19 05f3 7827 |x' | Jump 0x61b ; case 0x1a 05f4 7828 |x( | Jump 0x61d ; case 0x1b 05f5 7829 |x) | Jump 0x61f ; case 0x1c 05f6 782a |x* | Jump 0x621 ; case 0x1d 05f7 7829 |x) | Jump 0x621 ; case 0x1e 05f8 782a |x* | Jump 0x623 ; case 0x1f 05f9 4801 |H | Short_Literal 0x1 05fa 7829 |x) | Jump 0x624 05fb 4802 |H | Short_Literal 0x2 05fc 7827 |x' | Jump 0x624 05fd 4803 |H | Short_Literal 0x3 05fe 7825 |x% | Jump 0x624 05ff 4804 |H | Short_Literal 0x4 0600 7823 |x# | Jump 0x624 0601 4805 |H | Short_Literal 0x5 0602 7821 |x! | Jump 0x624 0603 4806 |H | Short_Literal 0x6 0604 781f |x | Jump 0x624 0605 4807 |H | Short_Literal 0x7 0606 781d |x | Jump 0x624 0607 4808 |H | Short_Literal 0x8 0608 781b |x | Jump 0x624 0609 4809 |H | Short_Literal 0x9 060a 7819 |x | Jump 0x624 060b 480a |H | Short_Literal 0xa 060c 7817 |x | Jump 0x624 060d 480b |H | Short_Literal 0xb 060e 7815 |x | Jump 0x624 060f 480c |H | Short_Literal 0xc 0610 7813 |x | Jump 0x624 0611 480d |H | Short_Literal 0xd 0612 7811 |x | Jump 0x624 0613 480e |H | Short_Literal 0xe 0614 780f |x | Jump 0x624 0615 480f |H | Short_Literal 0xf 0616 780d |x | Jump 0x624 0617 4810 |H | Short_Literal 0x10 0618 780b |x | Jump 0x624 0619 4811 |H | Short_Literal 0x11 061a 7809 |x | Jump 0x624 061b 4812 |H | Short_Literal 0x12 061c 7807 |x | Jump 0x624 061d 4813 |H | Short_Literal 0x13 061e 7805 |x | Jump 0x624 061f 4814 |H | Short_Literal 0x14 0620 7803 |x | Jump 0x624 0621 4815 |H | Short_Literal 0x15 0622 7801 |x | Jump 0x624 0623 4816 |H | Short_Literal 0x16 0624 e5ff | | Load 0x2,-0x1 0625 031b | | Declare_Type Variant_Record,Constrained 0626 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0627 00db | | Load_Top At_Offset_3 0628 e5fe | | Load 0x2,-0x2 0629 e5ff | | Load 0x2,-0x1 062a 1c06 | | Execute_Immediate Run_Utility,0x6 062b e5ff | | Load 0x2,-0x1 062c 02fc | | Declare_Variable Variant_Record,With_Constraint 062d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 062e 0000 0000 | | .XXX[0x2] 0630 ; -------------------------------------------------------------------------------------- 0630 ; SUBPROGRAM 0630 ; -------------------------------------------------------------------------------------- 0630 0633 | 3 | .CONST 0x0633 ; Address of begin 0631 0004 | | .CONST 0x0004 ; Address of exception handler 0632 0001 | | .CONST 0x0001 ; Number of locals 0633 BODY_0630: 0633 INIT_0630: 0633 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0x14 = .DEBUG 0x0633,0x16b4,0x0005,0x0000,0x005a,0x1125,0x0000,0x0535 0634 00da | | Load_Top At_Offset_2 0635 01d8 | | Execute Vector,Element_Type 0636 02ff | | Declare_Variable Variant_Record 0637 00d8 | | Load_Top At_Offset_0 0638 1c00 | | Execute_Immediate Run_Utility,0x0 0639 00db | | Load_Top At_Offset_3 063a 01dc | | Execute Vector,Last 063b e5ff | | Load 0x2,-0x1 063c 01dd | | Execute Vector,First 063d 0263 | c | Execute Discrete,Above_Bound 063e 7006 |p | Jump_Nonzero 0x645 063f 00da | | Load_Top At_Offset_2 0640 00d9 | | Load_Top At_Offset_1 0641 e5ff | | Load 0x2,-0x1 0642 01d6 | | Execute Vector,Field_Write 0643 0a01 | | Execute_Immediate Plus,0x1 0644 7ff8 | | Jump 0x63d 0645 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0646 0000 0000 | | .XXX[0x2] 0648 ; -------------------------------------------------------------------------------------- 0648 ; SUBPROGRAM 0648 ; -------------------------------------------------------------------------------------- 0648 064b | K | .CONST 0x064b ; Address of begin 0649 0004 | | .CONST 0x0004 ; Address of exception handler 064a 0001 | | .CONST 0x0001 ; Number of locals 064b BODY_0648: 064b INIT_0648: 064b 00d1 | | Pop_Control Pop_Count_1 ; Debug Table 0x15 = .DEBUG 0x064b,0x16b6,0x0005,0x0000,0x005a,0x1125,0x0000,0x053e 064c 00da | | Load_Top At_Offset_2 064d 01d8 | | Execute Vector,Element_Type 064e 0337 | 7 | Declare_Variable Array 064f 00d8 | | Load_Top At_Offset_0 0650 1c00 | | Execute_Immediate Run_Utility,0x0 0651 00db | | Load_Top At_Offset_3 0652 01dc | | Execute Vector,Last 0653 e5ff | | Load 0x2,-0x1 0654 01dd | | Execute Vector,First 0655 0263 | c | Execute Discrete,Above_Bound 0656 7006 |p | Jump_Nonzero 0x65d 0657 00da | | Load_Top At_Offset_2 0658 00d9 | | Load_Top At_Offset_1 0659 e5ff | | Load 0x2,-0x1 065a 01d6 | | Execute Vector,Field_Write 065b 0a01 | | Execute_Immediate Plus,0x1 065c 7ff8 | | Jump 0x655 065d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 065e 0000 0000 | | .XXX[0x2] 0660 ; -------------------------------------------------------------------------------------- 0660 ; SUBPROGRAM 0660 ; -------------------------------------------------------------------------------------- 0660 0664 | d | .CONST 0x0664 ; Address of begin 0661 0004 | | .CONST 0x0004 ; Address of exception handler 0662 0002 | | .CONST 0x0002 ; Number of locals 0663 INIT_0660: 0663 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x16 = .DEBUG 0x0663,0x16b8,0x0002,0x0000,0x005a,0x1125,0x0000,0x0573 ; Debug Table 0x16.0x0 = 0x663,0xffff 0664 BODY_0660: 0664 e5fd | | Load 0x2,-0x3 ; Debug Table 0x16.0x1 = 0x664,0x1 0665 e5fe | | Load 0x2,-0x2 0666 8244 | D | Call 0x1,0x44 0667 e5ff | | Load 0x2,-0x1 0668 8243 | C | Call 0x1,0x43 0669 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 066a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0x2 = 0x66a,0x2 066b 6848 |hH | Jump_Zero 0x6b4 066c e5fe | | Load 0x2,-0x2 ; Debug Table 0x16.0x3 = 0x66c,0x3 066d 4612 |F | Jump_Case 0x13 066e 7812 |x | Jump 0x681 ; case 0x0 066f 7811 |x | Jump 0x681 ; case 0x1 0670 7810 |x | Jump 0x681 ; case 0x2 0671 7819 |x | Jump 0x68b ; case 0x3 0672 782b |x+ | Jump 0x69e ; case 0x4 0673 782a |x* | Jump 0x69e ; case 0x5 0674 783d |x= | Jump 0x6b2 ; case 0x6 0675 783e |x> | Jump 0x6b4 ; case 0x7 0676 783b |x; | Jump 0x6b2 ; case 0x8 0677 783a |x: | Jump 0x6b2 ; case 0x9 0678 7839 |x9 | Jump 0x6b2 ; case 0xa 0679 7838 |x8 | Jump 0x6b2 ; case 0xb 067a 782d |x- | Jump 0x6a8 ; case 0xc 067b 7838 |x8 | Jump 0x6b4 ; case 0xd 067c 7835 |x5 | Jump 0x6b2 ; case 0xe 067d 7834 |x4 | Jump 0x6b2 ; case 0xf 067e 7833 |x3 | Jump 0x6b2 ; case 0x10 067f 7832 |x2 | Jump 0x6b2 ; case 0x11 0680 7831 |x1 | Jump 0x6b2 ; case 0x12 0681 e5fd | | Load 0x2,-0x3 ; Debug Table 0x16.0x4 = 0x681,0x4 0682 4604 |F | Jump_Case 0x5 0683 7830 |x0 | Jump 0x6b4 ; case 0x0 0684 782f |x/ | Jump 0x6b4 ; case 0x1 0685 782e |x. | Jump 0x6b4 ; case 0x2 0686 7801 |x | Jump 0x688 ; case 0x3 0687 7800 |x | Jump 0x688 ; case 0x4 0688 4800 |H | Short_Literal 0x0 ; Debug Table 0x16.0x5 = 0x688,0x6 0689 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 068a 7829 |x) | Jump 0x6b4 068b e5fd | | Load 0x2,-0x3 ; Debug Table 0x16.0x6 = 0x68b,0x7 068c 4604 |F | Jump_Case 0x5 068d 7826 |x& | Jump 0x6b4 ; case 0x0 068e 7825 |x% | Jump 0x6b4 ; case 0x1 068f 7802 |x | Jump 0x692 ; case 0x2 0690 780a |x | Jump 0x69b ; case 0x3 0691 7809 |x | Jump 0x69b ; case 0x4 0692 00db | | Load_Top At_Offset_3 ; Debug Table 0x16.0x7 = 0x692,0x9 0693 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0694 681f |h | Jump_Zero 0x6b4 0695 00db | | Load_Top At_Offset_3 0696 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0697 701c |p | Jump_Nonzero 0x6b4 0698 4800 |H | Short_Literal 0x0 ; Debug Table 0x16.0x8 = 0x698,0xa 0699 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 069a 7819 |x | Jump 0x6b4 069b 4800 |H | Short_Literal 0x0 ; Debug Table 0x16.0x9 = 0x69b,0xb 069c 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 069d 7816 |x | Jump 0x6b4 069e e5fd | | Load 0x2,-0x3 ; Debug Table 0x16.0xa = 0x69e,0xc 069f 4604 |F | Jump_Case 0x5 06a0 7813 |x | Jump 0x6b4 ; case 0x0 06a1 7803 |x | Jump 0x6a5 ; case 0x1 06a2 7811 |x | Jump 0x6b4 ; case 0x2 06a3 7801 |x | Jump 0x6a5 ; case 0x3 06a4 7800 |x | Jump 0x6a5 ; case 0x4 06a5 4800 |H | Short_Literal 0x0 ; Debug Table 0x16.0xb = 0x6a5,0xe 06a6 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 06a7 780c |x | Jump 0x6b4 06a8 e5fd | | Load 0x2,-0x3 ; Debug Table 0x16.0xc = 0x6a8,0xf 06a9 4604 |F | Jump_Case 0x5 06aa 7809 |x | Jump 0x6b4 ; case 0x0 06ab 7803 |x | Jump 0x6af ; case 0x1 06ac 7807 |x | Jump 0x6b4 ; case 0x2 06ad 7806 |x | Jump 0x6b4 ; case 0x3 06ae 7800 |x | Jump 0x6af ; case 0x4 06af 4800 |H | Short_Literal 0x0 ; Debug Table 0x16.0xd = 0x6af,0x11 06b0 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 06b1 7802 |x | Jump 0x6b4 06b2 4800 |H | Short_Literal 0x0 ; Debug Table 0x16.0xe = 0x6b2,0x13 06b3 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 06b4 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0xf = 0x6b4,0x14 06b5 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 06b6 0000 0000 | | .XXX[0x2] 06b8 ; -------------------------------------------------------------------------------------- 06b8 ; SUBPROGRAM 06b8 ; -------------------------------------------------------------------------------------- 06b8 06bc | | .CONST 0x06bc ; Address of begin 06b9 0004 | | .CONST 0x0004 ; Address of exception handler 06ba 0002 | | .CONST 0x0002 ; Number of locals 06bb INIT_06b8: 06bb 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x17 = .DEBUG 0x06bb,0x16da,0x0002,0x0000,0x005a,0x1125,0x0000,0x0584 ; Debug Table 0x17.0x0 = 0x6bb,0xffff 06bc BODY_06b8: 06bc e5fe | | Load 0x2,-0x2 ; Debug Table 0x17.0x1 = 0x6bc,0x1 06bd 8245 | E | Call 0x1,0x45 06be e5ff | | Load 0x2,-0x1 06bf 8246 | F | Call 0x1,0x46 06c0 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 06c1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0x2 = 0x6c1,0x2 06c2 6867 |hg | Jump_Zero 0x72a 06c3 e5fe | | Load 0x2,-0x2 ; Debug Table 0x17.0x3 = 0x6c3,0x3 06c4 4612 |F | Jump_Case 0x13 06c5 7859 |xY | Jump 0x71f ; case 0x0 06c6 7858 |xX | Jump 0x71f ; case 0x1 06c7 7822 |x" | Jump 0x6ea ; case 0x2 06c8 7821 |x! | Jump 0x6ea ; case 0x3 06c9 7860 |x` | Jump 0x72a ; case 0x4 06ca 784b |xK | Jump 0x716 ; case 0x5 06cb 785e |x^ | Jump 0x72a ; case 0x6 06cc 780b |x | Jump 0x6d8 ; case 0x7 06cd 785c |x\ | Jump 0x72a ; case 0x8 06ce 785b |x[ | Jump 0x72a ; case 0x9 06cf 7858 |xX | Jump 0x728 ; case 0xa 06d0 7857 |xW | Jump 0x728 ; case 0xb 06d1 7858 |xX | Jump 0x72a ; case 0xc 06d2 780e |x | Jump 0x6e1 ; case 0xd 06d3 7856 |xV | Jump 0x72a ; case 0xe 06d4 7855 |xU | Jump 0x72a ; case 0xf 06d5 7854 |xT | Jump 0x72a ; case 0x10 06d6 7851 |xQ | Jump 0x728 ; case 0x11 06d7 7852 |xR | Jump 0x72a ; case 0x12 06d8 00db | | Load_Top At_Offset_3 ; Debug Table 0x17.0x4 = 0x6d8,0x4 06d9 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 06da 684f |hO | Jump_Zero 0x72a 06db 00db | | Load_Top At_Offset_3 06dc 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 06dd 684c |hL | Jump_Zero 0x72a 06de 4800 |H | Short_Literal 0x0 ; Debug Table 0x17.0x5 = 0x6de,0x5 06df 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 06e0 7849 |xI | Jump 0x72a 06e1 00db | | Load_Top At_Offset_3 ; Debug Table 0x17.0x6 = 0x6e1,0x6 06e2 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 06e3 6846 |hF | Jump_Zero 0x72a 06e4 00db | | Load_Top At_Offset_3 06e5 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 06e6 6843 |hC | Jump_Zero 0x72a 06e7 4800 |H | Short_Literal 0x0 ; Debug Table 0x17.0x7 = 0x6e7,0x7 06e8 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 06e9 7840 |x@ | Jump 0x72a 06ea 00db | | Load_Top At_Offset_3 ; Debug Table 0x17.0x8 = 0x6ea,0x8 06eb 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 06ec 700b |p | Jump_Nonzero 0x6f8 06ed 00db | | Load_Top At_Offset_3 06ee 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 06ef 7006 |p | Jump_Nonzero 0x6f6 06f0 00db | | Load_Top At_Offset_3 06f1 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 06f2 7003 |p | Jump_Nonzero 0x6f6 06f3 00db | | Load_Top At_Offset_3 06f4 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 06f5 7803 |x | Jump 0x6f9 06f6 4801 |H | Short_Literal 0x1 06f7 7801 |x | Jump 0x6f9 06f8 4800 |H | Short_Literal 0x0 06f9 7019 |p | Jump_Nonzero 0x713 06fa 00db | | Load_Top At_Offset_3 06fb 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 06fc 6814 |h | Jump_Zero 0x711 06fd 00db | | Load_Top At_Offset_3 06fe 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 06ff e5ff | | Load 0x2,-0x1 0700 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0701 0279 | y | Execute Discrete,And 0702 700c |p | Jump_Nonzero 0x70f 0703 00db | | Load_Top At_Offset_3 0704 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0705 e5ff | | Load 0x2,-0x1 0706 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0707 0279 | y | Execute Discrete,And 0708 7006 |p | Jump_Nonzero 0x70f 0709 00db | | Load_Top At_Offset_3 070a 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 070b e5ff | | Load 0x2,-0x1 070c 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 070d 0279 | y | Execute Discrete,And 070e 7803 |x | Jump 0x712 070f 4801 |H | Short_Literal 0x1 0710 7801 |x | Jump 0x712 0711 4800 |H | Short_Literal 0x0 0712 6817 |h | Jump_Zero 0x72a 0713 4800 |H | Short_Literal 0x0 ; Debug Table 0x17.0x9 = 0x713,0x9 0714 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0715 7814 |x | Jump 0x72a 0716 00db | | Load_Top At_Offset_3 ; Debug Table 0x17.0xa = 0x716,0xa 0717 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0718 6811 |h | Jump_Zero 0x72a 0719 00db | | Load_Top At_Offset_3 071a 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 071b 680e |h | Jump_Zero 0x72a 071c 4800 |H | Short_Literal 0x0 ; Debug Table 0x17.0xb = 0x71c,0xb 071d 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 071e 780b |x | Jump 0x72a 071f 00db | | Load_Top At_Offset_3 ; Debug Table 0x17.0xc = 0x71f,0xc 0720 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0721 6808 |h | Jump_Zero 0x72a 0722 00db | | Load_Top At_Offset_3 0723 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0724 7005 |p | Jump_Nonzero 0x72a 0725 4800 |H | Short_Literal 0x0 ; Debug Table 0x17.0xd = 0x725,0xd 0726 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0727 7802 |x | Jump 0x72a 0728 4800 |H | Short_Literal 0x0 ; Debug Table 0x17.0xe = 0x728,0xf 0729 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 072a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0xf = 0x72a,0x10 072b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 072c 0000 0000 | | .BLANK 0000[0x4] 0730 ; -------------------------------------------------------------------------------------- 0730 ; SUBPROGRAM 0730 ; -------------------------------------------------------------------------------------- 0730 0733 | 3 | .CONST 0x0733 ; Address of begin 0731 0004 | | .CONST 0x0004 ; Address of exception handler 0732 0001 | | .CONST 0x0001 ; Number of locals 0733 BODY_0730: 0733 INIT_0730: 0733 00db | | Load_Top At_Offset_3 ; Debug Table 0x18 = .DEBUG 0x0733,0x16fc,0x0002,0x0000,0x005a,0x1125,0x0000,0x0591 ; Debug Table 0x18.0x0 = 0x733,0x1 0734 4603 |F | Jump_Case 0x4 0735 7803 |x | Jump 0x739 ; case 0x0 0736 7802 |x | Jump 0x739 ; case 0x1 0737 7803 |x | Jump 0x73b ; case 0x2 0738 780a |x | Jump 0x743 ; case 0x3 0739 4801 |H | Short_Literal 0x1 ; Debug Table 0x18.0x1 = 0x739,0x2 073a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 073b 00da | | Load_Top At_Offset_2 ; Debug Table 0x18.0x2 = 0x73b,0x3 073c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 073d 0f00 | | Execute_Immediate Equal,0x0 073e 00db | | Load_Top At_Offset_3 073f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0740 0f00 | | Execute_Immediate Equal,0x0 0741 0279 | y | Execute Discrete,And 0742 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0743 00da | | Load_Top At_Offset_2 ; Debug Table 0x18.0x3 = 0x743,0x4 0744 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0745 0f00 | | Execute_Immediate Equal,0x0 0746 00db | | Load_Top At_Offset_3 0747 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0748 0f00 | | Execute_Immediate Equal,0x0 0749 e5ff | | Load 0x2,-0x1 074a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 074b 0f00 | | Execute_Immediate Equal,0x0 074c 0279 | y | Execute Discrete,And 074d 0279 | y | Execute Discrete,And 074e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 074f 0000 | | .XXX[0x1] 0750 ; -------------------------------------------------------------------------------------- 0750 ; SUBPROGRAM 0750 ; -------------------------------------------------------------------------------------- 0750 0753 | S | .CONST 0x0753 ; Address of begin 0751 0004 | | .CONST 0x0004 ; Address of exception handler 0752 0001 | | .CONST 0x0001 ; Number of locals 0753 BODY_0750: 0753 INIT_0750: 0753 00db | | Load_Top At_Offset_3 ; Debug Table 0x19 = .DEBUG 0x0753,0x1706,0x0002,0x0000,0x005a,0x1125,0x0000,0x059e ; Debug Table 0x19.0x0 = 0x753,0x1 0754 0b09 | | Execute_Immediate Case_Compare,0x9 0755 7002 |p | Jump_Nonzero 0x758 0756 4800 |H | Short_Literal 0x0 ; Debug Table 0x19.0x1 = 0x756,0x3 0757 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0758 4801 |H | Short_Literal 0x1 ; Debug Table 0x19.0x2 = 0x758,0x2 0759 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 075a 0000 0000 | | .BLANK 0000[0x6] 0760 ; -------------------------------------------------------------------------------------- 0760 ; SUBPROGRAM 0760 ; -------------------------------------------------------------------------------------- 0760 0765 | e | .CONST 0x0765 ; Address of begin 0761 0004 | | .CONST 0x0004 ; Address of exception handler 0762 0002 | | .CONST 0x0002 ; Number of locals 0763 INIT_0760: 0763 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1a = .DEBUG 0x0763,0x170e,0x0002,0x0000,0x005a,0x3425,0x0000,0x0004 ; Debug Table 0x1a.0x0 = 0x763,0xffff 0764 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 0765 BODY_0760: 0765 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0x1 = 0x765,0x1 0766 e5ff | | Load 0x2,-0x1 0767 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0768 e5fe | | Load 0x2,-0x2 0769 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 076a 027a | z | Execute Discrete,Less_Equal 076b 0279 | y | Execute Discrete,And 076c 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 076d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0x2 = 0x76d,0x2 076e e5ff | | Load 0x2,-0x1 076f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0770 e5fe | | Load 0x2,-0x2 0771 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0772 027a | z | Execute Discrete,Less_Equal 0773 0279 | y | Execute Discrete,And 0774 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0775 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0x3 = 0x775,0x3 0776 e5ff | | Load 0x2,-0x1 0777 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0778 e5fe | | Load 0x2,-0x2 0779 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 077a 027a | z | Execute Discrete,Less_Equal 077b 0279 | y | Execute Discrete,And 077c 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 077d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0x4 = 0x77d,0x4 077e e5ff | | Load 0x2,-0x1 077f 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0780 e5fe | | Load 0x2,-0x2 0781 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0782 027a | z | Execute Discrete,Less_Equal 0783 0279 | y | Execute Discrete,And 0784 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0785 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0x5 = 0x785,0x5 0786 e5ff | | Load 0x2,-0x1 0787 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0788 e5fe | | Load 0x2,-0x2 0789 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 078a 027a | z | Execute Discrete,Less_Equal 078b 0279 | y | Execute Discrete,And 078c 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 078d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0x6 = 0x78d,0x6 078e e5ff | | Load 0x2,-0x1 078f 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0790 e5fe | | Load 0x2,-0x2 0791 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 0792 027a | z | Execute Discrete,Less_Equal 0793 0279 | y | Execute Discrete,And 0794 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0795 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0x7 = 0x795,0x7 0796 e5ff | | Load 0x2,-0x1 0797 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 0798 e5fe | | Load 0x2,-0x2 0799 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 079a 027a | z | Execute Discrete,Less_Equal 079b 0279 | y | Execute Discrete,And 079c 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 079d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0x8 = 0x79d,0x8 079e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 079f 0000 | | .XXX[0x1] 07a0 ; -------------------------------------------------------------------------------------- 07a0 ; SUBPROGRAM 07a0 ; -------------------------------------------------------------------------------------- 07a0 07a3 | | .CONST 0x07a3 ; Address of begin 07a1 0004 | | .CONST 0x0004 ; Address of exception handler 07a2 0001 | | .CONST 0x0001 ; Number of locals 07a3 BODY_07a0: 07a3 INIT_07a0: 07a3 00da | | Load_Top At_Offset_2 ; Debug Table 0x1b = .DEBUG 0x07a3,0x1722,0x0002,0x0000,0x005a,0x3425,0x0000,0x008d ; Debug Table 0x1b.0x0 = 0x7a3,0x1 07a4 4612 |F | Jump_Case 0x13 07a5 7812 |x | Jump 0x7b8 ; case 0x0 07a6 78ab |x | Jump 0x852 ; case 0x1 07a7 785a |xZ | Jump 0x802 ; case 0x2 07a8 7876 |xv | Jump 0x81f ; case 0x3 07a9 788f |x | Jump 0x839 ; case 0x4 07aa 788e |x | Jump 0x839 ; case 0x5 07ab 78a6 |x | Jump 0x852 ; case 0x6 07ac 7825 |x% | Jump 0x7d2 ; case 0x7 07ad 78a4 |x | Jump 0x852 ; case 0x8 07ae 78a3 |x | Jump 0x852 ; case 0x9 07af 78a2 |x | Jump 0x852 ; case 0xa 07b0 78a1 |x | Jump 0x852 ; case 0xb 07b1 7838 |x8 | Jump 0x7ea ; case 0xc 07b2 7837 |x7 | Jump 0x7ea ; case 0xd 07b3 789e |x | Jump 0x852 ; case 0xe 07b4 789d |x | Jump 0x852 ; case 0xf 07b5 789c |x | Jump 0x852 ; case 0x10 07b6 789b |x | Jump 0x852 ; case 0x11 07b7 789a |x | Jump 0x852 ; case 0x12 07b8 e210 | | Load 0x1,0x10 ; Debug Table 0x1b.0x1 = 0x7b8,0x2 07b9 0322 | " | Declare_Variable Record 07ba 4801 |H | Short_Literal 0x1 07bb 00d9 | | Load_Top At_Offset_1 07bc 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 07bd e5fe | | Load 0x2,-0x2 07be 0f02 | | Execute_Immediate Equal,0x2 07bf 00d9 | | Load_Top At_Offset_1 07c0 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 07c1 e5fe | | Load 0x2,-0x2 07c2 0f00 | | Execute_Immediate Equal,0x0 07c3 00d9 | | Load_Top At_Offset_1 07c4 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 07c5 4800 |H | Short_Literal 0x0 07c6 00d9 | | Load_Top At_Offset_1 07c7 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 07c8 4800 |H | Short_Literal 0x0 07c9 00d9 | | Load_Top At_Offset_1 07ca 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 07cb 4800 |H | Short_Literal 0x0 07cc 00d9 | | Load_Top At_Offset_1 07cd 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 07ce 4800 |H | Short_Literal 0x0 07cf 00d9 | | Load_Top At_Offset_1 07d0 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 07d1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 07d2 e210 | | Load 0x1,0x10 ; Debug Table 0x1b.0x2 = 0x7d2,0x3 07d3 0322 | " | Declare_Variable Record 07d4 4801 |H | Short_Literal 0x1 07d5 00d9 | | Load_Top At_Offset_1 07d6 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 07d7 4800 |H | Short_Literal 0x0 07d8 00d9 | | Load_Top At_Offset_1 07d9 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 07da 4800 |H | Short_Literal 0x0 07db 00d9 | | Load_Top At_Offset_1 07dc 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 07dd 4800 |H | Short_Literal 0x0 07de 00d9 | | Load_Top At_Offset_1 07df 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 07e0 4800 |H | Short_Literal 0x0 07e1 00d9 | | Load_Top At_Offset_1 07e2 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 07e3 4801 |H | Short_Literal 0x1 07e4 00d9 | | Load_Top At_Offset_1 07e5 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 07e6 4800 |H | Short_Literal 0x0 07e7 00d9 | | Load_Top At_Offset_1 07e8 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 07e9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 07ea e210 | | Load 0x1,0x10 ; Debug Table 0x1b.0x3 = 0x7ea,0x4 07eb 0322 | " | Declare_Variable Record 07ec 4801 |H | Short_Literal 0x1 07ed 00d9 | | Load_Top At_Offset_1 07ee 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 07ef 4800 |H | Short_Literal 0x0 07f0 00d9 | | Load_Top At_Offset_1 07f1 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 07f2 4800 |H | Short_Literal 0x0 07f3 00d9 | | Load_Top At_Offset_1 07f4 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 07f5 4800 |H | Short_Literal 0x0 07f6 00d9 | | Load_Top At_Offset_1 07f7 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 07f8 4800 |H | Short_Literal 0x0 07f9 00d9 | | Load_Top At_Offset_1 07fa 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 07fb 4800 |H | Short_Literal 0x0 07fc 00d9 | | Load_Top At_Offset_1 07fd 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 07fe 4800 |H | Short_Literal 0x0 07ff 00d9 | | Load_Top At_Offset_1 0800 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 0801 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0802 e210 | | Load 0x1,0x10 ; Debug Table 0x1b.0x4 = 0x802,0x5 0803 0322 | " | Declare_Variable Record 0804 4801 |H | Short_Literal 0x1 0805 00d9 | | Load_Top At_Offset_1 0806 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0807 4800 |H | Short_Literal 0x0 0808 00d9 | | Load_Top At_Offset_1 0809 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 080a 4800 |H | Short_Literal 0x0 080b 00d9 | | Load_Top At_Offset_1 080c 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 080d e5fe | | Load 0x2,-0x2 080e 6803 |h | Jump_Zero 0x812 080f e5fe | | Load 0x2,-0x2 0810 0f02 | | Execute_Immediate Equal,0x2 0811 7801 |x | Jump 0x813 0812 4801 |H | Short_Literal 0x1 0813 00d9 | | Load_Top At_Offset_1 0814 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0815 4800 |H | Short_Literal 0x0 0816 00d9 | | Load_Top At_Offset_1 0817 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0818 4800 |H | Short_Literal 0x0 0819 00d9 | | Load_Top At_Offset_1 081a 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 081b 4800 |H | Short_Literal 0x0 081c 00d9 | | Load_Top At_Offset_1 081d 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 081e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 081f e210 | | Load 0x1,0x10 ; Debug Table 0x1b.0x5 = 0x81f,0x6 0820 0322 | " | Declare_Variable Record 0821 4801 |H | Short_Literal 0x1 0822 00d9 | | Load_Top At_Offset_1 0823 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0824 4800 |H | Short_Literal 0x0 0825 00d9 | | Load_Top At_Offset_1 0826 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0827 e5fe | | Load 0x2,-0x2 0828 0f02 | | Execute_Immediate Equal,0x2 0829 00d9 | | Load_Top At_Offset_1 082a 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 082b 4800 |H | Short_Literal 0x0 082c 00d9 | | Load_Top At_Offset_1 082d 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 082e e5fe | | Load 0x2,-0x2 082f 0f02 | | Execute_Immediate Equal,0x2 0830 00d9 | | Load_Top At_Offset_1 0831 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0832 4800 |H | Short_Literal 0x0 0833 00d9 | | Load_Top At_Offset_1 0834 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0835 4800 |H | Short_Literal 0x0 0836 00d9 | | Load_Top At_Offset_1 0837 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 0838 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0839 e210 | | Load 0x1,0x10 ; Debug Table 0x1b.0x6 = 0x839,0x7 083a 0322 | " | Declare_Variable Record 083b 4801 |H | Short_Literal 0x1 083c 00d9 | | Load_Top At_Offset_1 083d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 083e 4800 |H | Short_Literal 0x0 083f 00d9 | | Load_Top At_Offset_1 0840 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0841 4800 |H | Short_Literal 0x0 0842 00d9 | | Load_Top At_Offset_1 0843 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0844 4800 |H | Short_Literal 0x0 0845 00d9 | | Load_Top At_Offset_1 0846 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0847 4800 |H | Short_Literal 0x0 0848 00d9 | | Load_Top At_Offset_1 0849 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 084a 4800 |H | Short_Literal 0x0 084b 00d9 | | Load_Top At_Offset_1 084c 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 084d e5fe | | Load 0x2,-0x2 084e 0f00 | | Execute_Immediate Equal,0x0 084f 00d9 | | Load_Top At_Offset_1 0850 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 0851 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0852 e210 | | Load 0x1,0x10 ; Debug Table 0x1b.0x7 = 0x852,0x8 0853 0322 | " | Declare_Variable Record 0854 4801 |H | Short_Literal 0x1 0855 00d9 | | Load_Top At_Offset_1 0856 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0857 4800 |H | Short_Literal 0x0 0858 00d9 | | Load_Top At_Offset_1 0859 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 085a 4800 |H | Short_Literal 0x0 085b 00d9 | | Load_Top At_Offset_1 085c 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 085d 4800 |H | Short_Literal 0x0 085e 00d9 | | Load_Top At_Offset_1 085f 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0860 4800 |H | Short_Literal 0x0 0861 00d9 | | Load_Top At_Offset_1 0862 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0863 4800 |H | Short_Literal 0x0 0864 00d9 | | Load_Top At_Offset_1 0865 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0866 4800 |H | Short_Literal 0x0 0867 00d9 | | Load_Top At_Offset_1 0868 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 0869 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 086a 0000 0000 | | .BLANK 0000[0x6] 0870 ; -------------------------------------------------------------------------------------- 0870 ; SUBPROGRAM 0870 ; -------------------------------------------------------------------------------------- 0870 0873 | s | .CONST 0x0873 ; Address of begin 0871 0004 | | .CONST 0x0004 ; Address of exception handler 0872 0001 | | .CONST 0x0001 ; Number of locals 0873 BODY_0870: 0873 INIT_0870: 0873 00da | | Load_Top At_Offset_2 ; Debug Table 0x1c = .DEBUG 0x0873,0x1734,0x0002,0x0000,0x005a,0x3425,0x0000,0x027b ; Debug Table 0x1c.0x0 = 0x873,0x1 0874 4612 |F | Jump_Case 0x13 0875 7812 |x | Jump 0x888 ; case 0x0 0876 7811 |x | Jump 0x888 ; case 0x1 0877 784c |xL | Jump 0x8c4 ; case 0x2 0878 784b |xK | Jump 0x8c4 ; case 0x3 0879 78a4 |x | Jump 0x91e ; case 0x4 087a 78c1 |x | Jump 0x93c ; case 0x5 087b 791a |y | Jump 0x996 ; case 0x6 087c 7865 |xe | Jump 0x8e2 ; case 0x7 087d 7918 |y | Jump 0x996 ; case 0x8 087e 7917 |y | Jump 0x996 ; case 0x9 087f 7916 |y | Jump 0x996 ; case 0xa 0880 7915 |y | Jump 0x996 ; case 0xb 0881 7824 |x$ | Jump 0x8a6 ; case 0xc 0882 787d |x} | Jump 0x900 ; case 0xd 0883 78d6 |x | Jump 0x95a ; case 0xe 0884 7911 |y | Jump 0x996 ; case 0xf 0885 7910 |y | Jump 0x996 ; case 0x10 0886 790f |y | Jump 0x996 ; case 0x11 0887 78f0 |x | Jump 0x978 ; case 0x12 0888 e212 | | Load 0x1,0x12 ; Debug Table 0x1c.0x1 = 0x888,0x2 0889 0322 | " | Declare_Variable Record 088a 4801 |H | Short_Literal 0x1 088b 00d9 | | Load_Top At_Offset_1 088c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 088d 4801 |H | Short_Literal 0x1 088e 00d9 | | Load_Top At_Offset_1 088f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0890 4800 |H | Short_Literal 0x0 0891 00d9 | | Load_Top At_Offset_1 0892 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0893 4801 |H | Short_Literal 0x1 0894 00d9 | | Load_Top At_Offset_1 0895 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0896 4800 |H | Short_Literal 0x0 0897 00d9 | | Load_Top At_Offset_1 0898 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0899 4801 |H | Short_Literal 0x1 089a 00d9 | | Load_Top At_Offset_1 089b 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 089c 4800 |H | Short_Literal 0x0 089d 00d9 | | Load_Top At_Offset_1 089e 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 089f 4800 |H | Short_Literal 0x0 08a0 00d9 | | Load_Top At_Offset_1 08a1 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 08a2 4800 |H | Short_Literal 0x0 08a3 00d9 | | Load_Top At_Offset_1 08a4 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 08a5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08a6 e212 | | Load 0x1,0x12 ; Debug Table 0x1c.0x2 = 0x8a6,0x3 08a7 0322 | " | Declare_Variable Record 08a8 4801 |H | Short_Literal 0x1 08a9 00d9 | | Load_Top At_Offset_1 08aa 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 08ab 4801 |H | Short_Literal 0x1 08ac 00d9 | | Load_Top At_Offset_1 08ad 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 08ae 4800 |H | Short_Literal 0x0 08af 00d9 | | Load_Top At_Offset_1 08b0 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 08b1 4800 |H | Short_Literal 0x0 08b2 00d9 | | Load_Top At_Offset_1 08b3 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 08b4 4800 |H | Short_Literal 0x0 08b5 00d9 | | Load_Top At_Offset_1 08b6 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 08b7 4800 |H | Short_Literal 0x0 08b8 00d9 | | Load_Top At_Offset_1 08b9 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 08ba 4800 |H | Short_Literal 0x0 08bb 00d9 | | Load_Top At_Offset_1 08bc 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 08bd 4800 |H | Short_Literal 0x0 08be 00d9 | | Load_Top At_Offset_1 08bf 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 08c0 4800 |H | Short_Literal 0x0 08c1 00d9 | | Load_Top At_Offset_1 08c2 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 08c3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08c4 e212 | | Load 0x1,0x12 ; Debug Table 0x1c.0x3 = 0x8c4,0x4 08c5 0322 | " | Declare_Variable Record 08c6 4801 |H | Short_Literal 0x1 08c7 00d9 | | Load_Top At_Offset_1 08c8 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 08c9 4801 |H | Short_Literal 0x1 08ca 00d9 | | Load_Top At_Offset_1 08cb 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 08cc 4801 |H | Short_Literal 0x1 08cd 00d9 | | Load_Top At_Offset_1 08ce 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 08cf 4801 |H | Short_Literal 0x1 08d0 00d9 | | Load_Top At_Offset_1 08d1 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 08d2 4801 |H | Short_Literal 0x1 08d3 00d9 | | Load_Top At_Offset_1 08d4 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 08d5 4801 |H | Short_Literal 0x1 08d6 00d9 | | Load_Top At_Offset_1 08d7 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 08d8 4800 |H | Short_Literal 0x0 08d9 00d9 | | Load_Top At_Offset_1 08da 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 08db 4800 |H | Short_Literal 0x0 08dc 00d9 | | Load_Top At_Offset_1 08dd 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 08de 4800 |H | Short_Literal 0x0 08df 00d9 | | Load_Top At_Offset_1 08e0 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 08e1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08e2 e212 | | Load 0x1,0x12 ; Debug Table 0x1c.0x4 = 0x8e2,0x5 08e3 0322 | " | Declare_Variable Record 08e4 4801 |H | Short_Literal 0x1 08e5 00d9 | | Load_Top At_Offset_1 08e6 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 08e7 4801 |H | Short_Literal 0x1 08e8 00d9 | | Load_Top At_Offset_1 08e9 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 08ea 4800 |H | Short_Literal 0x0 08eb 00d9 | | Load_Top At_Offset_1 08ec 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 08ed 4801 |H | Short_Literal 0x1 08ee 00d9 | | Load_Top At_Offset_1 08ef 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 08f0 4800 |H | Short_Literal 0x0 08f1 00d9 | | Load_Top At_Offset_1 08f2 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 08f3 4800 |H | Short_Literal 0x0 08f4 00d9 | | Load_Top At_Offset_1 08f5 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 08f6 4800 |H | Short_Literal 0x0 08f7 00d9 | | Load_Top At_Offset_1 08f8 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 08f9 4800 |H | Short_Literal 0x0 08fa 00d9 | | Load_Top At_Offset_1 08fb 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 08fc 4800 |H | Short_Literal 0x0 08fd 00d9 | | Load_Top At_Offset_1 08fe 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 08ff 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0900 e212 | | Load 0x1,0x12 ; Debug Table 0x1c.0x5 = 0x900,0x6 0901 0322 | " | Declare_Variable Record 0902 4801 |H | Short_Literal 0x1 0903 00d9 | | Load_Top At_Offset_1 0904 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0905 4801 |H | Short_Literal 0x1 0906 00d9 | | Load_Top At_Offset_1 0907 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0908 4800 |H | Short_Literal 0x0 0909 00d9 | | Load_Top At_Offset_1 090a 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 090b 4801 |H | Short_Literal 0x1 090c 00d9 | | Load_Top At_Offset_1 090d 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 090e 4800 |H | Short_Literal 0x0 090f 00d9 | | Load_Top At_Offset_1 0910 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0911 4800 |H | Short_Literal 0x0 0912 00d9 | | Load_Top At_Offset_1 0913 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0914 4800 |H | Short_Literal 0x0 0915 00d9 | | Load_Top At_Offset_1 0916 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 0917 4800 |H | Short_Literal 0x0 0918 00d9 | | Load_Top At_Offset_1 0919 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 091a 4800 |H | Short_Literal 0x0 091b 00d9 | | Load_Top At_Offset_1 091c 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 091d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 091e e212 | | Load 0x1,0x12 ; Debug Table 0x1c.0x6 = 0x91e,0x7 091f 0322 | " | Declare_Variable Record 0920 4801 |H | Short_Literal 0x1 0921 00d9 | | Load_Top At_Offset_1 0922 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0923 4800 |H | Short_Literal 0x0 0924 00d9 | | Load_Top At_Offset_1 0925 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0926 4800 |H | Short_Literal 0x0 0927 00d9 | | Load_Top At_Offset_1 0928 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0929 4800 |H | Short_Literal 0x0 092a 00d9 | | Load_Top At_Offset_1 092b 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 092c 4800 |H | Short_Literal 0x0 092d 00d9 | | Load_Top At_Offset_1 092e 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 092f 4800 |H | Short_Literal 0x0 0930 00d9 | | Load_Top At_Offset_1 0931 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0932 4800 |H | Short_Literal 0x0 0933 00d9 | | Load_Top At_Offset_1 0934 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 0935 4801 |H | Short_Literal 0x1 0936 00d9 | | Load_Top At_Offset_1 0937 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 0938 4800 |H | Short_Literal 0x0 0939 00d9 | | Load_Top At_Offset_1 093a 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 093b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 093c e212 | | Load 0x1,0x12 ; Debug Table 0x1c.0x7 = 0x93c,0x8 093d 0322 | " | Declare_Variable Record 093e 4801 |H | Short_Literal 0x1 093f 00d9 | | Load_Top At_Offset_1 0940 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0941 4800 |H | Short_Literal 0x0 0942 00d9 | | Load_Top At_Offset_1 0943 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0944 4800 |H | Short_Literal 0x0 0945 00d9 | | Load_Top At_Offset_1 0946 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0947 4800 |H | Short_Literal 0x0 0948 00d9 | | Load_Top At_Offset_1 0949 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 094a 4800 |H | Short_Literal 0x0 094b 00d9 | | Load_Top At_Offset_1 094c 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 094d 4800 |H | Short_Literal 0x0 094e 00d9 | | Load_Top At_Offset_1 094f 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0950 4801 |H | Short_Literal 0x1 0951 00d9 | | Load_Top At_Offset_1 0952 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 0953 4801 |H | Short_Literal 0x1 0954 00d9 | | Load_Top At_Offset_1 0955 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 0956 4800 |H | Short_Literal 0x0 0957 00d9 | | Load_Top At_Offset_1 0958 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 0959 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 095a e212 | | Load 0x1,0x12 ; Debug Table 0x1c.0x8 = 0x95a,0x9 095b 0322 | " | Declare_Variable Record 095c 4800 |H | Short_Literal 0x0 095d 00d9 | | Load_Top At_Offset_1 095e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 095f 4800 |H | Short_Literal 0x0 0960 00d9 | | Load_Top At_Offset_1 0961 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0962 4800 |H | Short_Literal 0x0 0963 00d9 | | Load_Top At_Offset_1 0964 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0965 4800 |H | Short_Literal 0x0 0966 00d9 | | Load_Top At_Offset_1 0967 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0968 4800 |H | Short_Literal 0x0 0969 00d9 | | Load_Top At_Offset_1 096a 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 096b 4800 |H | Short_Literal 0x0 096c 00d9 | | Load_Top At_Offset_1 096d 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 096e 4800 |H | Short_Literal 0x0 096f 00d9 | | Load_Top At_Offset_1 0970 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 0971 4800 |H | Short_Literal 0x0 0972 00d9 | | Load_Top At_Offset_1 0973 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 0974 4801 |H | Short_Literal 0x1 0975 00d9 | | Load_Top At_Offset_1 0976 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 0977 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0978 e212 | | Load 0x1,0x12 ; Debug Table 0x1c.0x9 = 0x978,0xa 0979 0322 | " | Declare_Variable Record 097a 4801 |H | Short_Literal 0x1 097b 00d9 | | Load_Top At_Offset_1 097c 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 097d 4800 |H | Short_Literal 0x0 097e 00d9 | | Load_Top At_Offset_1 097f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0980 4800 |H | Short_Literal 0x0 0981 00d9 | | Load_Top At_Offset_1 0982 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0983 4800 |H | Short_Literal 0x0 0984 00d9 | | Load_Top At_Offset_1 0985 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0986 4800 |H | Short_Literal 0x0 0987 00d9 | | Load_Top At_Offset_1 0988 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0989 4800 |H | Short_Literal 0x0 098a 00d9 | | Load_Top At_Offset_1 098b 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 098c 4800 |H | Short_Literal 0x0 098d 00d9 | | Load_Top At_Offset_1 098e 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 098f 4800 |H | Short_Literal 0x0 0990 00d9 | | Load_Top At_Offset_1 0991 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 0992 4800 |H | Short_Literal 0x0 0993 00d9 | | Load_Top At_Offset_1 0994 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 0995 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0996 e212 | | Load 0x1,0x12 ; Debug Table 0x1c.0xa = 0x996,0xb 0997 0322 | " | Declare_Variable Record 0998 4800 |H | Short_Literal 0x0 0999 00d9 | | Load_Top At_Offset_1 099a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 099b 4800 |H | Short_Literal 0x0 099c 00d9 | | Load_Top At_Offset_1 099d 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 099e 4800 |H | Short_Literal 0x0 099f 00d9 | | Load_Top At_Offset_1 09a0 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 09a1 4800 |H | Short_Literal 0x0 09a2 00d9 | | Load_Top At_Offset_1 09a3 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 09a4 4800 |H | Short_Literal 0x0 09a5 00d9 | | Load_Top At_Offset_1 09a6 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 09a7 4800 |H | Short_Literal 0x0 09a8 00d9 | | Load_Top At_Offset_1 09a9 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 09aa 4800 |H | Short_Literal 0x0 09ab 00d9 | | Load_Top At_Offset_1 09ac 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 09ad 4800 |H | Short_Literal 0x0 09ae 00d9 | | Load_Top At_Offset_1 09af 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 09b0 4800 |H | Short_Literal 0x0 09b1 00d9 | | Load_Top At_Offset_1 09b2 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 09b3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 09b4 0000 0000 | | .BLANK 0000[0x4] 09b8 ; -------------------------------------------------------------------------------------- 09b8 ; SUBPROGRAM 09b8 ; -------------------------------------------------------------------------------------- 09b8 09bd | | .CONST 0x09bd ; Address of begin 09b9 0004 | | .CONST 0x0004 ; Address of exception handler 09ba 0002 | | .CONST 0x0002 ; Number of locals 09bb INIT_09b8: 09bb 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1d = .DEBUG 0x09bb,0x174c,0x0002,0x0000,0x005a,0x3425,0x0000,0x0445 ; Debug Table 0x1d.0x0 = 0x9bb,0xffff 09bc 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 09bd BODY_09b8: 09bd 00db | | Load_Top At_Offset_3 ; Debug Table 0x1d.0x1 = 0x9bd,0x1 09be 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 09bf 6805 |h | Jump_Zero 0x9c5 09c0 00db | | Load_Top At_Offset_3 09c1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 09c2 6802 |h | Jump_Zero 0x9c5 09c3 4800 |H | Short_Literal 0x0 ; Debug Table 0x1d.0x2 = 0x9c3,0x2 09c4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 09c5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x3 = 0x9c5,0x3 09c6 e5ff | | Load 0x2,-0x1 09c7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 09c8 e5fe | | Load 0x2,-0x2 09c9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 09ca 027a | z | Execute Discrete,Less_Equal 09cb 0279 | y | Execute Discrete,And 09cc 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 09cd 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x4 = 0x9cd,0x4 09ce e5ff | | Load 0x2,-0x1 09cf 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 09d0 e5fe | | Load 0x2,-0x2 09d1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 09d2 027a | z | Execute Discrete,Less_Equal 09d3 0279 | y | Execute Discrete,And 09d4 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 09d5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x5 = 0x9d5,0x5 09d6 e5ff | | Load 0x2,-0x1 09d7 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 09d8 e5fe | | Load 0x2,-0x2 09d9 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 09da 027a | z | Execute Discrete,Less_Equal 09db 0279 | y | Execute Discrete,And 09dc 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 09dd 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x6 = 0x9dd,0x6 09de e5ff | | Load 0x2,-0x1 09df 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 09e0 e5fe | | Load 0x2,-0x2 09e1 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 09e2 027a | z | Execute Discrete,Less_Equal 09e3 0279 | y | Execute Discrete,And 09e4 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 09e5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x7 = 0x9e5,0x7 09e6 e5ff | | Load 0x2,-0x1 09e7 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 09e8 e5fe | | Load 0x2,-0x2 09e9 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 09ea 027a | z | Execute Discrete,Less_Equal 09eb 0279 | y | Execute Discrete,And 09ec 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 09ed 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x8 = 0x9ed,0x8 09ee e5ff | | Load 0x2,-0x1 09ef 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 09f0 e5fe | | Load 0x2,-0x2 09f1 3c05 |< | Execute Record,Field_Read,Field_Number 0x5 09f2 027a | z | Execute Discrete,Less_Equal 09f3 0279 | y | Execute Discrete,And 09f4 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 09f5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x9 = 0x9f5,0x9 09f6 e5ff | | Load 0x2,-0x1 09f7 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 09f8 e5fe | | Load 0x2,-0x2 09f9 3c06 |< | Execute Record,Field_Read,Field_Number 0x6 09fa 027a | z | Execute Discrete,Less_Equal 09fb 0279 | y | Execute Discrete,And 09fc 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 09fd 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0xa = 0x9fd,0xa 09fe e5ff | | Load 0x2,-0x1 09ff 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0a00 e5fe | | Load 0x2,-0x2 0a01 3c07 |< | Execute Record,Field_Read,Field_Number 0x7 0a02 027a | z | Execute Discrete,Less_Equal 0a03 0279 | y | Execute Discrete,And 0a04 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0a05 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0xb = 0xa05,0xb 0a06 e5ff | | Load 0x2,-0x1 0a07 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0a08 e5fe | | Load 0x2,-0x2 0a09 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0a0a 027a | z | Execute Discrete,Less_Equal 0a0b 0279 | y | Execute Discrete,And 0a0c 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 0a0d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0xc = 0xa0d,0xc 0a0e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0a0f ; -------------------------------------------------------------------------------------- 0a0f ; STRING TABLE 0a0f ; -------------------------------------------------------------------------------------- 0a0f 028a | | .STRTAB 0x028a->0x0b54 ; "DISCRETE_CLASS" 0a10 0296 | | .STRTAB 0x0296->0x0b5b ; "FLOAT_CLASS" 0a11 029f | | .STRTAB 0x029f->0x0b60 ; "ACCESS_CLASS" 0a12 02a9 | | .STRTAB 0x02a9->0x0b66 ; "HEAP_ACCESS_CLASS" 0a13 02b8 | | .STRTAB 0x02b8->0x0b6f ; "PACKAGE_CLASS" 0a14 02c3 | | .STRTAB 0x02c3->0x0b75 ; "TASK_CLASS" 0a15 02cb | | .STRTAB 0x02cb->0x0b7a ; "MODULE_CLASS" 0a16 02d5 | | .STRTAB 0x02d5->0x0b80 ; "ARRAY_CLASS" 0a17 02de | | .STRTAB 0x02de->0x0b86 ; "VECTOR_CLASS" 0a18 02e8 | | .STRTAB 0x02e8->0x0b8c ; "MATRIX_CLASS" 0a19 02f2 | | .STRTAB 0x02f2->0x0b92 ; "SUBARRAY_CLASS" 0a1a 02fe | | .STRTAB 0x02fe->0x0b99 ; "SUBVECTOR_CLASS" 0a1b 030b | | .STRTAB 0x030b->0x0ba0 ; "RECORD_CLASS" 0a1c 0315 | | .STRTAB 0x0315->0x0ba6 ; "VARIANT_RECORD_CLASS" 0a1d 0327 | ' | .STRTAB 0x0327->0x0bb0 ; "SELECT_CLASS" 0a1e 0331 | 1 | .STRTAB 0x0331->0x0bb6 ; "ENTRY_CLASS" 0a1f 033a | : | .STRTAB 0x033a->0x0bbc ; "FAMILY_CLASS" 0a20 0344 | D | .STRTAB 0x0344->0x0bc2 ; "EXCEPTION_CLASS" 0a21 0351 | Q | .STRTAB 0x0351->0x0bc9 ; "ANY_CLASS" 0a22 0358 | X | .STRTAB 0x0358->0x0bce ; "EQUAL_OP" 0a23 035e | ^ | .STRTAB 0x035e->0x0bd2 ; "NOT_EQUAL_OP" 0a24 0368 | h | .STRTAB 0x0368->0x0bd8 ; "GREATER_OP" 0a25 0370 | p | .STRTAB 0x0370->0x0bdd ; "LESS_OP" 0a26 0375 | u | .STRTAB 0x0375->0x0be0 ; "GREATER_EQUAL_OP" 0a27 0383 | | .STRTAB 0x0383->0x0be8 ; "LESS_EQUAL_OP" 0a28 038e | | .STRTAB 0x038e->0x0bef ; "CASE_COMPARE_OP" 0a29 039b | | .STRTAB 0x039b->0x0bf6 ; "BELOW_BOUND_OP" 0a2a 03a7 | | .STRTAB 0x03a7->0x0bfd ; "ABOVE_BOUND_OP" 0a2b 03b3 | | .STRTAB 0x03b3->0x0c04 ; "IN_RANGE_OP" 0a2c 03bc | | .STRTAB 0x03bc->0x0c0a ; "NOT_IN_RANGE_OP" 0a2d 03c9 | | .STRTAB 0x03c9->0x0c11 ; "CASE_IN_RANGE_OP" 0a2e 03d7 | | .STRTAB 0x03d7->0x0c19 ; "BOUNDS_CHECK_OP" 0a2f 03e4 | | .STRTAB 0x03e4->0x0c21 ; "REVERSE_BOUNDS_CHECK_OP" 0a30 03f9 | | .STRTAB 0x03f9->0x0c2c ; "BOUNDS_OP" 0a31 0400 | | .STRTAB 0x0400->0x0c31 ; "REVERSE_BOUNDS_OP" 0a32 040f | | .STRTAB 0x040f->0x0c39 ; "FIRST_OP" 0a33 0415 | | .STRTAB 0x0415->0x0c3d ; "LAST_OP" 0a34 041a | | .STRTAB 0x041a->0x0c41 ; "SET_VALUE_OP" 0a35 0424 | $ | .STRTAB 0x0424->0x0c47 ; "SET_VALUE_UNCHECKED_OP" 0a36 0438 | 8 | .STRTAB 0x0438->0x0c52 ; "SET_VALUE_VISIBLE_OP" 0a37 044a | J | .STRTAB 0x044a->0x0c5c ; "SET_VALUE_VISIBLE_UNCHECKED_OP" 0a38 0466 | f | .STRTAB 0x0466->0x0c6b ; "TEST_AND_SET_PREVIOUS_OP" 0a39 047c | | | .STRTAB 0x047c->0x0c77 ; "TEST_AND_SET_NEXT_OP" 0a3a 048e | | .STRTAB 0x048e->0x0c81 ; "SUCCESSOR_OP" 0a3b 0498 | | .STRTAB 0x0498->0x0c87 ; "PREDECESSOR_OP" 0a3c 04a4 | | .STRTAB 0x04a4->0x0c8e ; "AND_OP" 0a3d 04a8 | | .STRTAB 0x04a8->0x0c91 ; "OR_OP" 0a3e 04ab | | .STRTAB 0x04ab->0x0c93 ; "XOR_OP" 0a3f 04af | | .STRTAB 0x04af->0x0c96 ; "COMPLEMENT_OP" 0a40 04ba | | .STRTAB 0x04ba->0x0c9d ; "UNARY_MINUS_OP" 0a41 04c6 | | .STRTAB 0x04c6->0x0ca4 ; "ABSOLUTE_VALUE_OP" 0a42 04d5 | | .STRTAB 0x04d5->0x0cac ; "PLUS_OP" 0a43 04da | | .STRTAB 0x04da->0x0cb0 ; "MINUS_OP" 0a44 04e0 | | .STRTAB 0x04e0->0x0cb4 ; "TIMES_OP" 0a45 04e6 | | .STRTAB 0x04e6->0x0cb8 ; "DIVIDE_OP" 0a46 04ed | | .STRTAB 0x04ed->0x0cbc ; "MODULO_OP" 0a47 04f4 | | .STRTAB 0x04f4->0x0cc1 ; "REMAINDER_OP" 0a48 04fe | | .STRTAB 0x04fe->0x0cc7 ; "MINIMUM_OP" 0a49 0506 | | .STRTAB 0x0506->0x0ccc ; "MAXIMUM_OP" 0a4a 050e | | .STRTAB 0x050e->0x0cd1 ; "EXPONENTIATE_OP" 0a4b 051b | | .STRTAB 0x051b->0x0cd8 ; "BINARY_SCALE_OP" 0a4c 0528 | ( | .STRTAB 0x0528->0x0ce0 ; "MULTIPLY_AND_SCALE_OP" 0a4d 053b | ; | .STRTAB 0x053b->0x0cea ; "DIVIDE_AND_SCALE_OP" 0a4e 054c | L | .STRTAB 0x054c->0x0cf4 ; "PARTIAL_PLUS_OP" 0a4f 0559 | Y | .STRTAB 0x0559->0x0cfb ; "PARTIAL_MINUS_OP" 0a50 0567 | g | .STRTAB 0x0567->0x0d03 ; "ARITHMETIC_SHIFT_OP" 0a51 0578 | x | .STRTAB 0x0578->0x0d0d ; "LOGICAL_SHIFT_OP" 0a52 0586 | | .STRTAB 0x0586->0x0d15 ; "ROTATE_OP" 0a53 058d | | .STRTAB 0x058d->0x0d19 ; "INSERT_BITS_OP" 0a54 0599 | | .STRTAB 0x0599->0x0d20 ; "EXTRACT_BITS_OP" 0a55 05a6 | | .STRTAB 0x05a6->0x0d28 ; "IS_UNSIGNED_OP" 0a56 05b2 | | .STRTAB 0x05b2->0x0d2f ; "COUNT_NONZERO_BITS_OP" 0a57 05c5 | | .STRTAB 0x05c5->0x0d39 ; "COUNT_LEADING_ZEROS_OP" 0a58 05d9 | | .STRTAB 0x05d9->0x0d44 ; "COUNT_TRAILING_ZEROS_OP" 0a59 05ee | | .STRTAB 0x05ee->0x0d50 ; "ROUND_TO_DISCRETE_OP" 0a5a 0600 | | .STRTAB 0x0600->0x0d5a ; "TRUNCATE_TO_DISCRETE_OP" 0a5b 0615 | | .STRTAB 0x0615->0x0d65 ; "CONVERT_FROM_DISCRETE_OP" 0a5c 062b | + | .STRTAB 0x062b->0x0d71 ; "EQUAL_ZERO_OP" 0a5d 0636 | 6 | .STRTAB 0x0636->0x0d78 ; "NOT_EQUAL_ZERO_OP" 0a5e 0645 | E | .STRTAB 0x0645->0x0d80 ; "GREATER_ZERO_OP" 0a5f 0652 | R | .STRTAB 0x0652->0x0d88 ; "LESS_ZERO_OP" 0a60 065c | \ | .STRTAB 0x065c->0x0d8e ; "GREATER_EQUAL_ZERO_OP" 0a61 066f | o | .STRTAB 0x066f->0x0d98 ; "LESS_EQUAL_ZERO_OP" 0a62 067f | | .STRTAB 0x067f->0x0da1 ; "IS_NULL_OP" 0a63 0687 | | .STRTAB 0x0687->0x0da6 ; "NOT_NULL_OP" 0a64 0690 | | .STRTAB 0x0690->0x0dac ; "SET_NULL_OP" 0a65 0699 | | .STRTAB 0x0699->0x0db1 ; "ELEMENT_TYPE_OP" 0a66 06a6 | | .STRTAB 0x06a6->0x0db9 ; "ALL_READ_OP" 0a67 06af | | .STRTAB 0x06af->0x0dbe ; "ALL_WRITE_OP" 0a68 06b9 | | .STRTAB 0x06b9->0x0dc4 ; "ALL_REFERENCE_OP" 0a69 06c7 | | .STRTAB 0x06c7->0x0dcc ; "CONVERT_REFERENCE_OP" 0a6a 06d9 | | .STRTAB 0x06d9->0x0dd6 ; "ALLOW_DEALLOCATE_OP" 0a6b 06ea | | .STRTAB 0x06ea->0x0de0 ; "DEALLOCATE_OP" 0a6c 06f5 | | .STRTAB 0x06f5->0x0de6 ; "HASH_OP" 0a6d 06fa | | .STRTAB 0x06fa->0x0dea ; "CONSTRUCT_SEGMENT_OP" 0a6e 070c | | .STRTAB 0x070c->0x0df4 ; "GET_SEGMENT_OP" 0a6f 0718 | | .STRTAB 0x0718->0x0dfb ; "GET_OFFSET_OP" 0a70 0723 | # | .STRTAB 0x0723->0x0e01 ; "DIANA_TREE_KIND_OP" 0a71 0733 | 3 | .STRTAB 0x0733->0x0e0a ; "DIANA_MAP_KIND_TO_VCI_OP" 0a72 0749 | I | .STRTAB 0x0749->0x0e16 ; "DIANA_ARITY_FOR_KIND_OP" 0a73 075e | ^ | .STRTAB 0x075e->0x0e22 ; "DIANA_ALLOCATE_TREE_NODE_OP" 0a74 0777 | w | .STRTAB 0x0777->0x0e2f ; "DIANA_PUT_NODE_ON_SEQ_TYPE_OP" 0a75 0792 | | .STRTAB 0x0792->0x0e3e ; "DIANA_SEQ_TYPE_GET_HEAD_OP" 0a76 07aa | | .STRTAB 0x07aa->0x0e4b ; "DIANA_FIND_PERMANENT_ATTRIBUTE_OP" 0a77 07c9 | | .STRTAB 0x07c9->0x0e5b ; "DIANA_SPARE0_OP" 0a78 07d6 | | .STRTAB 0x07d6->0x0e63 ; "DIANA_SPARE1_OP" 0a79 07e3 | | .STRTAB 0x07e3->0x0e6a ; "DIANA_SPARE2_OP" 0a7a 07f0 | | .STRTAB 0x07f0->0x0e72 ; "ADAPTIVE_BALANCED_TREE_LOOKUP_OP" 0a7b 080e | | .STRTAB 0x080e->0x0e82 ; "ELABORATE_OP" 0a7c 0818 | | .STRTAB 0x0818->0x0e88 ; "CHECK_ELABORATED_OP" 0a7d 0829 | ) | .STRTAB 0x0829->0x0e91 ; "AUGMENT_IMPORTS_OP" 0a7e 0839 | 9 | .STRTAB 0x0839->0x0e9a ; "ACTIVATE_OP" 0a7f 0842 | B | .STRTAB 0x0842->0x0ea0 ; "ABORT_OP" 0a80 0848 | H | .STRTAB 0x0848->0x0ea4 ; "ABORT_MULTIPLE_OP" 0a81 0857 | W | .STRTAB 0x0857->0x0eac ; "RENDEZVOUS_OP" 0a82 0862 | b | .STRTAB 0x0862->0x0eb3 ; "COUNT_OP" 0a83 0868 | h | .STRTAB 0x0868->0x0eb7 ; "IS_CALLABLE_OP" 0a84 0874 | t | .STRTAB 0x0874->0x0ebe ; "IS_TERMINATED_OP" 0a85 0882 | | .STRTAB 0x0882->0x0ec6 ; "TIMED_DURATION_WRITE_OP" 0a86 0897 | | .STRTAB 0x0897->0x0ed1 ; "TERMINATE_GUARD_WRITE_OP" 0a87 08ad | | .STRTAB 0x08ad->0x0edd ; "TIMED_GUARD_WRITE_OP" 0a88 08bf | | .STRTAB 0x08bf->0x0ee7 ; "LENGTH_OP" 0a89 08c6 | | .STRTAB 0x08c6->0x0eec ; "STRUCTURE_WRITE_OP" 0a8a 08d6 | | .STRTAB 0x08d6->0x0ef5 ; "STRUCTURE_CLEAR_OP" 0a8b 08e6 | | .STRTAB 0x08e6->0x0efe ; "SLICE_READ_OP" 0a8c 08f1 | | .STRTAB 0x08f1->0x0f04 ; "SLICE_WRITE_OP" 0a8d 08fd | | .STRTAB 0x08fd->0x0f0b ; "SLICE_REFERENCE_OP" 0a8e 090d | | .STRTAB 0x090d->0x0f14 ; "CATENATE_OP" 0a8f 0916 | | .STRTAB 0x0916->0x0f1a ; "APPEND_OP" 0a90 091d | | .STRTAB 0x091d->0x0f1e ; "PREPEND_OP" 0a91 0925 | % | .STRTAB 0x0925->0x0f23 ; "SUBARRAY_OP" 0a92 092e | . | .STRTAB 0x092e->0x0f29 ; "COMPONENT_OFFSET_OP" 0a93 093f | ? | .STRTAB 0x093f->0x0f32 ; "IS_CONSTRAINED_OP" 0a94 094e | N | .STRTAB 0x094e->0x0f3b ; "IS_CONSTRAINED_OBJECT_OP" 0a95 0964 | d | .STRTAB 0x0964->0x0f47 ; "MAKE_CONSTRAINED_OP" 0a96 0975 | u | .STRTAB 0x0975->0x0f50 ; "INDIRECTS_APPENDED_OP" 0a97 0988 | | .STRTAB 0x0988->0x0f5b ; "STRUCTURE_QUERY_OP" 0a98 0998 | | .STRTAB 0x0998->0x0f64 ; "REFERENCE_MAKES_COPY_OP" 0a99 09ad | | .STRTAB 0x09ad->0x0f6f ; "READ_VARIANT_OP" 0a9a 09ba | | .STRTAB 0x09ba->0x0f77 ; "READ_DISCRIMINANT_CONSTRAINT_OP" 0a9b 09d7 | | .STRTAB 0x09d7->0x0f86 ; "FIELD_READ_OP" 0a9c 09e2 | | .STRTAB 0x09e2->0x0f8d ; "FIELD_WRITE_OP" 0a9d 09ee | | .STRTAB 0x09ee->0x0f94 ; "FIELD_REFERENCE_OP" 0a9e 09fe | | .STRTAB 0x09fe->0x0f9d ; "FIELD_APPEND_OP" 0a9f 0a0b | | .STRTAB 0x0a0b->0x0fa4 ; "FIELD_TYPE_OP" 0aa0 0a16 | | .STRTAB 0x0a16->0x0fab ; "FIELD_CONSTRAIN_OP" 0aa1 0a26 | & | .STRTAB 0x0a26->0x0fb4 ; "SET_BOUNDS_OP" 0aa2 0a31 | 1 | .STRTAB 0x0a31->0x0fba ; "SET_VARIANT_OP" 0aa3 0a3d | = | .STRTAB 0x0a3d->0x0fc1 ; "FIELD_EXECUTE_OP" 0aa4 0a4b | K | .STRTAB 0x0a4b->0x0fc9 ; "ENTRY_CALL_OP" 0aa5 0a56 | V | .STRTAB 0x0a56->0x0fd0 ; "CONDITIONAL_CALL_OP" 0aa6 0a67 | g | .STRTAB 0x0a67->0x0fd9 ; "TIMED_CALL_OP" 0aa7 0a72 | r | .STRTAB 0x0a72->0x0fe0 ; "FAMILY_CALL_OP" 0aa8 0a7e | ~ | .STRTAB 0x0a7e->0x0fe7 ; "FAMILY_TIMED_OP" 0aa9 0a8b | | .STRTAB 0x0a8b->0x0fee ; "FAMILY_CONDITIONAL_OP" 0aaa 0a9e | | .STRTAB 0x0a9e->0x0ff9 ; "GUARD_WRITE_OP" 0aab 0aaa | | .STRTAB 0x0aaa->0x1000 ; "MEMBER_WRITE_OP" 0aac 0ab7 | | .STRTAB 0x0ab7->0x1007 ; "WRITE_UNCHECKED_OP" 0aad 0ac7 | | .STRTAB 0x0ac7->0x1010 ; "FIELD_READ_DYNAMIC_OP" 0aae 0ada | | .STRTAB 0x0ada->0x101b ; "FIELD_WRITE_DYNAMIC_OP" 0aaf 0aee | | .STRTAB 0x0aee->0x1026 ; "FIELD_TYPE_DYNAMIC_OP" 0ab0 0b01 | | .STRTAB 0x0b01->0x1030 ; "FIELD_EXECUTE_DYNAMIC_OP" 0ab1 0b17 | | .STRTAB 0x0b17->0x103c ; "FIELD_REFERENCE_DYNAMIC_OP" 0ab2 0b2f | / | .STRTAB 0x0b2f->0x1049 ; "REFERENCE_LEX_1_OP" 0ab3 0b3f | ? | .STRTAB 0x0b3f->0x1052 ; "CONVERT_OP" 0ab4 0b47 | G | .STRTAB 0x0b47->0x1057 ; "CONVERT_UNCHECKED_OP" 0ab5 0b59 | Y | .STRTAB 0x0b59->0x1061 ; "CONVERT_TO_FORMAL_OP" 0ab6 0b6b | k | .STRTAB 0x0b6b->0x106b ; "CHECK_IN_TYPE_OP" 0ab7 0b79 | y | .STRTAB 0x0b79->0x1073 ; "CHECK_IN_FORMAL_TYPE_OP" 0ab8 0b8e | | .STRTAB 0x0b8e->0x107f ; "CHECK_IN_INTEGER_OP" 0ab9 0b9f | | .STRTAB 0x0b9f->0x1088 ; "IN_TYPE_OP" 0aba 0ba7 | | .STRTAB 0x0ba7->0x108d ; "NOT_IN_TYPE_OP" 0abb 0bb3 | | .STRTAB 0x0bb3->0x1094 ; "ADDRESS_OP" 0abc 0bbb | | .STRTAB 0x0bbb->0x1099 ; "SIZE_OP" 0abd 0bc0 | | .STRTAB 0x0bc0->0x109d ; "ADDRESS_OF_TYPE_OP" 0abe 0bd0 | | .STRTAB 0x0bd0->0x10a6 ; "MAKE_ROOT_TYPE_OP" 0abf 0bdf | | .STRTAB 0x0bdf->0x10ae ; "SET_CONSTRAINT_OP" 0ac0 0bee | | .STRTAB 0x0bee->0x10b7 ; "IS_VALUE_OP" 0ac1 0bf7 | | .STRTAB 0x0bf7->0x10bc ; "IS_SCALAR_OP" 0ac2 0c01 | | .STRTAB 0x0c01->0x10c2 ; "IS_DEFAULT_OP" 0ac3 0c0c | | .STRTAB 0x0c0c->0x10c9 ; "MAKE_VISIBLE_OP" 0ac4 0c19 | | .STRTAB 0x0c19->0x10d0 ; "MAKE_ALIGNED_OP" 0ac5 0c26 | & | .STRTAB 0x0c26->0x10d8 ; "RUN_UTILITY_OP" 0ac6 0c32 | 2 | .STRTAB 0x0c32->0x10df ; "CHANGE_UTILITY_OP" 0ac7 0c41 | A | .STRTAB 0x0c41->0x10e7 ; "RUN_INITIALIZATION_UTILITY_OP" 0ac8 0c5c | \ | .STRTAB 0x0c5c->0x10f6 ; "HAS_DEFAULT_INITIALIZATION_OP" 0ac9 0c77 | w | .STRTAB 0x0c77->0x1104 ; "HAS_REPEATED_INITIALIZATION_OP" 0aca 0c93 | | .STRTAB 0x0c93->0x1113 ; "IS_INITIALIZATION_REPEATED_OP" 0acb 0cae | | .STRTAB 0x0cae->0x1122 ; "RAISE_OP" 0acc 0cb4 | | .STRTAB 0x0cb4->0x1126 ; "RERAISE_OP" 0acd 0cbc | | .STRTAB 0x0cbc->0x112b ; "GET_NAME_OP" 0ace 0cc5 | | .STRTAB 0x0cc5->0x1130 ; "IS_CONSTRAINT_ERROR_OP" 0acf 0cd9 | | .STRTAB 0x0cd9->0x113b ; "IS_NUMERIC_ERROR_OP" 0ad0 0cea | | .STRTAB 0x0cea->0x1145 ; "IS_PROGRAM_ERROR_OP" 0ad1 0cfb | | .STRTAB 0x0cfb->0x114e ; "IS_TASKING_ERROR_OP" 0ad2 0d0c | | .STRTAB 0x0d0c->0x1158 ; "IS_STORAGE_ERROR_OP" 0ad3 0d1d | | .STRTAB 0x0d1d->0x1161 ; "IS_INSTRUCTION_ERROR_OP" 0ad4 0d32 | 2 | .STRTAB 0x0d32->0x116d ; "INSTRUCTION_READ_OP" 0ad5 0d43 | C | .STRTAB 0x0d43->0x1176 ; "SPARE14_OP" 0ad6 0d4b | K | .STRTAB 0x0d4b->0x117b ; "SPARE15_OP" 0ad7 0d53 | S | .STRTAB 0x0d53->0x1180 ; "SPARE16_OP" 0ad8 0d5b | [ | .STRTAB 0x0d5b->0x1185 ; "SPARE17_OP" 0ad9 0d63 | c | .STRTAB 0x0d63->0x118a ; "SPARE18_OP" 0ada 0d6b | k | .STRTAB 0x0d6b->0x118f ; "SPARE19_OP" 0adb 0d73 | s | .STRTAB 0x0d73->0x1194 ; "SPARE20_OP" 0adc 0d7b | { | .STRTAB 0x0d7b->0x1199 ; "SPARE21_OP" 0add 0d83 | | .STRTAB 0x0d83->0x119e ; "SPARE22_OP" 0ade 0d8b | | .STRTAB 0x0d8b->0x11a3 ; "SPARE23_OP" 0adf 0d93 | | .STRTAB 0x0d93->0x11a8 ; "SPARE24_OP" 0ae0 0d9b | | .STRTAB 0x0d9b->0x11ad ; "SPARE25_OP" 0ae1 0da3 | | .STRTAB 0x0da3->0x11b2 ; "DEFINED" 0ae2 0da8 | | .STRTAB 0x0da8->0x11b6 ; "CONSTRAINED" 0ae3 0db1 | | .STRTAB 0x0db1->0x11bb ; "INCOMPLETE" 0ae4 0db9 | | .STRTAB 0x0db9->0x11c0 ; "DEFINED_INCOMPLETE" 0ae5 0dc9 | | .STRTAB 0x0dc9->0x11c9 ; "CONSTRAINED_INCOMPLETE" 0ae6 0ddd | | .STRTAB 0x0ddd->0x11d4 ; "BY_DEFINING" 0ae7 0de6 | | .STRTAB 0x0de6->0x11da ; "BY_RENAMING" 0ae8 0def | | .STRTAB 0x0def->0x11df ; "BY_CONSTRAINING" 0ae9 0dfc | | .STRTAB 0x0dfc->0x11e7 ; "BY_CONSTRAINING_INCOMPLETE" 0aea 0e14 | | .STRTAB 0x0e14->0x11f4 ; "BY_COMPLETING_CONSTRAINT" 0aeb 0e2a | * | .STRTAB 0x0e2a->0x1200 ; "BY_COMPONENT_COMPLETION" 0aec 0e3f | ? | .STRTAB 0x0e3f->0x120b ; "FOR_CALL" 0aed 0e45 | E | .STRTAB 0x0e45->0x120f ; "FOR_OUTER_CALL" 0aee 0e51 | Q | .STRTAB 0x0e51->0x1216 ; "FOR_ACCEPT" 0aef 0e59 | Y | .STRTAB 0x0e59->0x121b ; "NULL_SUBPROGRAM" 0af0 0e66 | f | .STRTAB 0x0e66->0x1223 ; "FIXED" 0af1 0e69 | i | .STRTAB 0x0e69->0x1225 ; "VARIANT" 0af2 0e6e | n | .STRTAB 0x0e6e->0x1229 ; "DIRECT" 0af3 0e72 | r | .STRTAB 0x0e72->0x122c ; "INDIRECT" 0af4 0e78 | x | .STRTAB 0x0e78->0x1230 ; "IS_LITERAL" 0af5 0e80 | | .STRTAB 0x0e80->0x1235 ; "IS_LOCATION" 0af6 0e89 | | .STRTAB 0x0e89->0x123a ; "ILLEGAL" 0af7 0e8e | | .STRTAB 0x0e8e->0x123e ; "IDLE" 0af8 0e90 | | .STRTAB 0x0e90->0x1240 ; "ELABORATE_SUBPROGRAM" 0af9 0ea2 | | .STRTAB 0x0ea2->0x124a ; "CHECK_SUBPROGRAM_ELABORATED" 0afa 0ebb | | .STRTAB 0x0ebb->0x1257 ; "ACCEPT_ACTIVATION" 0afb 0eca | | .STRTAB 0x0eca->0x1260 ; "ACTIVATE_TASKS" 0afc 0ed6 | | .STRTAB 0x0ed6->0x1267 ; "ACTIVATE_HEAP_TASKS" 0afd 0ee7 | | .STRTAB 0x0ee7->0x1270 ; "SIGNAL_ACTIVATED" 0afe 0ef5 | | .STRTAB 0x0ef5->0x1278 ; "SIGNAL_COMPLETION" 0aff 0f04 | | .STRTAB 0x0f04->0x1281 ; "PROPAGATE_ABORT" 0b00 0f11 | | .STRTAB 0x0f11->0x1288 ; "SET_PRIORITY" 0b01 0f1b | | .STRTAB 0x0f1b->0x128e ; "INCREASE_PRIORITY" 0b02 0f2a | * | .STRTAB 0x0f2a->0x1297 ; "GET_PRIORITY" 0b03 0f34 | 4 | .STRTAB 0x0f34->0x129d ; "INITIATE_DELAY" 0b04 0f40 | @ | .STRTAB 0x0f40->0x12a4 ; "EXIT_NULLARY_FUNCTION" 0b05 0f53 | S | .STRTAB 0x0f53->0x12ae ; "SET_BLOCK_START" 0b06 0f60 | ` | .STRTAB 0x0f60->0x12b6 ; "MAKE_DEFAULT" 0b07 0f6a | j | .STRTAB 0x0f6a->0x12bc ; "MAKE_SELF" 0b08 0f71 | q | .STRTAB 0x0f71->0x12c0 ; "MAKE_SCOPE" 0b09 0f79 | y | .STRTAB 0x0f79->0x12c5 ; "MAKE_PARENT" 0b0a 0f82 | | .STRTAB 0x0f82->0x12cb ; "NAME_PARTNER" 0b0b 0f8c | | .STRTAB 0x0f8c->0x12d1 ; "SWAP_CONTROL" 0b0c 0f96 | | .STRTAB 0x0f96->0x12d7 ; "MARK_AUXILIARY" 0b0d 0fa2 | | .STRTAB 0x0fa2->0x12de ; "POP_AUXILIARY" 0b0e 0fad | | .STRTAB 0x0fad->0x12e4 ; "POP_AUXILIARY_LOOP" 0b0f 0fbd | | .STRTAB 0x0fbd->0x12ed ; "POP_AUXILIARY_RANGE" 0b10 0fce | | .STRTAB 0x0fce->0x12f7 ; "POP_BLOCK" 0b11 0fd5 | | .STRTAB 0x0fd5->0x12fb ; "POP_BLOCK_WITH_RESULT" 0b12 0fe8 | | .STRTAB 0x0fe8->0x1306 ; "BREAK_UNCONDITIONAL" 0b13 0ff9 | | .STRTAB 0x0ff9->0x130f ; "BREAK_OPTIONAL" 0b14 1005 | | .STRTAB 0x1005->0x1316 ; "EXIT_BREAK" 0b15 100d | | .STRTAB 0x100d->0x131b ; "QUERY_BREAK_CAUSE" 0b16 101c | | .STRTAB 0x101c->0x1324 ; "QUERY_BREAK_ADDRESS" 0b17 102d | - | .STRTAB 0x102d->0x132d ; "QUERY_BREAK_MASK" 0b18 103b | ; | .STRTAB 0x103b->0x1335 ; "ALTER_BREAK_MASK" 0b19 1049 | I | .STRTAB 0x1049->0x133d ; "QUERY_FRAME" 0b1a 1052 | R | .STRTAB 0x1052->0x1343 ; "ESTABLISH_FRAME" 0b1b 105f | _ | .STRTAB 0x105f->0x134a ; "LOOP_INCREASING_EXTENDED" 0b1c 1075 | u | .STRTAB 0x1075->0x1356 ; "LOOP_DECREASING_EXTENDED" 0b1d 108b | | .STRTAB 0x108b->0x1362 ; "PUSH_DISCRETE_EXTENDED" 0b1e 109f | | .STRTAB 0x109f->0x136d ; "PUSH_FLOAT_EXTENDED" 0b1f 10b0 | | .STRTAB 0x10b0->0x1377 ; "PUSH_STRUCTURE_EXTENDED" 0b20 10c5 | | .STRTAB 0x10c5->0x1382 ; "PUSH_STRING_EXTENDED" 0b21 10d7 | | .STRTAB 0x10d7->0x138c ; "PUSH_STRING_EXTENDED_INDEXED" 0b22 10f1 | | .STRTAB 0x10f1->0x139a ; "STORE_STRING_EXTENDED" 0b23 1104 | | .STRTAB 0x1104->0x13a5 ; "JUMP_EXTENDED" 0b24 110f | | .STRTAB 0x110f->0x13ab ; "JUMP_ZERO_EXTENDED" 0b25 111f | | .STRTAB 0x111f->0x13b4 ; "JUMP_NONZERO_EXTENDED" 0b26 1132 | 2 | .STRTAB 0x1132->0x13bf ; "JUMP_DYNAMIC" 0b27 113c | < | .STRTAB 0x113c->0x13c5 ; "JUMP_ZERO_DYNAMIC" 0b28 114b | K | .STRTAB 0x114b->0x13cd ; "JUMP_NONZERO_DYNAMIC" 0b29 115d | ] | .STRTAB 0x115d->0x13d7 ; "LOAD_DYNAMIC" 0b2a 1167 | g | .STRTAB 0x1167->0x13dd ; "STORE_DYNAMIC" 0b2b 1172 | r | .STRTAB 0x1172->0x13e4 ; "CALL_DYNAMIC" 0b2c 117c | | | .STRTAB 0x117c->0x13ea ; "REFERENCE_DYNAMIC" 0b2d 118b | | .STRTAB 0x118b->0x13f2 ; "SPARE6_ACTION" 0b2e 1196 | | .STRTAB 0x1196->0x13f9 ; "SPARE7_ACTION" 0b2f 11a1 | | .STRTAB 0x11a1->0x13ff ; "SPARE8_ACTION" 0b30 11ac | | .STRTAB 0x11ac->0x1406 ; "SPARE9_ACTION" 0b31 11b7 | | .STRTAB 0x11b7->0x140c ; "SPARE10_ACTION" 0b32 11c3 | | .STRTAB 0x11c3->0x1413 ; "SPARE11_ACTION" 0b33 11cf | | .STRTAB 0x11cf->0x141a ; "DECLARE_TYPE" 0b34 11d9 | | .STRTAB 0x11d9->0x1420 ; "COMPLETE_TYPE" 0b35 11e4 | | .STRTAB 0x11e4->0x1427 ; "DECLARE_VARIABLE" 0b36 11f2 | | .STRTAB 0x11f2->0x142f ; "DECLARE_SUBPROGRAM" 0b37 1202 | | .STRTAB 0x1202->0x1438 ; "LOAD" 0b38 1204 | | .STRTAB 0x1204->0x143a ; "STORE" 0b39 1207 | | .STRTAB 0x1207->0x143c ; "STORE_UNCHECKED" 0b3a 1214 | | .STRTAB 0x1214->0x1444 ; "REFERENCE" 0b3b 121b | | .STRTAB 0x121b->0x1448 ; "CALL" 0b3c 121d | | .STRTAB 0x121d->0x144a ; "EXIT_SUBPROGRAM" 0b3d 122a | * | .STRTAB 0x122a->0x1452 ; "END_RENDEZVOUS" 0b3e 1236 | 6 | .STRTAB 0x1236->0x1459 ; "EXECUTE" 0b3f 123b | ; | .STRTAB 0x123b->0x145c ; "ACTION" 0b40 123f | ? | .STRTAB 0x123f->0x145f ; "EXECUTE_IMMEDIATE" 0b41 124e | N | .STRTAB 0x124e->0x1468 ; "JUMP" 0b42 1250 | P | .STRTAB 0x1250->0x146a ; "JUMP_ZERO" 0b43 1257 | W | .STRTAB 0x1257->0x146e ; "JUMP_NONZERO" 0b44 1261 | a | .STRTAB 0x1261->0x1474 ; "JUMP_CASE" 0b45 1268 | h | .STRTAB 0x1268->0x1479 ; "LOOP_INCREASING" 0b46 1275 | u | .STRTAB 0x1275->0x1480 ; "LOOP_DECREASING" 0b47 1282 | | .STRTAB 0x1282->0x1488 ; "SHORT_LITERAL" 0b48 128d | | .STRTAB 0x128d->0x148e ; "INDIRECT_LITERAL" 0b49 129b | | .STRTAB 0x129b->0x1496 ; "POP_CONTROL" 0b4a 12a4 | | .STRTAB 0x12a4->0x149c ; "LOAD_TOP" 0b4b 12aa | | .STRTAB 0x12aa->0x14a0 ; "STORE_TOP" 0b4c 12b1 | | .STRTAB 0x12b1->0x14a4 ; "STORE_TOP_UNCHECKED" 0b4d 12c2 | | .STRTAB 0x12c2->0x14ae ; "LOAD_ENCACHED" 0b4e 12cd | | .STRTAB 0x12cd->0x14b4 ; "EXTENSION" 0b4f 12d4 | | .STRTAB 0x12d4->0x14b9 ; "LITERAL_VALUE" 0b50 12df | | .STRTAB 0x12df->0x14bf ; "BLOCK_BEGIN" 0b51 12e8 | | .STRTAB 0x12e8->0x14c5 ; "BLOCK_HANDLER" 0b52 12f3 | | .STRTAB 0x12f3->0x14cb ; "END_LOCALS" 0b53 12fb | | .STREND 0x12fb->0x14d0 0b54 4449 5343 |DISC| .STRTAB_STRINGS 14d1 0000 0000 | | .BLANK 0000[0x7] 14d8 ; -------------------------------------------------------------------------------------- 14d8 ; Debug Table 14d8 ; -------------------------------------------------------------------------------------- 14d8 0003 001e | | .CONST 0x0003,0x001e 14da 000b 15ca | | .DEBUG 0x000b,0x15ca,0x8000,0x0000,0x005a,0x1125,0x0000,0x0005 14e2 01b8 167e | ~| .DEBUG 0x01b8,0x167e,0x8000,0x0000,0x005a,0x3425,0x0000,0x0003 14ea 01d3 1690 | | .DEBUG 0x01d3,0x1690,0x0005,0x0000,0x005a,0x1125,0x0000,0x000a 14f2 01eb 1692 | | .DEBUG 0x01eb,0x1692,0x0005,0x0000,0x005a,0x1125,0x0000,0x0021 14fa 0203 1694 | | .DEBUG 0x0203,0x1694,0x0005,0x0000,0x005a,0x1125,0x0000,0x00e4 1502 021b 1696 | | .DEBUG 0x021b,0x1696,0x0005,0x0000,0x005a,0x1125,0x0000,0x0114 150a 0233 1698 | 3 | .DEBUG 0x0233,0x1698,0x0005,0x0000,0x005a,0x1125,0x0000,0x014f 1512 024b 169a | K | .DEBUG 0x024b,0x169a,0x0005,0x0000,0x005a,0x1125,0x0000,0x01a0 151a 0263 169c | c | .DEBUG 0x0263,0x169c,0x0005,0x0000,0x005a,0x1125,0x0000,0x01a6 1522 027b 169e | { | .DEBUG 0x027b,0x169e,0x0005,0x0000,0x005a,0x1125,0x0000,0x01ba 152a 02c3 16a0 | | .DEBUG 0x02c3,0x16a0,0x0005,0x0000,0x005a,0x1125,0x0000,0x01d9 1532 0373 16a2 | s | .DEBUG 0x0373,0x16a2,0x0005,0x0000,0x005a,0x1125,0x0000,0x0213 153a 03e3 16a4 | | .DEBUG 0x03e3,0x16a4,0x0005,0x0000,0x005a,0x1125,0x0000,0x0253 1542 042b 16a6 | + | .DEBUG 0x042b,0x16a6,0x0005,0x0000,0x005a,0x1125,0x0000,0x031d 154a 0483 16a8 | | .DEBUG 0x0483,0x16a8,0x0005,0x0000,0x005a,0x1125,0x0000,0x0364 1552 04bb 16aa | | .DEBUG 0x04bb,0x16aa,0x0005,0x0000,0x005a,0x1125,0x0000,0x0393 155a 04d3 16ac | | .DEBUG 0x04d3,0x16ac,0x0005,0x0000,0x005a,0x1125,0x0000,0x0399 1562 050b 16ae | | .DEBUG 0x050b,0x16ae,0x0005,0x0000,0x005a,0x1125,0x0000,0x03b7 156a 0523 16b0 | # | .DEBUG 0x0523,0x16b0,0x0005,0x0000,0x005a,0x1125,0x0000,0x0406 1572 053b 16b2 | ; | .DEBUG 0x053b,0x16b2,0x0005,0x0000,0x005a,0x1125,0x0000,0x042a 157a 0633 16b4 | 3 | .DEBUG 0x0633,0x16b4,0x0005,0x0000,0x005a,0x1125,0x0000,0x0535 1582 064b 16b6 | K | .DEBUG 0x064b,0x16b6,0x0005,0x0000,0x005a,0x1125,0x0000,0x053e 158a 0663 16b8 | c | .DEBUG 0x0663,0x16b8,0x0002,0x0000,0x005a,0x1125,0x0000,0x0573 1592 06bb 16da | | .DEBUG 0x06bb,0x16da,0x0002,0x0000,0x005a,0x1125,0x0000,0x0584 159a 0733 16fc | 3 | .DEBUG 0x0733,0x16fc,0x0002,0x0000,0x005a,0x1125,0x0000,0x0591 15a2 0753 1706 | S | .DEBUG 0x0753,0x1706,0x0002,0x0000,0x005a,0x1125,0x0000,0x059e 15aa 0763 170e | c | .DEBUG 0x0763,0x170e,0x0002,0x0000,0x005a,0x3425,0x0000,0x0004 15b2 07a3 1722 | "| .DEBUG 0x07a3,0x1722,0x0002,0x0000,0x005a,0x3425,0x0000,0x008d 15ba 0873 1734 | s 4| .DEBUG 0x0873,0x1734,0x0002,0x0000,0x005a,0x3425,0x0000,0x027b 15c2 09bb 174c | L| .DEBUG 0x09bb,0x174c,0x0002,0x0000,0x005a,0x3425,0x0000,0x0445 15ca ; -------------------------------------------------------------------------------------- 15ca ; Debug3 Subtable 0x0 15ca ; -------------------------------------------------------------------------------------- 15ca 0059 0000 | Y | .DBG3TAB 0x0059,0x0000 15cc 000b ffff | | .CONST 0x000b,0xffff 15ce 000c fffe | | .CONST 0x000c,0xfffe 15d0 0011 fffd | | .CONST 0x0011,0xfffd 15d2 0016 fffc | | .CONST 0x0016,0xfffc 15d4 001b fffb | | .CONST 0x001b,0xfffb 15d6 0025 fffa | % | .CONST 0x0025,0xfffa 15d8 002a fff9 | * | .CONST 0x002a,0xfff9 15da 0036 fff8 | 6 | .CONST 0x0036,0xfff8 15dc 003b fff7 | ; | .CONST 0x003b,0xfff7 15de 0041 fff6 | A | .CONST 0x0041,0xfff6 15e0 0046 fff5 | F | .CONST 0x0046,0xfff5 15e2 0047 fff4 | G | .CONST 0x0047,0xfff4 15e4 004b fff3 | K | .CONST 0x004b,0xfff3 15e6 004f fff2 | O | .CONST 0x004f,0xfff2 15e8 0050 fff1 | P | .CONST 0x0050,0xfff1 15ea 0055 fff0 | U | .CONST 0x0055,0xfff0 15ec 005a ffef | Z | .CONST 0x005a,0xffef 15ee 005e ffee | ^ | .CONST 0x005e,0xffee 15f0 0062 ffed | b | .CONST 0x0062,0xffed 15f2 006e ffec | n | .CONST 0x006e,0xffec 15f4 0083 ffeb | | .CONST 0x0083,0xffeb 15f6 0091 ffea | | .CONST 0x0091,0xffea 15f8 0095 ffe9 | | .CONST 0x0095,0xffe9 15fa 0099 ffe8 | | .CONST 0x0099,0xffe8 15fc 009d ffe7 | | .CONST 0x009d,0xffe7 15fe 00aa ffe6 | | .CONST 0x00aa,0xffe6 1600 00ae ffe5 | | .CONST 0x00ae,0xffe5 1602 00b2 ffe4 | | .CONST 0x00b2,0xffe4 1604 00b6 ffe3 | | .CONST 0x00b6,0xffe3 1606 00ba ffe2 | | .CONST 0x00ba,0xffe2 1608 00be ffe1 | | .CONST 0x00be,0xffe1 160a 00c2 ffe0 | | .CONST 0x00c2,0xffe0 160c 00c6 ffdf | | .CONST 0x00c6,0xffdf 160e 00ca ffde | | .CONST 0x00ca,0xffde 1610 00ce ffdd | | .CONST 0x00ce,0xffdd 1612 00d2 ffdc | | .CONST 0x00d2,0xffdc 1614 00d7 ffdb | | .CONST 0x00d7,0xffdb 1616 00e9 ffda | | .CONST 0x00e9,0xffda 1618 00ed ffd9 | | .CONST 0x00ed,0xffd9 161a 00f1 ffd8 | | .CONST 0x00f1,0xffd8 161c 00fe ffd7 | | .CONST 0x00fe,0xffd7 161e 0102 ffd6 | | .CONST 0x0102,0xffd6 1620 0107 ffd5 | | .CONST 0x0107,0xffd5 1622 0114 ffd4 | | .CONST 0x0114,0xffd4 1624 0119 ffd3 | | .CONST 0x0119,0xffd3 1626 011d ffd2 | | .CONST 0x011d,0xffd2 1628 0121 ffd1 | ! | .CONST 0x0121,0xffd1 162a 0126 ffd0 | & | .CONST 0x0126,0xffd0 162c 0165 ffcf | e | .CONST 0x0165,0xffcf 162e 016c ffce | l | .CONST 0x016c,0xffce 1630 0173 ffcd | s | .CONST 0x0173,0xffcd 1632 017a ffcc | z | .CONST 0x017a,0xffcc 1634 0181 ffcb | | .CONST 0x0181,0xffcb 1636 0190 ffca | | .CONST 0x0190,0xffca 1638 0192 ffc9 | | .CONST 0x0192,0xffc9 163a 0194 ffc8 | | .CONST 0x0194,0xffc8 163c 0196 ffc7 | | .CONST 0x0196,0xffc7 163e 0198 ffc6 | | .CONST 0x0198,0xffc6 1640 0199 ffc5 | | .CONST 0x0199,0xffc5 1642 019a ffc4 | | .CONST 0x019a,0xffc4 1644 019b ffc3 | | .CONST 0x019b,0xffc3 1646 019c ffc2 | | .CONST 0x019c,0xffc2 1648 019d ffc1 | | .CONST 0x019d,0xffc1 164a 019e ffc0 | | .CONST 0x019e,0xffc0 164c 019f ffbf | | .CONST 0x019f,0xffbf 164e 01a0 ffbe | | .CONST 0x01a0,0xffbe 1650 01a1 ffbd | | .CONST 0x01a1,0xffbd 1652 01a2 ffbc | | .CONST 0x01a2,0xffbc 1654 01a3 ffbb | | .CONST 0x01a3,0xffbb 1656 01a4 ffba | | .CONST 0x01a4,0xffba 1658 01a5 ffb9 | | .CONST 0x01a5,0xffb9 165a 01a6 ffb8 | | .CONST 0x01a6,0xffb8 165c 01a7 ffb7 | | .CONST 0x01a7,0xffb7 165e 01a8 ffb6 | | .CONST 0x01a8,0xffb6 1660 01a9 ffb5 | | .CONST 0x01a9,0xffb5 1662 01aa ffb4 | | .CONST 0x01aa,0xffb4 1664 01ab ffb3 | | .CONST 0x01ab,0xffb3 1666 01ac ffb2 | | .CONST 0x01ac,0xffb2 1668 01ad ffb1 | | .CONST 0x01ad,0xffb1 166a 01ae ffb0 | | .CONST 0x01ae,0xffb0 166c 01af ffaf | | .CONST 0x01af,0xffaf 166e 01b0 ffae | | .CONST 0x01b0,0xffae 1670 01b1 ffad | | .CONST 0x01b1,0xffad 1672 01b2 ffac | | .CONST 0x01b2,0xffac 1674 01b3 ffab | | .CONST 0x01b3,0xffab 1676 01b4 ffaa | | .CONST 0x01b4,0xffaa 1678 01b5 ffa9 | | .CONST 0x01b5,0xffa9 167a 01b6 ffa8 | | .CONST 0x01b6,0xffa8 167c 01b7 ffa7 | | .CONST 0x01b7,0xffa7 167e ; -------------------------------------------------------------------------------------- 167e ; Debug3 Subtable 0x1 167e ; -------------------------------------------------------------------------------------- 167e 0008 0000 | | .DBG3TAB 0x0008,0x0000 1680 01b8 ffff | | .CONST 0x01b8,0xffff 1682 01ba fffe | | .CONST 0x01ba,0xfffe 1684 01bc fffd | | .CONST 0x01bc,0xfffd 1686 01be fffc | | .CONST 0x01be,0xfffc 1688 01c0 fffb | | .CONST 0x01c0,0xfffb 168a 01c2 fffa | | .CONST 0x01c2,0xfffa 168c 01c4 fff9 | | .CONST 0x01c4,0xfff9 168e 01c6 fff8 | | .CONST 0x01c6,0xfff8 1690 ; -------------------------------------------------------------------------------------- 1690 ; Debug3 Subtable 0x2 1690 ; -------------------------------------------------------------------------------------- 1690 0000 0000 | | .DBG3TAB 0x0000,0x0000 1692 ; -------------------------------------------------------------------------------------- 1692 ; Debug3 Subtable 0x3 1692 ; -------------------------------------------------------------------------------------- 1692 0000 0000 | | .DBG3TAB 0x0000,0x0000 1694 ; -------------------------------------------------------------------------------------- 1694 ; Debug3 Subtable 0x4 1694 ; -------------------------------------------------------------------------------------- 1694 0000 0000 | | .DBG3TAB 0x0000,0x0000 1696 ; -------------------------------------------------------------------------------------- 1696 ; Debug3 Subtable 0x5 1696 ; -------------------------------------------------------------------------------------- 1696 0000 0000 | | .DBG3TAB 0x0000,0x0000 1698 ; -------------------------------------------------------------------------------------- 1698 ; Debug3 Subtable 0x6 1698 ; -------------------------------------------------------------------------------------- 1698 0000 0000 | | .DBG3TAB 0x0000,0x0000 169a ; -------------------------------------------------------------------------------------- 169a ; Debug3 Subtable 0x7 169a ; -------------------------------------------------------------------------------------- 169a 0000 0000 | | .DBG3TAB 0x0000,0x0000 169c ; -------------------------------------------------------------------------------------- 169c ; Debug3 Subtable 0x8 169c ; -------------------------------------------------------------------------------------- 169c 0000 0000 | | .DBG3TAB 0x0000,0x0000 169e ; -------------------------------------------------------------------------------------- 169e ; Debug3 Subtable 0x9 169e ; -------------------------------------------------------------------------------------- 169e 0000 0000 | | .DBG3TAB 0x0000,0x0000 16a0 ; -------------------------------------------------------------------------------------- 16a0 ; Debug3 Subtable 0xa 16a0 ; -------------------------------------------------------------------------------------- 16a0 0000 0000 | | .DBG3TAB 0x0000,0x0000 16a2 ; -------------------------------------------------------------------------------------- 16a2 ; Debug3 Subtable 0xb 16a2 ; -------------------------------------------------------------------------------------- 16a2 0000 0000 | | .DBG3TAB 0x0000,0x0000 16a4 ; -------------------------------------------------------------------------------------- 16a4 ; Debug3 Subtable 0xc 16a4 ; -------------------------------------------------------------------------------------- 16a4 0000 0000 | | .DBG3TAB 0x0000,0x0000 16a6 ; -------------------------------------------------------------------------------------- 16a6 ; Debug3 Subtable 0xd 16a6 ; -------------------------------------------------------------------------------------- 16a6 0000 0000 | | .DBG3TAB 0x0000,0x0000 16a8 ; -------------------------------------------------------------------------------------- 16a8 ; Debug3 Subtable 0xe 16a8 ; -------------------------------------------------------------------------------------- 16a8 0000 0000 | | .DBG3TAB 0x0000,0x0000 16aa ; -------------------------------------------------------------------------------------- 16aa ; Debug3 Subtable 0xf 16aa ; -------------------------------------------------------------------------------------- 16aa 0000 0000 | | .DBG3TAB 0x0000,0x0000 16ac ; -------------------------------------------------------------------------------------- 16ac ; Debug3 Subtable 0x10 16ac ; -------------------------------------------------------------------------------------- 16ac 0000 0000 | | .DBG3TAB 0x0000,0x0000 16ae ; -------------------------------------------------------------------------------------- 16ae ; Debug3 Subtable 0x11 16ae ; -------------------------------------------------------------------------------------- 16ae 0000 0000 | | .DBG3TAB 0x0000,0x0000 16b0 ; -------------------------------------------------------------------------------------- 16b0 ; Debug3 Subtable 0x12 16b0 ; -------------------------------------------------------------------------------------- 16b0 0000 0000 | | .DBG3TAB 0x0000,0x0000 16b2 ; -------------------------------------------------------------------------------------- 16b2 ; Debug3 Subtable 0x13 16b2 ; -------------------------------------------------------------------------------------- 16b2 0000 0000 | | .DBG3TAB 0x0000,0x0000 16b4 ; -------------------------------------------------------------------------------------- 16b4 ; Debug3 Subtable 0x14 16b4 ; -------------------------------------------------------------------------------------- 16b4 0000 0000 | | .DBG3TAB 0x0000,0x0000 16b6 ; -------------------------------------------------------------------------------------- 16b6 ; Debug3 Subtable 0x15 16b6 ; -------------------------------------------------------------------------------------- 16b6 0000 0000 | | .DBG3TAB 0x0000,0x0000 16b8 ; -------------------------------------------------------------------------------------- 16b8 ; Debug3 Subtable 0x16 16b8 ; -------------------------------------------------------------------------------------- 16b8 0001 000f | | .DBG3TAB 0x0001,0x000f 16ba 0663 ffff | c | .CONST 0x0663,0xffff 16bc 0664 0001 | d | .CONST 0x0664,0x0001 16be 066a 0002 | j | .CONST 0x066a,0x0002 16c0 066c 0003 | l | .CONST 0x066c,0x0003 16c2 0681 0004 | | .CONST 0x0681,0x0004 16c4 0688 0006 | | .CONST 0x0688,0x0006 16c6 068b 0007 | | .CONST 0x068b,0x0007 16c8 0692 0009 | | .CONST 0x0692,0x0009 16ca 0698 000a | | .CONST 0x0698,0x000a 16cc 069b 000b | | .CONST 0x069b,0x000b 16ce 069e 000c | | .CONST 0x069e,0x000c 16d0 06a5 000e | | .CONST 0x06a5,0x000e 16d2 06a8 000f | | .CONST 0x06a8,0x000f 16d4 06af 0011 | | .CONST 0x06af,0x0011 16d6 06b2 0013 | | .CONST 0x06b2,0x0013 16d8 06b4 0014 | | .CONST 0x06b4,0x0014 16da ; -------------------------------------------------------------------------------------- 16da ; Debug3 Subtable 0x17 16da ; -------------------------------------------------------------------------------------- 16da 0001 000f | | .DBG3TAB 0x0001,0x000f 16dc 06bb ffff | | .CONST 0x06bb,0xffff 16de 06bc 0001 | | .CONST 0x06bc,0x0001 16e0 06c1 0002 | | .CONST 0x06c1,0x0002 16e2 06c3 0003 | | .CONST 0x06c3,0x0003 16e4 06d8 0004 | | .CONST 0x06d8,0x0004 16e6 06de 0005 | | .CONST 0x06de,0x0005 16e8 06e1 0006 | | .CONST 0x06e1,0x0006 16ea 06e7 0007 | | .CONST 0x06e7,0x0007 16ec 06ea 0008 | | .CONST 0x06ea,0x0008 16ee 0713 0009 | | .CONST 0x0713,0x0009 16f0 0716 000a | | .CONST 0x0716,0x000a 16f2 071c 000b | | .CONST 0x071c,0x000b 16f4 071f 000c | | .CONST 0x071f,0x000c 16f6 0725 000d | % | .CONST 0x0725,0x000d 16f8 0728 000f | ( | .CONST 0x0728,0x000f 16fa 072a 0010 | * | .CONST 0x072a,0x0010 16fc ; -------------------------------------------------------------------------------------- 16fc ; Debug3 Subtable 0x18 16fc ; -------------------------------------------------------------------------------------- 16fc 0000 0004 | | .DBG3TAB 0x0000,0x0004 16fe 0733 0001 | 3 | .CONST 0x0733,0x0001 1700 0739 0002 | 9 | .CONST 0x0739,0x0002 1702 073b 0003 | ; | .CONST 0x073b,0x0003 1704 0743 0004 | C | .CONST 0x0743,0x0004 1706 ; -------------------------------------------------------------------------------------- 1706 ; Debug3 Subtable 0x19 1706 ; -------------------------------------------------------------------------------------- 1706 0000 0003 | | .DBG3TAB 0x0000,0x0003 1708 0753 0001 | S | .CONST 0x0753,0x0001 170a 0756 0003 | V | .CONST 0x0756,0x0003 170c 0758 0002 | X | .CONST 0x0758,0x0002 170e ; -------------------------------------------------------------------------------------- 170e ; Debug3 Subtable 0x1a 170e ; -------------------------------------------------------------------------------------- 170e 0001 0008 | | .DBG3TAB 0x0001,0x0008 1710 0763 ffff | c | .CONST 0x0763,0xffff 1712 0765 0001 | e | .CONST 0x0765,0x0001 1714 076d 0002 | m | .CONST 0x076d,0x0002 1716 0775 0003 | u | .CONST 0x0775,0x0003 1718 077d 0004 | } | .CONST 0x077d,0x0004 171a 0785 0005 | | .CONST 0x0785,0x0005 171c 078d 0006 | | .CONST 0x078d,0x0006 171e 0795 0007 | | .CONST 0x0795,0x0007 1720 079d 0008 | | .CONST 0x079d,0x0008 1722 ; -------------------------------------------------------------------------------------- 1722 ; Debug3 Subtable 0x1b 1722 ; -------------------------------------------------------------------------------------- 1722 0000 0008 | | .DBG3TAB 0x0000,0x0008 1724 07a3 0001 | | .CONST 0x07a3,0x0001 1726 07b8 0002 | | .CONST 0x07b8,0x0002 1728 07d2 0003 | | .CONST 0x07d2,0x0003 172a 07ea 0004 | | .CONST 0x07ea,0x0004 172c 0802 0005 | | .CONST 0x0802,0x0005 172e 081f 0006 | | .CONST 0x081f,0x0006 1730 0839 0007 | 9 | .CONST 0x0839,0x0007 1732 0852 0008 | R | .CONST 0x0852,0x0008 1734 ; -------------------------------------------------------------------------------------- 1734 ; Debug3 Subtable 0x1c 1734 ; -------------------------------------------------------------------------------------- 1734 0000 000b | | .DBG3TAB 0x0000,0x000b 1736 0873 0001 | s | .CONST 0x0873,0x0001 1738 0888 0002 | | .CONST 0x0888,0x0002 173a 08a6 0003 | | .CONST 0x08a6,0x0003 173c 08c4 0004 | | .CONST 0x08c4,0x0004 173e 08e2 0005 | | .CONST 0x08e2,0x0005 1740 0900 0006 | | .CONST 0x0900,0x0006 1742 091e 0007 | | .CONST 0x091e,0x0007 1744 093c 0008 | < | .CONST 0x093c,0x0008 1746 095a 0009 | Z | .CONST 0x095a,0x0009 1748 0978 000a | x | .CONST 0x0978,0x000a 174a 0996 000b | | .CONST 0x0996,0x000b 174c ; -------------------------------------------------------------------------------------- 174c ; Debug3 Subtable 0x1d 174c ; -------------------------------------------------------------------------------------- 174c 0001 000c | | .DBG3TAB 0x0001,0x000c 174e 09bb ffff | | .CONST 0x09bb,0xffff 1750 09bd 0001 | | .CONST 0x09bd,0x0001 1752 09c3 0002 | | .CONST 0x09c3,0x0002 1754 09c5 0003 | | .CONST 0x09c5,0x0003 1756 09cd 0004 | | .CONST 0x09cd,0x0004 1758 09d5 0005 | | .CONST 0x09d5,0x0005 175a 09dd 0006 | | .CONST 0x09dd,0x0006 175c 09e5 0007 | | .CONST 0x09e5,0x0007 175e 09ed 0008 | | .CONST 0x09ed,0x0008 1760 09f5 0009 | | .CONST 0x09f5,0x0009 1762 09fd 000a | | .CONST 0x09fd,0x000a 1764 0a05 000b | | .CONST 0x0a05,0x000b 1766 0a0d 000c | | .CONST 0x0a0d,0x000c 1768 0000 0000 | | .BLANK 0000[0x98]