|
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: 11264 (0x2c00) Notes: 00_class, 5811_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_07b4f8
└─⟦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 5811 |X | .CONST 0x5811 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0eb0 | | .CONST 0x0eb0 ; 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 000a | | .CONST 0x000a ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0127 | ' | .CONST 0x0127 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0058 | X | .CONST 0x0058 ; Number of locals 000b INIT_0008: 000b e001 | | Load 0x0,0x1 ; Debug Table 0x0 = .DEBUG 0x000b,0x107a,0x8000,0x0000,0x0032,0xc7b4,0x0000,0x0005 ; Debug Table 0x0.0x0 = 0xb,0xffff 000c 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38 000d 0129 | ) | Execute Any,Make_Visible 000e e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x1 = 0xe,0xfffe 000f 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b 0010 0129 | ) | Execute Any,Make_Visible 0011 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x2 = 0x11,0xfffd 0012 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b 0013 0129 | ) | Execute Any,Make_Visible 0014 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x3 = 0x14,0xfffc 0015 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39 0016 0129 | ) | Execute Any,Make_Visible 0017 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x4 = 0x17,0xfffb 0018 1b36 | 6 | Execute Package,Field_Read,Field_Number 0x36 0019 0129 | ) | Execute Any,Make_Visible 001a e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x5 = 0x1a,0xfffa 001b 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d 001c 0129 | ) | Execute Any,Make_Visible 001d 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x6 = 0x1d,0xfff9 001e 4824 |H$ | Short_Literal 0x24 001f 029f 0133 | 3| Declare_Subprogram INIT_0130,For_Call 0021 03fe | | Declare_Type Discrete,Defined,Visible 0022 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x22,0xfff8 0024 e20d | | Load 0x1,0xd ; Debug Table 0x0.0x8 = 0x24,0xfff7 0025 0129 | ) | Execute Any,Make_Visible 0026 e20d | | Load 0x1,0xd ; Debug Table 0x0.0x9 = 0x26,0xfff6 0027 0129 | ) | Execute Any,Make_Visible 0028 e20d | | Load 0x1,0xd ; Debug Table 0x0.0xa = 0x28,0xfff5 0029 0129 | ) | Execute Any,Make_Visible 002a e20d | | Load 0x1,0xd ; Debug Table 0x0.0xb = 0x2a,0xfff4 002b 0129 | ) | Execute Any,Make_Visible 002c e20d | | Load 0x1,0xd ; Debug Table 0x0.0xc = 0x2c,0xfff3 002d 0129 | ) | Execute Any,Make_Visible 002e e20d | | Load 0x1,0xd ; Debug Table 0x0.0xd = 0x2e,0xfff2 002f 0129 | ) | Execute Any,Make_Visible 0030 e20d | | Load 0x1,0xd ; Debug Table 0x0.0xe = 0x30,0xfff1 0031 0129 | ) | Execute Any,Make_Visible 0032 e212 | | Load 0x1,0x12 ; Debug Table 0x0.0xf = 0x32,0xfff0 0033 0129 | ) | Execute Any,Make_Visible 0034 e20d | | Load 0x1,0xd ; Debug Table 0x0.0x10 = 0x34,0xffef 0035 0129 | ) | Execute Any,Make_Visible 0036 e20d | | Load 0x1,0xd ; Debug Table 0x0.0x11 = 0x36,0xffee 0037 0129 | ) | Execute Any,Make_Visible 0038 029a 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x12 = 0x38,0xffed 003a 029a 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x13 = 0x3a,0xffec 003c 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x14 = 0x3c,0xffeb 003e 029a 01db | | Declare_Subprogram INIT_01d8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x15 = 0x3e,0xffea 0040 029a 0213 | | Declare_Subprogram INIT_0210,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x16 = 0x40,0xffe9 0042 029a 0233 | 3| Declare_Subprogram INIT_0230,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x17 = 0x42,0xffe8 0044 029a 0253 | S| Declare_Subprogram INIT_0250,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x18 = 0x44,0xffe7 0046 029a 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x19 = 0x46,0xffe6 0048 029a 028b | | Declare_Subprogram INIT_0288,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1a = 0x48,0xffe5 004a 029a 02ab | | Declare_Subprogram INIT_02a8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1b = 0x4a,0xffe4 004c 029a 02f3 | | Declare_Subprogram INIT_02f0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1c = 0x4c,0xffe3 004e 029a 0333 | 3| Declare_Subprogram INIT_0330,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1d = 0x4e,0xffe2 0050 029a 035b | [| Declare_Subprogram INIT_0358,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1e = 0x50,0xffe1 0052 029a 038b | | Declare_Subprogram INIT_0388,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1f = 0x52,0xffe0 0054 029a 03a3 | | Declare_Subprogram INIT_03a0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x20 = 0x54,0xffdf 0056 029a 03bb | | Declare_Subprogram INIT_03b8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x21 = 0x56,0xffde 0058 029a 03d3 | | Declare_Subprogram INIT_03d0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x22 = 0x58,0xffdd 005a 029a 03fb | | Declare_Subprogram INIT_03f8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x23 = 0x5a,0xffdc 005c 029a 0423 | #| Declare_Subprogram INIT_0420,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x24 = 0x5c,0xffdb 005e 029a 0443 | C| Declare_Subprogram INIT_0440,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x25 = 0x5e,0xffda 0060 029a 0463 | c| Declare_Subprogram INIT_0460,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x26 = 0x60,0xffd9 0062 029a 048b | | Declare_Subprogram INIT_0488,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x27 = 0x62,0xffd8 0064 029a 04b3 | | Declare_Subprogram INIT_04b0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x28 = 0x64,0xffd7 0066 029a 04db | | Declare_Subprogram INIT_04d8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x29 = 0x66,0xffd6 0068 029a 0553 | S| Declare_Subprogram INIT_0550,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2a = 0x68,0xffd5 006a 029a 05bb | | Declare_Subprogram INIT_05b8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2b = 0x6a,0xffd4 006c 029a 05d3 | | Declare_Subprogram INIT_05d0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2c = 0x6c,0xffd3 006e 029a 05eb | | Declare_Subprogram INIT_05e8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2d = 0x6e,0xffd2 0070 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x2e = 0x70,0xffd1 0071 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0072 0129 | ) | Execute Any,Make_Visible 0073 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x2f = 0x73,0xffd0 0074 4804 |H | Short_Literal 0x4 0075 029f 05fb | | Declare_Subprogram INIT_05f8,For_Call 0077 03fe | | Declare_Type Discrete,Defined,Visible 0078 029a 0613 | | Declare_Subprogram INIT_0610,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x30 = 0x78,0xffcf 007a 029a 064b | K| Declare_Subprogram INIT_0648,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x31 = 0x7a,0xffce 007c 029a 068b | | Declare_Subprogram INIT_0688,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x32 = 0x7c,0xffcd 007e 029a 06c3 | | Declare_Subprogram INIT_06c0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x33 = 0x7e,0xffcc 0080 029a 06e3 | | Declare_Subprogram INIT_06e0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x34 = 0x80,0xffcb 0082 029a 06f3 | | Declare_Subprogram INIT_06f0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x35 = 0x82,0xffca 0084 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x36 = 0x84,0xffc9 0085 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0086 0129 | ) | Execute Any,Make_Visible 0087 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x37 = 0x87,0xffc8 0088 4809 |H | Short_Literal 0x9 0089 029f 0703 | | Declare_Subprogram INIT_0700,For_Call 008b 03fe | | Declare_Type Discrete,Defined,Visible 008c 029a 071b | | Declare_Subprogram INIT_0718,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x38 = 0x8c,0xffc7 008e 029a 0763 | c| Declare_Subprogram INIT_0760,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x39 = 0x8e,0xffc6 0090 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x3a = 0x90,0xffc5 0091 4803 |H | Short_Literal 0x3 0092 029f 0783 | | Declare_Subprogram INIT_0780,For_Call 0094 03fe | | Declare_Type Discrete,Defined,Visible 0095 029a 079b | | Declare_Subprogram INIT_0798,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3b = 0x95,0xffc4 0097 029a 07bb | | Declare_Subprogram INIT_07b8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3c = 0x97,0xffc3 0099 029a 07f3 | | Declare_Subprogram INIT_07f0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3d = 0x99,0xffc2 009b 029a 0813 | | Declare_Subprogram INIT_0810,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3e = 0x9b,0xffc1 009d 029a 0853 | S| Declare_Subprogram INIT_0850,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3f = 0x9d,0xffc0 009f 029a 0883 | | Declare_Subprogram INIT_0880,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x40 = 0x9f,0xffbf 00a1 029a 08c3 | | Declare_Subprogram INIT_08c0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x41 = 0xa1,0xffbe 00a3 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x42 = 0xa3,0xffbd 00a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00a5 0129 | ) | Execute Any,Make_Visible 00a6 029a 08d3 | | Declare_Subprogram INIT_08d0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x43 = 0xa6,0xffbc 00a8 029a 08fb | | Declare_Subprogram INIT_08f8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x44 = 0xa8,0xffbb 00aa 0007 | | Action Break_Optional ; Debug Table 0x0.0x45 = 0xaa,0xffba 00ab 0007 | | Action Break_Optional ; Debug Table 0x0.0x46 = 0xab,0xffb9 00ac 00bf | | Action Accept_Activation ; Debug Table 0x0.0x47 = 0xac,0xffb8 00ad 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x00ad,0x110c,0x8000,0x0000,0x0033,0xdd84,0x0000,0x001b ; Debug Table 0x1.0x0 = 0xad,0xffff 00ae 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0xae,0xfffe 00af 0007 | | Action Break_Optional ; Debug Table 0x1.0x2 = 0xaf,0xfffd 00b0 0007 | | Action Break_Optional ; Debug Table 0x1.0x3 = 0xb0,0xfffc 00b1 0007 | | Action Break_Optional ; Debug Table 0x1.0x4 = 0xb1,0xfffb 00b2 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x5 = 0xb2,0xfffa 00b3 1b46 | F | Execute Package,Field_Read,Field_Number 0x46 00b4 190f | | Execute Package,Field_Reference,Field_Number 0xf 00b5 0007 | | Action Break_Optional 00b6 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x6 = 0xb6,0xfff9 00b7 1b46 | F | Execute Package,Field_Read,Field_Number 0x46 00b8 190e | | Execute Package,Field_Reference,Field_Number 0xe 00b9 0007 | | Action Break_Optional 00ba 029d 092b | +| Declare_Subprogram INIT_0928,For_Outer_Call ; Debug Table 0x1.0x7 = 0xba,0xfff8 00bc 0007 | | Action Break_Optional ; Debug Table 0x1.0x8 = 0xbc,0xfff7 00bd 029d 094b | K| Declare_Subprogram INIT_0948,For_Outer_Call ; Debug Table 0x1.0x9 = 0xbd,0xfff6 00bf 029d 099b | | Declare_Subprogram INIT_0998,For_Outer_Call ; Debug Table 0x1.0xa = 0xbf,0xfff5 00c1 029d 09eb | | Declare_Subprogram INIT_09e8,For_Outer_Call ; Debug Table 0x1.0xb = 0xc1,0xfff4 00c3 029d 0a33 | 3| Declare_Subprogram INIT_0a30,For_Outer_Call ; Debug Table 0x1.0xc = 0xc3,0xfff3 00c5 0007 | | Action Break_Optional ; Debug Table 0x1.0xd = 0xc5,0xfff2 00c6 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0xe = 0xc6,0xfff1 00c7 00c7 | | Action Elaborate_Subprogram 00c8 1d1f | | Execute_Immediate Reference_Lex_1,0x1f ; Debug Table 0x1.0xf = 0xc8,0xfff0 00c9 00c7 | | Action Elaborate_Subprogram 00ca 1d20 | | Execute_Immediate Reference_Lex_1,0x20 ; Debug Table 0x1.0x10 = 0xca,0xffef 00cb 00c7 | | Action Elaborate_Subprogram 00cc 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 ; Debug Table 0x1.0x11 = 0xcc,0xffee 00cd 00c7 | | Action Elaborate_Subprogram 00ce 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 ; Debug Table 0x1.0x12 = 0xce,0xffed 00cf 00c7 | | Action Elaborate_Subprogram 00d0 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 ; Debug Table 0x1.0x13 = 0xd0,0xffec 00d1 00c7 | | Action Elaborate_Subprogram 00d2 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 ; Debug Table 0x1.0x14 = 0xd2,0xffeb 00d3 00c7 | | Action Elaborate_Subprogram 00d4 1d25 | % | Execute_Immediate Reference_Lex_1,0x25 ; Debug Table 0x1.0x15 = 0xd4,0xffea 00d5 00c7 | | Action Elaborate_Subprogram 00d6 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 ; Debug Table 0x1.0x16 = 0xd6,0xffe9 00d7 00c7 | | Action Elaborate_Subprogram 00d8 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 ; Debug Table 0x1.0x17 = 0xd8,0xffe8 00d9 00c7 | | Action Elaborate_Subprogram 00da 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 ; Debug Table 0x1.0x18 = 0xda,0xffe7 00db 00c7 | | Action Elaborate_Subprogram 00dc 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29 ; Debug Table 0x1.0x19 = 0xdc,0xffe6 00dd 00c7 | | Action Elaborate_Subprogram 00de 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a ; Debug Table 0x1.0x1a = 0xde,0xffe5 00df 00c7 | | Action Elaborate_Subprogram 00e0 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b ; Debug Table 0x1.0x1b = 0xe0,0xffe4 00e1 00c7 | | Action Elaborate_Subprogram 00e2 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c ; Debug Table 0x1.0x1c = 0xe2,0xffe3 00e3 00c7 | | Action Elaborate_Subprogram 00e4 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d ; Debug Table 0x1.0x1d = 0xe4,0xffe2 00e5 00c7 | | Action Elaborate_Subprogram 00e6 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e ; Debug Table 0x1.0x1e = 0xe6,0xffe1 00e7 00c7 | | Action Elaborate_Subprogram 00e8 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f ; Debug Table 0x1.0x1f = 0xe8,0xffe0 00e9 00c7 | | Action Elaborate_Subprogram 00ea 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30 ; Debug Table 0x1.0x20 = 0xea,0xffdf 00eb 00c7 | | Action Elaborate_Subprogram 00ec 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31 ; Debug Table 0x1.0x21 = 0xec,0xffde 00ed 00c7 | | Action Elaborate_Subprogram 00ee 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32 ; Debug Table 0x1.0x22 = 0xee,0xffdd 00ef 00c7 | | Action Elaborate_Subprogram 00f0 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33 ; Debug Table 0x1.0x23 = 0xf0,0xffdc 00f1 00c7 | | Action Elaborate_Subprogram 00f2 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34 ; Debug Table 0x1.0x24 = 0xf2,0xffdb 00f3 00c7 | | Action Elaborate_Subprogram 00f4 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35 ; Debug Table 0x1.0x25 = 0xf4,0xffda 00f5 00c7 | | Action Elaborate_Subprogram 00f6 1d36 | 6 | Execute_Immediate Reference_Lex_1,0x36 ; Debug Table 0x1.0x26 = 0xf6,0xffd9 00f7 00c7 | | Action Elaborate_Subprogram 00f8 1d37 | 7 | Execute_Immediate Reference_Lex_1,0x37 ; Debug Table 0x1.0x27 = 0xf8,0xffd8 00f9 00c7 | | Action Elaborate_Subprogram 00fa 0007 | | Action Break_Optional ; Debug Table 0x1.0x28 = 0xfa,0xffd7 00fb 1d38 | 8 | Execute_Immediate Reference_Lex_1,0x38 ; Debug Table 0x1.0x29 = 0xfb,0xffd6 00fc 00c7 | | Action Elaborate_Subprogram 00fd 1d39 | 9 | Execute_Immediate Reference_Lex_1,0x39 ; Debug Table 0x1.0x2a = 0xfd,0xffd5 00fe 00c7 | | Action Elaborate_Subprogram 00ff 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a ; Debug Table 0x1.0x2b = 0xff,0xffd4 0100 00c7 | | Action Elaborate_Subprogram 0101 0007 | | Action Break_Optional ; Debug Table 0x1.0x2c = 0x101,0xffd3 0102 1d3d | = | Execute_Immediate Reference_Lex_1,0x3d ; Debug Table 0x1.0x2d = 0x102,0xffd2 0103 00c7 | | Action Elaborate_Subprogram 0104 1d3e | > | Execute_Immediate Reference_Lex_1,0x3e ; Debug Table 0x1.0x2e = 0x104,0xffd1 0105 00c7 | | Action Elaborate_Subprogram 0106 1d3f | ? | Execute_Immediate Reference_Lex_1,0x3f ; Debug Table 0x1.0x2f = 0x106,0xffd0 0107 00c7 | | Action Elaborate_Subprogram 0108 1d40 | @ | Execute_Immediate Reference_Lex_1,0x40 ; Debug Table 0x1.0x30 = 0x108,0xffcf 0109 00c7 | | Action Elaborate_Subprogram 010a 1d41 | A | Execute_Immediate Reference_Lex_1,0x41 ; Debug Table 0x1.0x31 = 0x10a,0xffce 010b 00c7 | | Action Elaborate_Subprogram 010c 0007 | | Action Break_Optional ; Debug Table 0x1.0x32 = 0x10c,0xffcd 010d 1d42 | B | Execute_Immediate Reference_Lex_1,0x42 ; Debug Table 0x1.0x33 = 0x10d,0xffcc 010e 00c7 | | Action Elaborate_Subprogram 010f 1d45 | E | Execute_Immediate Reference_Lex_1,0x45 ; Debug Table 0x1.0x34 = 0x10f,0xffcb 0110 00c7 | | Action Elaborate_Subprogram 0111 1d46 | F | Execute_Immediate Reference_Lex_1,0x46 ; Debug Table 0x1.0x35 = 0x111,0xffca 0112 00c7 | | Action Elaborate_Subprogram 0113 1d48 | H | Execute_Immediate Reference_Lex_1,0x48 ; Debug Table 0x1.0x36 = 0x113,0xffc9 0114 00c7 | | Action Elaborate_Subprogram 0115 1d49 | I | Execute_Immediate Reference_Lex_1,0x49 ; Debug Table 0x1.0x37 = 0x115,0xffc8 0116 00c7 | | Action Elaborate_Subprogram 0117 1d4a | J | Execute_Immediate Reference_Lex_1,0x4a ; Debug Table 0x1.0x38 = 0x117,0xffc7 0118 00c7 | | Action Elaborate_Subprogram 0119 1d4b | K | Execute_Immediate Reference_Lex_1,0x4b ; Debug Table 0x1.0x39 = 0x119,0xffc6 011a 00c7 | | Action Elaborate_Subprogram 011b 0007 | | Action Break_Optional ; Debug Table 0x1.0x3a = 0x11b,0xffc5 011c 1d4c | L | Execute_Immediate Reference_Lex_1,0x4c ; Debug Table 0x1.0x3b = 0x11c,0xffc4 011d 00c7 | | Action Elaborate_Subprogram 011e 1d4d | M | Execute_Immediate Reference_Lex_1,0x4d ; Debug Table 0x1.0x3c = 0x11e,0xffc3 011f 00c7 | | Action Elaborate_Subprogram 0120 1d4e | N | Execute_Immediate Reference_Lex_1,0x4e ; Debug Table 0x1.0x3d = 0x120,0xffc2 0121 00c7 | | Action Elaborate_Subprogram 0122 0007 | | Action Break_Optional ; Debug Table 0x1.0x3e = 0x122,0xffc1 0123 1d50 | P | Execute_Immediate Reference_Lex_1,0x50 ; Debug Table 0x1.0x3f = 0x123,0xffc0 0124 00c7 | | Action Elaborate_Subprogram 0125 1d51 | Q | Execute_Immediate Reference_Lex_1,0x51 ; Debug Table 0x1.0x40 = 0x125,0xffbf 0126 00c7 | | Action Elaborate_Subprogram 0127 BODY_0008: 0127 00bc | | Action Signal_Activated 0128 00bb | | Action Signal_Completion 0129 0000 0000 | | .BLANK 0000[0x7] 0130 ; -------------------------------------------------------------------------------------- 0130 ; SUBPROGRAM 0130 ; -------------------------------------------------------------------------------------- 0130 0133 | 3 | .CONST 0x0133 ; Address of begin 0131 0004 | | .CONST 0x0004 ; Address of exception handler 0132 0001 | | .CONST 0x0001 ; Number of locals 0133 BODY_0130: 0133 INIT_0130: 0133 4603 |F | Jump_Case 0x4 ; Debug Table 0x2 = .DEBUG 0x0133,0x1190,0x0005,0x0000,0x0032,0xc7b4,0x0000,0x002a 0134 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0135 7802 |x | Jump 0x138 ; case 0x1 0136 7805 |x | Jump 0x13c ; case 0x2 0137 7809 |x | Jump 0x141 ; case 0x3 0138 00da | | Load_Top At_Offset_2 0139 0091 0a75 | u| Action Push_String_Extended_Indexed,0xa75 ; "A_VARIABLE_DECLARATION" 013b 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 013c 00db | | Load_Top At_Offset_3 013d 00db | | Load_Top At_Offset_3 013e 00e0 | | Load_Encached Standard_Cache 013f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0140 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0141 00da | | Load_Top At_Offset_2 0142 00e0 | | Load_Encached Standard_Cache 0143 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0144 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0145 0000 0000 | | .XXX[0x3] 0147 0000 | | 0148 ; -------------------------------------------------------------------------------------- 0148 ; SUBPROGRAM 0148 ; -------------------------------------------------------------------------------------- 0148 0150 | P | .CONST 0x0150 ; Address of begin 0149 0004 | | .CONST 0x0004 ; Address of exception handler 014a 0002 | | .CONST 0x0002 ; Number of locals 014b INIT_0148: 014b e002 | | Load 0x0,0x2 ; Debug Table 0x3 = .DEBUG 0x014b,0x1192,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0053 ; Debug Table 0x3.0x0 = 0x14b,0xffff 014c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 014d 02ff | | Declare_Variable Variant_Record 014e 00d8 | | Load_Top At_Offset_0 014f 1c00 | | Execute_Immediate Run_Utility,0x0 0150 BODY_0148: 0150 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0x1 = 0x150,0x1 0151 e5ff | | Load 0x2,-0x1 0152 8252 | R | Call 0x1,0x52 0153 8256 | V | Call 0x1,0x56 0154 e002 | | Load 0x0,0x2 0155 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0156 00d9 | | Load_Top At_Offset_1 0157 016d | m | Execute Variant_Record,Structure_Write 0158 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x2 = 0x158,0x2 0159 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 015a 0f02 | | Execute_Immediate Equal,0x2 015b 6803 |h | Jump_Zero 0x15f 015c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x3 = 0x15c,0x3 015d 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 015e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 015f 4824 |H$ | Short_Literal 0x24 ; Debug Table 0x3.0x4 = 0x15f,0x4 0160 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0161 0000 0000 | | .BLANK 0000[0x7] 0168 ; -------------------------------------------------------------------------------------- 0168 ; SUBPROGRAM 0168 ; -------------------------------------------------------------------------------------- 0168 016c | l | .CONST 0x016c ; Address of begin 0169 0004 | | .CONST 0x0004 ; Address of exception handler 016a 0002 | | .CONST 0x0002 ; Number of locals 016b INIT_0168: 016b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4 = .DEBUG 0x016b,0x119e,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0084 ; Debug Table 0x4.0x0 = 0x16b,0xffff 016c BODY_0168: 016c 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4.0x1 = 0x16c,0x1 016d e5ff | | Load 0x2,-0x1 016e 8252 | R | Call 0x1,0x52 016f e003 | | Load 0x0,0x3 0170 180e | | Execute Package,Field_Execute,Field_Number 0xe 0171 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0172 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x2 = 0x172,0x2 0173 00eb | | Load_Encached Diana_Cache 0174 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0175 0f00 | | Execute_Immediate Equal,0x0 0176 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0177 0000 | | .XXX[0x1] 0178 ; -------------------------------------------------------------------------------------- 0178 ; SUBPROGRAM 0178 ; -------------------------------------------------------------------------------------- 0178 017c | | | .CONST 0x017c ; Address of begin 0179 0004 | | .CONST 0x0004 ; Address of exception handler 017a 0002 | | .CONST 0x0002 ; Number of locals 017b INIT_0178: 017b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5 = .DEBUG 0x017b,0x11a6,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x008d ; Debug Table 0x5.0x0 = 0x17b,0xffff 017c BODY_0178: 017c 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5.0x1 = 0x17c,0x1 017d e5ff | | Load 0x2,-0x1 017e 8252 | R | Call 0x1,0x52 017f e003 | | Load 0x0,0x3 0180 180e | | Execute Package,Field_Execute,Field_Number 0xe 0181 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0182 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x2 = 0x182,0x2 0183 00eb | | Load_Encached Diana_Cache 0184 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0185 6809 |h | Jump_Zero 0x18f 0186 0092 0aad | | Action Push_String_Extended,0xaad ; "Element is not a Renaming Declaration" ; Debug Table 0x5.0x3 = 0x186,0x3 0188 e004 | | Load 0x0,0x4 0189 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 018a e005 | | Load 0x0,0x5 018b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 018c e001 | | Load 0x0,0x1 ; Debug Table 0x5.0x4 = 0x18c,0x4 018d 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 018e 0257 | W | Execute Discrete,Raise 018f 4801 |H | Short_Literal 0x1 ; Debug Table 0x5.0x5 = 0x18f,0x5 0190 00d9 | | Load_Top At_Offset_1 0191 00eb | | Load_Encached Diana_Cache 0192 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4 0193 e006 | | Load 0x0,0x6 0194 180e | | Execute Package,Field_Execute,Field_Number 0xe 0195 8253 | S | Call 0x1,0x53 0196 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0197 0000 | | .XXX[0x1] 0198 ; -------------------------------------------------------------------------------------- 0198 ; SUBPROGRAM 0198 ; -------------------------------------------------------------------------------------- 0198 01a3 | | .CONST 0x01a3 ; Address of begin 0199 0004 | | .CONST 0x0004 ; Address of exception handler 019a 0003 | | .CONST 0x0003 ; Number of locals 019b INIT_0198: 019b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x6 = .DEBUG 0x019b,0x11b4,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0096 ; Debug Table 0x6.0x0 = 0x19b,0xffff 019c 00db | | Load_Top At_Offset_3 019d 8252 | R | Call 0x1,0x52 019e 0031 | 1 | Store_Top Heap_Access,At_Offset_1 019f 00ec | | Load_Encached Diana_Tree_Cache 01a0 e5ff | | Load 0x2,-0x1 01a1 8252 | R | Call 0x1,0x52 01a2 0031 | 1 | Store_Top Heap_Access,At_Offset_1 01a3 BODY_0198: 01a3 00cf | | Action Mark_Auxiliary 01a4 0007 | | Action Break_Optional ; Debug Table 0x6.0x1 = 0x1a4,0x1 01a5 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x2 = 0x1a5,0x2 01a6 00eb | | Load_Encached Diana_Cache 01a7 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01a8 0b00 | | Execute_Immediate Case_Compare,0x0 01a9 700b |p | Jump_Nonzero 0x1b5 01aa 0ba8 | | Execute_Immediate Case_Compare,0xa8 01ab 7014 |p | Jump_Nonzero 0x1c0 01ac 0b49 | I | Execute_Immediate Case_Compare,0x49 01ad 7014 |p | Jump_Nonzero 0x1c2 01ae 0b47 | G | Execute_Immediate Case_Compare,0x47 01af 7012 |p | Jump_Nonzero 0x1c2 01b0 0b48 | H | Execute_Immediate Case_Compare,0x48 01b1 7010 |p | Jump_Nonzero 0x1c2 01b2 0b7c | | | Execute_Immediate Case_Compare,0x7c 01b3 7010 |p | Jump_Nonzero 0x1c4 01b4 7817 |x | Jump 0x1cc ; Debug Table 0x6.0x3 = 0x1b4,0xa 01b5 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x4 = 0x1b5,0x3 01b6 e003 | | Load 0x0,0x3 01b7 1816 | | Execute Package,Field_Execute,Field_Number 0x16 01b8 6805 |h | Jump_Zero 0x1be 01b9 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x5 = 0x1b9,0x4 01ba e003 | | Load 0x0,0x3 01bb 1817 | | Execute Package,Field_Execute,Field_Number 0x17 01bc a402 | | Store_Unchecked 0x2,0x2 01bd 780e |x | Jump 0x1cc 01be 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x6 = 0x1be,0x5 01bf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01c0 4801 |H | Short_Literal 0x1 ; Debug Table 0x6.0x7 = 0x1c0,0x6 01c1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01c2 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x8 = 0x1c2,0x7 01c3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01c4 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0x9 = 0x1c4,0x8 01c5 00eb | | Load_Encached Diana_Cache 01c6 18be | | Execute Package,Field_Execute,Field_Number 0xbe 01c7 00db | | Load_Top At_Offset_3 01c8 021f | | Execute Heap_Access,Equal 01c9 6802 |h | Jump_Zero 0x1cc 01ca 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0xa = 0x1ca,0x9 01cb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01cc 00d1 | | Pop_Control Pop_Count_1 01cd 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0xb = 0x1cd,0xb 01ce 0032 | 2 | Store_Top Heap_Access,At_Offset_2 01cf 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0xc = 0x1cf,0xc 01d0 00eb | | Load_Encached Diana_Cache 01d1 18ec | | Execute Package,Field_Execute,Field_Number 0xec 01d2 0033 | 3 | Store_Top Heap_Access,At_Offset_3 01d3 00c9 | | Action Pop_Auxiliary_Loop 01d4 7fd0 | | Jump 0x1a5 01d5 0000 0000 | | .XXX[0x3] 01d7 0000 | | 01d8 ; -------------------------------------------------------------------------------------- 01d8 ; SUBPROGRAM 01d8 ; -------------------------------------------------------------------------------------- 01d8 01e3 | | .CONST 0x01e3 ; Address of begin 01d9 0004 | | .CONST 0x0004 ; Address of exception handler 01da 0003 | | .CONST 0x0003 ; Number of locals 01db INIT_01d8: 01db 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x7 = .DEBUG 0x01db,0x11d0,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x009f ; Debug Table 0x7.0x0 = 0x1db,0xffff 01dc 00db | | Load_Top At_Offset_3 01dd 8252 | R | Call 0x1,0x52 01de 0031 | 1 | Store_Top Heap_Access,At_Offset_1 01df 00ec | | Load_Encached Diana_Tree_Cache 01e0 e5ff | | Load 0x2,-0x1 01e1 8252 | R | Call 0x1,0x52 01e2 0031 | 1 | Store_Top Heap_Access,At_Offset_1 01e3 BODY_01d8: 01e3 00cf | | Action Mark_Auxiliary 01e4 0007 | | Action Break_Optional ; Debug Table 0x7.0x1 = 0x1e4,0x1 01e5 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0x2 = 0x1e5,0x2 01e6 00eb | | Load_Encached Diana_Cache 01e7 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01e8 0b00 | | Execute_Immediate Case_Compare,0x0 01e9 7005 |p | Jump_Nonzero 0x1ef 01ea 0ba8 | | Execute_Immediate Case_Compare,0xa8 01eb 700e |p | Jump_Nonzero 0x1fa 01ec 0b7c | | | Execute_Immediate Case_Compare,0x7c 01ed 700e |p | Jump_Nonzero 0x1fc 01ee 7815 |x | Jump 0x204 ; Debug Table 0x7.0x3 = 0x1ee,0x9 01ef 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0x4 = 0x1ef,0x3 01f0 e003 | | Load 0x0,0x3 01f1 1816 | | Execute Package,Field_Execute,Field_Number 0x16 01f2 6805 |h | Jump_Zero 0x1f8 01f3 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0x5 = 0x1f3,0x4 01f4 e003 | | Load 0x0,0x3 01f5 1817 | | Execute Package,Field_Execute,Field_Number 0x17 01f6 a402 | | Store_Unchecked 0x2,0x2 01f7 780c |x | Jump 0x204 01f8 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x6 = 0x1f8,0x5 01f9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01fa 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x7 = 0x1fa,0x6 01fb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01fc 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0x8 = 0x1fc,0x7 01fd 00eb | | Load_Encached Diana_Cache 01fe 18be | | Execute Package,Field_Execute,Field_Number 0xbe 01ff 00db | | Load_Top At_Offset_3 0200 021f | | Execute Heap_Access,Equal 0201 6802 |h | Jump_Zero 0x204 0202 4801 |H | Short_Literal 0x1 ; Debug Table 0x7.0x9 = 0x202,0x8 0203 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0204 00d1 | | Pop_Control Pop_Count_1 0205 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0xa = 0x205,0xa 0206 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0207 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0xb = 0x207,0xb 0208 00eb | | Load_Encached Diana_Cache 0209 18ec | | Execute Package,Field_Execute,Field_Number 0xec 020a 0033 | 3 | Store_Top Heap_Access,At_Offset_3 020b 00c9 | | Action Pop_Auxiliary_Loop 020c 7fd8 | | Jump 0x1e5 020d 0000 0000 | | .XXX[0x3] 020f 0000 | | 0210 ; -------------------------------------------------------------------------------------- 0210 ; SUBPROGRAM 0210 ; -------------------------------------------------------------------------------------- 0210 0214 | | .CONST 0x0214 ; Address of begin 0211 0004 | | .CONST 0x0004 ; Address of exception handler 0212 0002 | | .CONST 0x0002 ; Number of locals 0213 INIT_0210: 0213 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x8 = .DEBUG 0x0213,0x11ea,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x00a8 ; Debug Table 0x8.0x0 = 0x213,0xffff 0214 BODY_0210: 0214 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x1 = 0x214,0x1 0215 e5ff | | Load 0x2,-0x1 0216 8252 | R | Call 0x1,0x52 0217 8256 | V | Call 0x1,0x56 0218 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0219 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0x2 = 0x219,0x2 021a 00eb | | Load_Encached Diana_Cache 021b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 021c 700b |p | Jump_Nonzero 0x228 021d 00d8 | | Load_Top At_Offset_0 021e e007 | | Load 0x0,0x7 021f 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 0220 6807 |h | Jump_Zero 0x228 0221 00d8 | | Load_Top At_Offset_0 0222 00eb | | Load_Encached Diana_Cache 0223 18ec | | Execute Package,Field_Execute,Field_Number 0xec 0224 00eb | | Load_Encached Diana_Cache 0225 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0226 0f8f | | Execute_Immediate Equal,-0x71 0227 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0228 4800 |H | Short_Literal 0x0 0229 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 022a 0000 0000 | | .BLANK 0000[0x6] 0230 ; -------------------------------------------------------------------------------------- 0230 ; SUBPROGRAM 0230 ; -------------------------------------------------------------------------------------- 0230 0234 | 4 | .CONST 0x0234 ; Address of begin 0231 0004 | | .CONST 0x0004 ; Address of exception handler 0232 0002 | | .CONST 0x0002 ; Number of locals 0233 INIT_0230: 0233 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x9 = .DEBUG 0x0233,0x11f2,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x00b3 ; Debug Table 0x9.0x0 = 0x233,0xffff 0234 BODY_0230: 0234 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x1 = 0x234,0x1 0235 e5ff | | Load 0x2,-0x1 0236 8252 | R | Call 0x1,0x52 0237 8256 | V | Call 0x1,0x56 0238 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0239 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x2 = 0x239,0x2 023a 00eb | | Load_Encached Diana_Cache 023b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 023c 700b |p | Jump_Nonzero 0x248 023d 00d8 | | Load_Top At_Offset_0 023e e007 | | Load 0x0,0x7 023f 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 0240 6807 |h | Jump_Zero 0x248 0241 00d8 | | Load_Top At_Offset_0 0242 00eb | | Load_Encached Diana_Cache 0243 18ec | | Execute Package,Field_Execute,Field_Number 0xec 0244 00eb | | Load_Encached Diana_Cache 0245 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0246 0f94 | | Execute_Immediate Equal,-0x6c 0247 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0248 4800 |H | Short_Literal 0x0 0249 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 024a 0000 0000 | | .BLANK 0000[0x6] 0250 ; -------------------------------------------------------------------------------------- 0250 ; SUBPROGRAM 0250 ; -------------------------------------------------------------------------------------- 0250 025a | Z | .CONST 0x025a ; Address of begin 0251 0004 | | .CONST 0x0004 ; Address of exception handler 0252 0004 | | .CONST 0x0004 ; Number of locals 0253 INIT_0250: 0253 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xa = .DEBUG 0x0253,0x11fa,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x00be ; Debug Table 0xa.0x0 = 0x253,0xffff 0254 e001 | | Load 0x0,0x1 ; Debug Table 0xa.0x1 = 0x254,0xfffe 0255 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0256 0322 | " | Declare_Variable Record 0257 e001 | | Load 0x0,0x1 ; Debug Table 0xa.0x2 = 0x257,0xfffd 0258 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0259 0322 | " | Declare_Variable Record 025a BODY_0250: 025a e5ff | | Load 0x2,-0x1 ; Debug Table 0xa.0x3 = 0x25a,0x1 025b 8255 | U | Call 0x1,0x55 025c 0033 | 3 | Store_Top Heap_Access,At_Offset_3 025d 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x4 = 0x25d,0x2 025e 00eb | | Load_Encached Diana_Cache 025f 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0260 0f90 | | Execute_Immediate Equal,-0x70 0261 680e |h | Jump_Zero 0x270 0262 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x5 = 0x262,0x3 0263 00eb | | Load_Encached Diana_Cache 0264 1889 | | Execute Package,Field_Execute,Field_Number 0x89 0265 e001 | | Load 0x0,0x1 0266 1b46 | F | Execute Package,Field_Read,Field_Number 0x46 0267 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0268 00da | | Load_Top At_Offset_2 0269 017d | } | Execute Record,Structure_Write 026a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x6 = 0x26a,0x4 026b 00da | | Load_Top At_Offset_2 026c e001 | | Load 0x0,0x1 026d 181b | | Execute Package,Field_Execute,Field_Number 0x1b 026e 00d1 | | Pop_Control Pop_Count_1 026f 7806 |x | Jump 0x276 0270 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x7 = 0x270,0x5 0271 00db | | Load_Top At_Offset_3 0272 8253 | S | Call 0x1,0x53 0273 e001 | | Load 0x0,0x1 0274 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0275 00d1 | | Pop_Control Pop_Count_1 0276 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x8 = 0x276,0x6 0277 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 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 00da | | Load_Top At_Offset_2 ; Debug Table 0xb = .DEBUG 0x027b,0x120e,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x00c9 ; Debug Table 0xb.0x0 = 0x27b,0x1 027c 8255 | U | Call 0x1,0x55 027d 8253 | S | Call 0x1,0x53 027e e001 | | Load 0x0,0x1 027f 182f | / | Execute Package,Field_Execute,Field_Number 0x2f 0280 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0281 0000 0000 | | .BLANK 0000[0x7] 0288 ; -------------------------------------------------------------------------------------- 0288 ; SUBPROGRAM 0288 ; -------------------------------------------------------------------------------------- 0288 028f | | .CONST 0x028f ; Address of begin 0289 0004 | | .CONST 0x0004 ; Address of exception handler 028a 0002 | | .CONST 0x0002 ; Number of locals 028b INIT_0288: 028b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc = .DEBUG 0x028b,0x1212,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x00d2 ; Debug Table 0xc.0x0 = 0x28b,0xffff 028c 00db | | Load_Top At_Offset_3 028d 8252 | R | Call 0x1,0x52 028e 0031 | 1 | Store_Top Heap_Access,At_Offset_1 028f BODY_0288: 028f 00cf | | Action Mark_Auxiliary 0290 7805 |x | Jump 0x296 0291 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xc.0x1 = 0x291,0x2 0292 00eb | | Load_Encached Diana_Cache 0293 18ec | | Execute Package,Field_Execute,Field_Number 0xec 0294 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0295 00c9 | | Action Pop_Auxiliary_Loop 0296 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xc.0x2 = 0x296,0x1 0297 00eb | | Load_Encached Diana_Cache 0298 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0299 7006 |p | Jump_Nonzero 0x2a0 029a 00d9 | | Load_Top At_Offset_1 029b e002 | | Load 0x0,0x2 029c 1811 | | Execute Package,Field_Execute,Field_Number 0x11 029d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 029e 0f02 | | Execute_Immediate Equal,0x2 029f 7801 |x | Jump 0x2a1 02a0 4801 |H | Short_Literal 0x1 02a1 6fef |o | Jump_Zero 0x291 02a2 00ce | | Action Pop_Auxiliary 02a3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x3 = 0x2a3,0x3 02a4 8253 | S | Call 0x1,0x53 02a5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02a6 0000 0000 | | .XXX[0x2] 02a8 ; -------------------------------------------------------------------------------------- 02a8 ; SUBPROGRAM 02a8 ; -------------------------------------------------------------------------------------- 02a8 02af | | .CONST 0x02af ; Address of begin 02a9 0004 | | .CONST 0x0004 ; Address of exception handler 02aa 0002 | | .CONST 0x0002 ; Number of locals 02ab INIT_02a8: 02ab 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xd = .DEBUG 0x02ab,0x121c,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x00dd ; Debug Table 0xd.0x0 = 0x2ab,0xffff 02ac 00db | | Load_Top At_Offset_3 02ad 8252 | R | Call 0x1,0x52 02ae 0031 | 1 | Store_Top Heap_Access,At_Offset_1 02af BODY_02a8: 02af 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x1 = 0x2af,0x1 02b0 00eb | | Load_Encached Diana_Cache 02b1 1814 | | Execute Package,Field_Execute,Field_Number 0x14 02b2 0b9b | | Execute_Immediate Case_Compare,0x9b 02b3 702f |p/ | Jump_Nonzero 0x2e3 02b4 4801 |H | Short_Literal 0x1 ; Debug Table 0xd.0x2 = 0x2b4,0x3 02b5 00da | | Load_Top At_Offset_2 02b6 8256 | V | Call 0x1,0x56 02b7 0032 | 2 | Store_Top Heap_Access,At_Offset_2 02b8 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xd.0x3 = 0x2b8,0x4 02b9 00eb | | Load_Encached Diana_Cache 02ba 1814 | | Execute Package,Field_Execute,Field_Number 0x14 02bb 0b38 | 8 | Execute_Immediate Case_Compare,0x38 02bc 7014 |p | Jump_Nonzero 0x2d1 02bd 0b3a | : | Execute_Immediate Case_Compare,0x3a 02be 7012 |p | Jump_Nonzero 0x2d1 02bf 0b02 | | Execute_Immediate Case_Compare,0x2 02c0 7012 |p | Jump_Nonzero 0x2d3 02c1 0b39 | 9 | Execute_Immediate Case_Compare,0x39 02c2 7012 |p | Jump_Nonzero 0x2d5 02c3 00d8 | | Load_Top At_Offset_0 02c4 487d |H} | Short_Literal 0x7d 02c5 487f |H | Short_Literal 0x7f 02c6 0262 | b | Execute Discrete,In_Range 02c7 7014 |p | Jump_Nonzero 0x2dc 02c8 0092 0aae | | Action Push_String_Extended,0xaae ; "Element is not an Object or Parameter Declaration" ; Debug Table 0xd.0x4 = 0x2c8,0x9 02ca e004 | | Load 0x0,0x4 02cb 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 02cc e005 | | Load 0x0,0x5 02cd 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02ce e001 | | Load 0x0,0x1 ; Debug Table 0xd.0x5 = 0x2ce,0xa 02cf 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 02d0 0257 | W | Execute Discrete,Raise 02d1 4801 |H | Short_Literal 0x1 ; Debug Table 0xd.0x6 = 0x2d1,0x5 02d2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02d3 4800 |H | Short_Literal 0x0 ; Debug Table 0xd.0x7 = 0x2d3,0x6 02d4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02d5 00da | | Load_Top At_Offset_2 ; Debug Table 0xd.0x8 = 0x2d5,0x7 02d6 00eb | | Load_Encached Diana_Cache 02d7 18d7 | | Execute Package,Field_Execute,Field_Number 0xd7 02d8 00eb | | Load_Encached Diana_Cache 02d9 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02da 0f00 | | Execute_Immediate Equal,0x0 02db 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02dc 00da | | Load_Top At_Offset_2 ; Debug Table 0xd.0x9 = 0x2dc,0x8 02dd 00eb | | Load_Encached Diana_Cache 02de 18ca | | Execute Package,Field_Execute,Field_Number 0xca 02df 00eb | | Load_Encached Diana_Cache 02e0 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02e1 0f00 | | Execute_Immediate Equal,0x0 02e2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02e3 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xd.0xa = 0x2e3,0x2 02e4 00eb | | Load_Encached Diana_Cache 02e5 18d7 | | Execute Package,Field_Execute,Field_Number 0xd7 02e6 00eb | | Load_Encached Diana_Cache 02e7 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02e8 0f00 | | Execute_Immediate Equal,0x0 02e9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02ea 0000 0000 | | .BLANK 0000[0x6] 02f0 ; -------------------------------------------------------------------------------------- 02f0 ; SUBPROGRAM 02f0 ; -------------------------------------------------------------------------------------- 02f0 02f7 | | .CONST 0x02f7 ; Address of begin 02f1 0004 | | .CONST 0x0004 ; Address of exception handler 02f2 0002 | | .CONST 0x0002 ; Number of locals 02f3 INIT_02f0: 02f3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xe = .DEBUG 0x02f3,0x1234,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x00e6 ; Debug Table 0xe.0x0 = 0x2f3,0xffff 02f4 00db | | Load_Top At_Offset_3 02f5 8252 | R | Call 0x1,0x52 02f6 0031 | 1 | Store_Top Heap_Access,At_Offset_1 02f7 BODY_02f0: 02f7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x1 = 0x2f7,0x1 02f8 00eb | | Load_Encached Diana_Cache 02f9 1814 | | Execute Package,Field_Execute,Field_Number 0x14 02fa 0b9b | | Execute_Immediate Case_Compare,0x9b 02fb 702a |p* | Jump_Nonzero 0x326 02fc 4801 |H | Short_Literal 0x1 ; Debug Table 0xe.0x2 = 0x2fc,0x3 02fd 00da | | Load_Top At_Offset_2 02fe 8256 | V | Call 0x1,0x56 02ff 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0300 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xe.0x3 = 0x300,0x4 0301 00eb | | Load_Encached Diana_Cache 0302 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0303 0b38 | 8 | Execute_Immediate Case_Compare,0x38 0304 7012 |p | Jump_Nonzero 0x317 0305 0b39 | 9 | Execute_Immediate Case_Compare,0x39 0306 7010 |p | Jump_Nonzero 0x317 0307 0b3a | : | Execute_Immediate Case_Compare,0x3a 0308 7013 |p | Jump_Nonzero 0x31c 0309 00d8 | | Load_Top At_Offset_0 030a 487d |H} | Short_Literal 0x7d 030b 487f |H | Short_Literal 0x7f 030c 0262 | b | Execute Discrete,In_Range 030d 7013 |p | Jump_Nonzero 0x321 030e 0092 0aae | | Action Push_String_Extended,0xaae ; "Element is not an Object or Parameter Declaration" ; Debug Table 0xe.0x4 = 0x30e,0x8 0310 e004 | | Load 0x0,0x4 0311 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 0312 e005 | | Load 0x0,0x5 0313 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0314 e001 | | Load 0x0,0x1 ; Debug Table 0xe.0x5 = 0x314,0x9 0315 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 0316 0257 | W | Execute Discrete,Raise 0317 00da | | Load_Top At_Offset_2 ; Debug Table 0xe.0x6 = 0x317,0x5 0318 00eb | | Load_Encached Diana_Cache 0319 18d7 | | Execute Package,Field_Execute,Field_Number 0xd7 031a 8253 | S | Call 0x1,0x53 031b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 031c 00da | | Load_Top At_Offset_2 ; Debug Table 0xe.0x7 = 0x31c,0x6 031d 00eb | | Load_Encached Diana_Cache 031e 18c5 | | Execute Package,Field_Execute,Field_Number 0xc5 031f 8253 | S | Call 0x1,0x53 0320 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0321 00da | | Load_Top At_Offset_2 ; Debug Table 0xe.0x8 = 0x321,0x7 0322 00eb | | Load_Encached Diana_Cache 0323 18ca | | Execute Package,Field_Execute,Field_Number 0xca 0324 8253 | S | Call 0x1,0x53 0325 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0326 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xe.0x9 = 0x326,0x2 0327 00eb | | Load_Encached Diana_Cache 0328 18d7 | | Execute Package,Field_Execute,Field_Number 0xd7 0329 8253 | S | Call 0x1,0x53 032a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 032b 0000 0000 | | .BLANK 0000[0x5] 0330 ; -------------------------------------------------------------------------------------- 0330 ; SUBPROGRAM 0330 ; -------------------------------------------------------------------------------------- 0330 0334 | 4 | .CONST 0x0334 ; Address of begin 0331 0004 | | .CONST 0x0004 ; Address of exception handler 0332 0002 | | .CONST 0x0002 ; Number of locals 0333 INIT_0330: 0333 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xf = .DEBUG 0x0333,0x124a,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x00ef ; Debug Table 0xf.0x0 = 0x333,0xffff 0334 BODY_0330: 0334 4801 |H | Short_Literal 0x1 ; Debug Table 0xf.0x1 = 0x334,0x1 0335 e5ff | | Load 0x2,-0x1 0336 8252 | R | Call 0x1,0x52 0337 8256 | V | Call 0x1,0x56 0338 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0339 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x2 = 0x339,0x2 033a 00eb | | Load_Encached Diana_Cache 033b 1814 | | Execute Package,Field_Execute,Field_Number 0x14 033c 0b9b | | Execute_Immediate Case_Compare,0x9b 033d 700d |p | Jump_Nonzero 0x34b 033e 0b38 | 8 | Execute_Immediate Case_Compare,0x38 033f 7010 |p | Jump_Nonzero 0x350 0340 0b39 | 9 | Execute_Immediate Case_Compare,0x39 0341 700e |p | Jump_Nonzero 0x350 0342 0092 0aaf | | Action Push_String_Extended,0xaaf ; "Element is not an object declaration or id" ; Debug Table 0xf.0x3 = 0x342,0x5 0344 e004 | | Load 0x0,0x4 0345 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 0346 e005 | | Load 0x0,0x5 0347 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0348 e001 | | Load 0x0,0x1 ; Debug Table 0xf.0x4 = 0x348,0x6 0349 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 034a 0257 | W | Execute Discrete,Raise 034b 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0x5 = 0x34b,0x3 034c 00eb | | Load_Encached Diana_Cache 034d 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4 034e 8253 | S | Call 0x1,0x53 034f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0350 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0x6 = 0x350,0x4 0351 00eb | | Load_Encached Diana_Cache 0352 18e8 | | Execute Package,Field_Execute,Field_Number 0xe8 0353 8253 | S | Call 0x1,0x53 0354 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0355 0000 0000 | | .XXX[0x3] 0357 0000 | | 0358 ; -------------------------------------------------------------------------------------- 0358 ; SUBPROGRAM 0358 ; -------------------------------------------------------------------------------------- 0358 035f | _ | .CONST 0x035f ; Address of begin 0359 0004 | | .CONST 0x0004 ; Address of exception handler 035a 0002 | | .CONST 0x0002 ; Number of locals 035b INIT_0358: 035b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x10 = .DEBUG 0x035b,0x125a,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x00f8 ; Debug Table 0x10.0x0 = 0x35b,0xffff 035c 00db | | Load_Top At_Offset_3 035d 8252 | R | Call 0x1,0x52 035e 0031 | 1 | Store_Top Heap_Access,At_Offset_1 035f BODY_0358: 035f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x10.0x1 = 0x35f,0x1 0360 00eb | | Load_Encached Diana_Cache 0361 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0362 0b9b | | Execute_Immediate Case_Compare,0x9b 0363 701d |p | Jump_Nonzero 0x381 0364 4801 |H | Short_Literal 0x1 ; Debug Table 0x10.0x2 = 0x364,0x3 0365 00da | | Load_Top At_Offset_2 0366 8256 | V | Call 0x1,0x56 0367 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0368 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x10.0x3 = 0x368,0x4 0369 00eb | | Load_Encached Diana_Cache 036a 1814 | | Execute Package,Field_Execute,Field_Number 0x14 036b 0b02 | | Execute_Immediate Case_Compare,0x2 036c 700f |p | Jump_Nonzero 0x37c 036d 0b7e | ~ | Execute_Immediate Case_Compare,0x7e 036e 700d |p | Jump_Nonzero 0x37c 036f 0b7d | } | Execute_Immediate Case_Compare,0x7d 0370 700b |p | Jump_Nonzero 0x37c 0371 0b7f | | Execute_Immediate Case_Compare,0x7f 0372 7009 |p | Jump_Nonzero 0x37c 0373 0092 0ab0 | | Action Push_String_Extended,0xab0 ; "Element is not a subprogram formal or deferred constant" ; Debug Table 0x10.0x4 = 0x373,0x6 0375 e004 | | Load 0x0,0x4 0376 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 0377 e005 | | Load 0x0,0x5 0378 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0379 e001 | | Load 0x0,0x1 ; Debug Table 0x10.0x5 = 0x379,0x7 037a 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 037b 0257 | W | Execute Discrete,Raise 037c 00da | | Load_Top At_Offset_2 ; Debug Table 0x10.0x6 = 0x37c,0x5 037d 00eb | | Load_Encached Diana_Cache 037e 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4 037f 8253 | S | Call 0x1,0x53 0380 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0381 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x10.0x7 = 0x381,0x2 0382 00eb | | Load_Encached Diana_Cache 0383 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4 0384 8253 | S | Call 0x1,0x53 0385 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0386 0000 0000 | | .XXX[0x2] 0388 ; -------------------------------------------------------------------------------------- 0388 ; SUBPROGRAM 0388 ; -------------------------------------------------------------------------------------- 0388 038c | | .CONST 0x038c ; Address of begin 0389 0004 | | .CONST 0x0004 ; Address of exception handler 038a 0002 | | .CONST 0x0002 ; Number of locals 038b INIT_0388: 038b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x11 = .DEBUG 0x038b,0x126c,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0101 ; Debug Table 0x11.0x0 = 0x38b,0xffff 038c BODY_0388: 038c 4801 |H | Short_Literal 0x1 ; Debug Table 0x11.0x1 = 0x38c,0x1 038d e5ff | | Load 0x2,-0x1 038e 8252 | R | Call 0x1,0x52 038f 8256 | V | Call 0x1,0x56 0390 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0391 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x2 = 0x391,0x2 0392 00eb | | Load_Encached Diana_Cache 0393 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0394 0f3b | ; | Execute_Immediate Equal,0x3b 0395 6807 |h | Jump_Zero 0x39d 0396 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x3 = 0x396,0x3 0397 00eb | | Load_Encached Diana_Cache 0398 18e8 | | Execute Package,Field_Execute,Field_Number 0xe8 0399 00eb | | Load_Encached Diana_Cache 039a 1814 | | Execute Package,Field_Execute,Field_Number 0x14 039b 0f71 | q | Execute_Immediate Equal,0x71 039c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 039d 4800 |H | Short_Literal 0x0 ; Debug Table 0x11.0x4 = 0x39d,0x4 039e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 039f 0000 | | .XXX[0x1] 03a0 ; -------------------------------------------------------------------------------------- 03a0 ; SUBPROGRAM 03a0 ; -------------------------------------------------------------------------------------- 03a0 03a4 | | .CONST 0x03a4 ; Address of begin 03a1 0004 | | .CONST 0x0004 ; Address of exception handler 03a2 0002 | | .CONST 0x0002 ; Number of locals 03a3 INIT_03a0: 03a3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x12 = .DEBUG 0x03a3,0x1278,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x010a ; Debug Table 0x12.0x0 = 0x3a3,0xffff 03a4 BODY_03a0: 03a4 4801 |H | Short_Literal 0x1 ; Debug Table 0x12.0x1 = 0x3a4,0x1 03a5 e5ff | | Load 0x2,-0x1 03a6 8252 | R | Call 0x1,0x52 03a7 8256 | V | Call 0x1,0x56 03a8 0031 | 1 | Store_Top Heap_Access,At_Offset_1 03a9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0x2 = 0x3a9,0x2 03aa 00eb | | Load_Encached Diana_Cache 03ab 1814 | | Execute Package,Field_Execute,Field_Number 0x14 03ac 0f3b | ; | Execute_Immediate Equal,0x3b 03ad 6807 |h | Jump_Zero 0x3b5 03ae 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0x3 = 0x3ae,0x3 03af 00eb | | Load_Encached Diana_Cache 03b0 18e8 | | Execute Package,Field_Execute,Field_Number 0xe8 03b1 00eb | | Load_Encached Diana_Cache 03b2 1814 | | Execute Package,Field_Execute,Field_Number 0x14 03b3 0f70 | p | Execute_Immediate Equal,0x70 03b4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03b5 4800 |H | Short_Literal 0x0 ; Debug Table 0x12.0x4 = 0x3b5,0x4 03b6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03b7 0000 | | .XXX[0x1] 03b8 ; -------------------------------------------------------------------------------------- 03b8 ; SUBPROGRAM 03b8 ; -------------------------------------------------------------------------------------- 03b8 03bc | | .CONST 0x03bc ; Address of begin 03b9 0004 | | .CONST 0x0004 ; Address of exception handler 03ba 0002 | | .CONST 0x0002 ; Number of locals 03bb INIT_03b8: 03bb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x13 = .DEBUG 0x03bb,0x1284,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0113 ; Debug Table 0x13.0x0 = 0x3bb,0xffff 03bc BODY_03b8: 03bc 4801 |H | Short_Literal 0x1 ; Debug Table 0x13.0x1 = 0x3bc,0x1 03bd e5ff | | Load 0x2,-0x1 03be 8252 | R | Call 0x1,0x52 03bf 8256 | V | Call 0x1,0x56 03c0 0031 | 1 | Store_Top Heap_Access,At_Offset_1 03c1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x2 = 0x3c1,0x2 03c2 00eb | | Load_Encached Diana_Cache 03c3 1814 | | Execute Package,Field_Execute,Field_Number 0x14 03c4 0f3b | ; | Execute_Immediate Equal,0x3b 03c5 6806 |h | Jump_Zero 0x3cc 03c6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x3 = 0x3c6,0x3 03c7 00eb | | Load_Encached Diana_Cache 03c8 18e8 | | Execute Package,Field_Execute,Field_Number 0xe8 03c9 00eb | | Load_Encached Diana_Cache 03ca 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03cb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03cc 4800 |H | Short_Literal 0x0 ; Debug Table 0x13.0x4 = 0x3cc,0x4 03cd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03ce 0000 0000 | | .XXX[0x2] 03d0 ; -------------------------------------------------------------------------------------- 03d0 ; SUBPROGRAM 03d0 ; -------------------------------------------------------------------------------------- 03d0 03d4 | | .CONST 0x03d4 ; Address of begin 03d1 0004 | | .CONST 0x0004 ; Address of exception handler 03d2 0002 | | .CONST 0x0002 ; Number of locals 03d3 INIT_03d0: 03d3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x14 = .DEBUG 0x03d3,0x1290,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x011c ; Debug Table 0x14.0x0 = 0x3d3,0xffff 03d4 BODY_03d0: 03d4 4801 |H | Short_Literal 0x1 ; Debug Table 0x14.0x1 = 0x3d4,0x1 03d5 e5ff | | Load 0x2,-0x1 03d6 8252 | R | Call 0x1,0x52 03d7 8256 | V | Call 0x1,0x56 03d8 0031 | 1 | Store_Top Heap_Access,At_Offset_1 03d9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x14.0x2 = 0x3d9,0x2 03da 00eb | | Load_Encached Diana_Cache 03db 1814 | | Execute Package,Field_Execute,Field_Number 0x14 03dc 0b3b | ; | Execute_Immediate Case_Compare,0x3b 03dd 700b |p | Jump_Nonzero 0x3e9 03de 0b3c | < | Execute_Immediate Case_Compare,0x3c 03df 700e |p | Jump_Nonzero 0x3ee 03e0 0092 0ab1 | | Action Push_String_Extended,0xab1 ; "Element is not a type or subtype" ; Debug Table 0x14.0x3 = 0x3e0,0x5 03e2 e004 | | Load 0x0,0x4 03e3 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 03e4 e005 | | Load 0x0,0x5 03e5 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03e6 e001 | | Load 0x0,0x1 ; Debug Table 0x14.0x4 = 0x3e6,0x6 03e7 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 03e8 0257 | W | Execute Discrete,Raise 03e9 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x14.0x5 = 0x3e9,0x3 03ea 00eb | | Load_Encached Diana_Cache 03eb 18e8 | | Execute Package,Field_Execute,Field_Number 0xe8 03ec 8253 | S | Call 0x1,0x53 03ed 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03ee 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x14.0x6 = 0x3ee,0x4 03ef 00eb | | Load_Encached Diana_Cache 03f0 18b9 | | Execute Package,Field_Execute,Field_Number 0xb9 03f1 8253 | S | Call 0x1,0x53 03f2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03f3 0000 0000 | | .BLANK 0000[0x5] 03f8 ; -------------------------------------------------------------------------------------- 03f8 ; SUBPROGRAM 03f8 ; -------------------------------------------------------------------------------------- 03f8 03fc | | .CONST 0x03fc ; Address of begin 03f9 0004 | | .CONST 0x0004 ; Address of exception handler 03fa 0002 | | .CONST 0x0002 ; Number of locals 03fb INIT_03f8: 03fb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x15 = .DEBUG 0x03fb,0x12a0,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0125 ; Debug Table 0x15.0x0 = 0x3fb,0xffff 03fc BODY_03f8: 03fc 4801 |H | Short_Literal 0x1 ; Debug Table 0x15.0x1 = 0x3fc,0x1 03fd e5ff | | Load 0x2,-0x1 03fe 8252 | R | Call 0x1,0x52 03ff 8256 | V | Call 0x1,0x56 0400 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0401 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0x2 = 0x401,0x2 0402 00eb | | Load_Encached Diana_Cache 0403 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0404 0b3e | > | Execute_Immediate Case_Compare,0x3e 0405 700a |p | Jump_Nonzero 0x410 0406 0b3d | = | Execute_Immediate Case_Compare,0x3d 0407 7008 |p | Jump_Nonzero 0x410 0408 0b3f | ? | Execute_Immediate Case_Compare,0x3f 0409 7006 |p | Jump_Nonzero 0x410 040a 0b41 | A | Execute_Immediate Case_Compare,0x41 040b 7004 |p | Jump_Nonzero 0x410 040c 0b3b | ; | Execute_Immediate Case_Compare,0x3b 040d 7004 |p | Jump_Nonzero 0x412 040e 4800 |H | Short_Literal 0x0 ; Debug Table 0x15.0x3 = 0x40e,0x5 040f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0410 4801 |H | Short_Literal 0x1 ; Debug Table 0x15.0x4 = 0x410,0x3 0411 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0412 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x15.0x5 = 0x412,0x4 0413 00eb | | Load_Encached Diana_Cache 0414 18e8 | | Execute Package,Field_Execute,Field_Number 0xe8 0415 00eb | | Load_Encached Diana_Cache 0416 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0417 0f73 | s | Execute_Immediate Equal,0x73 0418 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0419 0000 0000 | | .BLANK 0000[0x7] 0420 ; -------------------------------------------------------------------------------------- 0420 ; SUBPROGRAM 0420 ; -------------------------------------------------------------------------------------- 0420 0424 | $ | .CONST 0x0424 ; Address of begin 0421 0004 | | .CONST 0x0004 ; Address of exception handler 0422 0002 | | .CONST 0x0002 ; Number of locals 0423 INIT_0420: 0423 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x16 = .DEBUG 0x0423,0x12ae,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x012e ; Debug Table 0x16.0x0 = 0x423,0xffff 0424 BODY_0420: 0424 4801 |H | Short_Literal 0x1 ; Debug Table 0x16.0x1 = 0x424,0x1 0425 e5ff | | Load 0x2,-0x1 0426 8252 | R | Call 0x1,0x52 0427 8256 | V | Call 0x1,0x56 0428 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0429 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0x2 = 0x429,0x2 042a 00eb | | Load_Encached Diana_Cache 042b 1814 | | Execute Package,Field_Execute,Field_Number 0x14 042c 0b3e | > | Execute_Immediate Case_Compare,0x3e 042d 7006 |p | Jump_Nonzero 0x434 042e 0b47 | G | Execute_Immediate Case_Compare,0x47 042f 7004 |p | Jump_Nonzero 0x434 0430 0b41 | A | Execute_Immediate Case_Compare,0x41 0431 7004 |p | Jump_Nonzero 0x436 0432 4800 |H | Short_Literal 0x0 ; Debug Table 0x16.0x3 = 0x432,0x5 0433 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0434 4801 |H | Short_Literal 0x1 ; Debug Table 0x16.0x4 = 0x434,0x3 0435 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0436 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x16.0x5 = 0x436,0x4 0437 00eb | | Load_Encached Diana_Cache 0438 18cc | | Execute Package,Field_Execute,Field_Number 0xcc 0439 00eb | | Load_Encached Diana_Cache 043a 1814 | | Execute Package,Field_Execute,Field_Number 0x14 043b 0f7c | | | Execute_Immediate Equal,0x7c 043c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 043d 0000 0000 | | .XXX[0x3] 043f 0000 | | 0440 ; -------------------------------------------------------------------------------------- 0440 ; SUBPROGRAM 0440 ; -------------------------------------------------------------------------------------- 0440 0444 | D | .CONST 0x0444 ; Address of begin 0441 0004 | | .CONST 0x0004 ; Address of exception handler 0442 0002 | | .CONST 0x0002 ; Number of locals 0443 INIT_0440: 0443 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x17 = .DEBUG 0x0443,0x12bc,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0137 ; Debug Table 0x17.0x0 = 0x443,0xffff 0444 BODY_0440: 0444 4801 |H | Short_Literal 0x1 ; Debug Table 0x17.0x1 = 0x444,0x1 0445 e5ff | | Load 0x2,-0x1 0446 8252 | R | Call 0x1,0x52 0447 8256 | V | Call 0x1,0x56 0448 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0449 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0x2 = 0x449,0x2 044a 00eb | | Load_Encached Diana_Cache 044b 1814 | | Execute Package,Field_Execute,Field_Number 0x14 044c 0b3f | ? | Execute_Immediate Case_Compare,0x3f 044d 7006 |p | Jump_Nonzero 0x454 044e 0b46 | F | Execute_Immediate Case_Compare,0x46 044f 7004 |p | Jump_Nonzero 0x454 0450 0b3b | ; | Execute_Immediate Case_Compare,0x3b 0451 7004 |p | Jump_Nonzero 0x456 0452 4800 |H | Short_Literal 0x0 ; Debug Table 0x17.0x3 = 0x452,0x5 0453 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0454 4801 |H | Short_Literal 0x1 ; Debug Table 0x17.0x4 = 0x454,0x3 0455 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0456 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x17.0x5 = 0x456,0x4 0457 00eb | | Load_Encached Diana_Cache 0458 18e8 | | Execute Package,Field_Execute,Field_Number 0xe8 0459 00eb | | Load_Encached Diana_Cache 045a 1814 | | Execute Package,Field_Execute,Field_Number 0x14 045b 0f73 | s | Execute_Immediate Equal,0x73 045c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 045d 0000 0000 | | .XXX[0x3] 045f 0000 | | 0460 ; -------------------------------------------------------------------------------------- 0460 ; SUBPROGRAM 0460 ; -------------------------------------------------------------------------------------- 0460 0464 | d | .CONST 0x0464 ; Address of begin 0461 0004 | | .CONST 0x0004 ; Address of exception handler 0462 0002 | | .CONST 0x0002 ; Number of locals 0463 INIT_0460: 0463 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x18 = .DEBUG 0x0463,0x12ca,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0140 ; Debug Table 0x18.0x0 = 0x463,0xffff 0464 BODY_0460: 0464 4801 |H | Short_Literal 0x1 ; Debug Table 0x18.0x1 = 0x464,0x1 0465 e5ff | | Load 0x2,-0x1 0466 8252 | R | Call 0x1,0x52 0467 8256 | V | Call 0x1,0x56 0468 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0469 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x2 = 0x469,0x2 046a 00eb | | Load_Encached Diana_Cache 046b 1814 | | Execute Package,Field_Execute,Field_Number 0x14 046c 0b3d | = | Execute_Immediate Case_Compare,0x3d 046d 7006 |p | Jump_Nonzero 0x474 046e 0b48 | H | Execute_Immediate Case_Compare,0x48 046f 7004 |p | Jump_Nonzero 0x474 0470 0b41 | A | Execute_Immediate Case_Compare,0x41 0471 7009 |p | Jump_Nonzero 0x47b 0472 4800 |H | Short_Literal 0x0 ; Debug Table 0x18.0x3 = 0x472,0x5 0473 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0474 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x18.0x4 = 0x474,0x3 0475 00eb | | Load_Encached Diana_Cache 0476 18ce | | Execute Package,Field_Execute,Field_Number 0xce 0477 00eb | | Load_Encached Diana_Cache 0478 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0479 0f7b | { | Execute_Immediate Equal,0x7b 047a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 047b 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x18.0x5 = 0x47b,0x4 047c 00eb | | Load_Encached Diana_Cache 047d 18cc | | Execute Package,Field_Execute,Field_Number 0xcc 047e 00eb | | Load_Encached Diana_Cache 047f 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0480 0f7b | { | Execute_Immediate Equal,0x7b 0481 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0482 0000 0000 | | .BLANK 0000[0x6] 0488 ; -------------------------------------------------------------------------------------- 0488 ; SUBPROGRAM 0488 ; -------------------------------------------------------------------------------------- 0488 048c | | .CONST 0x048c ; Address of begin 0489 0004 | | .CONST 0x0004 ; Address of exception handler 048a 0002 | | .CONST 0x0002 ; Number of locals 048b INIT_0488: 048b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x19 = .DEBUG 0x048b,0x12d8,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0149 ; Debug Table 0x19.0x0 = 0x48b,0xffff 048c BODY_0488: 048c 4801 |H | Short_Literal 0x1 ; Debug Table 0x19.0x1 = 0x48c,0x1 048d e5ff | | Load 0x2,-0x1 048e 8252 | R | Call 0x1,0x52 048f 8256 | V | Call 0x1,0x56 0490 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0491 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x19.0x2 = 0x491,0x2 0492 00eb | | Load_Encached Diana_Cache 0493 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0494 0b3d | = | Execute_Immediate Case_Compare,0x3d 0495 7006 |p | Jump_Nonzero 0x49c 0496 0b48 | H | Execute_Immediate Case_Compare,0x48 0497 7004 |p | Jump_Nonzero 0x49c 0498 0b41 | A | Execute_Immediate Case_Compare,0x41 0499 7009 |p | Jump_Nonzero 0x4a3 049a 4800 |H | Short_Literal 0x0 ; Debug Table 0x19.0x3 = 0x49a,0x5 049b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 049c 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x19.0x4 = 0x49c,0x3 049d 00eb | | Load_Encached Diana_Cache 049e 18ce | | Execute Package,Field_Execute,Field_Number 0xce 049f 00eb | | Load_Encached Diana_Cache 04a0 1814 | | Execute Package,Field_Execute,Field_Number 0x14 04a1 0f7a | z | Execute_Immediate Equal,0x7a 04a2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04a3 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x19.0x5 = 0x4a3,0x4 04a4 00eb | | Load_Encached Diana_Cache 04a5 18cc | | Execute Package,Field_Execute,Field_Number 0xcc 04a6 00eb | | Load_Encached Diana_Cache 04a7 1814 | | Execute Package,Field_Execute,Field_Number 0x14 04a8 0f7a | z | Execute_Immediate Equal,0x7a 04a9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04aa 0000 0000 | | .BLANK 0000[0x6] 04b0 ; -------------------------------------------------------------------------------------- 04b0 ; SUBPROGRAM 04b0 ; -------------------------------------------------------------------------------------- 04b0 04b4 | | .CONST 0x04b4 ; Address of begin 04b1 0004 | | .CONST 0x0004 ; Address of exception handler 04b2 0002 | | .CONST 0x0002 ; Number of locals 04b3 INIT_04b0: 04b3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1a = .DEBUG 0x04b3,0x12e6,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0152 ; Debug Table 0x1a.0x0 = 0x4b3,0xffff 04b4 BODY_04b0: 04b4 4801 |H | Short_Literal 0x1 ; Debug Table 0x1a.0x1 = 0x4b4,0x1 04b5 e5ff | | Load 0x2,-0x1 04b6 8252 | R | Call 0x1,0x52 04b7 8256 | V | Call 0x1,0x56 04b8 0031 | 1 | Store_Top Heap_Access,At_Offset_1 04b9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0x2 = 0x4b9,0x2 04ba 00eb | | Load_Encached Diana_Cache 04bb 1814 | | Execute Package,Field_Execute,Field_Number 0x14 04bc 0b3d | = | Execute_Immediate Case_Compare,0x3d 04bd 7006 |p | Jump_Nonzero 0x4c4 04be 0b48 | H | Execute_Immediate Case_Compare,0x48 04bf 7004 |p | Jump_Nonzero 0x4c4 04c0 0b41 | A | Execute_Immediate Case_Compare,0x41 04c1 7004 |p | Jump_Nonzero 0x4c6 04c2 4800 |H | Short_Literal 0x0 ; Debug Table 0x1a.0x3 = 0x4c2,0x7 04c3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04c4 4801 |H | Short_Literal 0x1 ; Debug Table 0x1a.0x4 = 0x4c4,0x3 04c5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04c6 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1a.0x5 = 0x4c6,0x4 04c7 00eb | | Load_Encached Diana_Cache 04c8 18cc | | Execute Package,Field_Execute,Field_Number 0xcc 04c9 00eb | | Load_Encached Diana_Cache 04ca 1814 | | Execute Package,Field_Execute,Field_Number 0x14 04cb 0b7b | { | Execute_Immediate Case_Compare,0x7b 04cc 7004 |p | Jump_Nonzero 0x4d1 04cd 0b7a | z | Execute_Immediate Case_Compare,0x7a 04ce 7002 |p | Jump_Nonzero 0x4d1 04cf 4800 |H | Short_Literal 0x0 ; Debug Table 0x1a.0x6 = 0x4cf,0x6 04d0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04d1 4801 |H | Short_Literal 0x1 ; Debug Table 0x1a.0x7 = 0x4d1,0x5 04d2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04d3 0000 0000 | | .BLANK 0000[0x5] 04d8 ; -------------------------------------------------------------------------------------- 04d8 ; SUBPROGRAM 04d8 ; -------------------------------------------------------------------------------------- 04d8 04de | | .CONST 0x04de ; Address of begin 04d9 0004 | | .CONST 0x0004 ; Address of exception handler 04da 0004 | | .CONST 0x0004 ; Number of locals 04db INIT_04d8: 04db 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1b = .DEBUG 0x04db,0x12f8,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x015b ; Debug Table 0x1b.0x0 = 0x4db,0xffff 04dc 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1b.0x1 = 0x4dc,0xfffe 04dd 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1b.0x2 = 0x4dd,0xfffd 04de BODY_04d8: 04de 4801 |H | Short_Literal 0x1 ; Debug Table 0x1b.0x3 = 0x4de,0x1 04df e5ff | | Load 0x2,-0x1 04e0 8252 | R | Call 0x1,0x52 04e1 8256 | V | Call 0x1,0x56 04e2 0032 | 2 | Store_Top Heap_Access,At_Offset_2 04e3 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1b.0x4 = 0x4e3,0x2 04e4 00eb | | Load_Encached Diana_Cache 04e5 1814 | | Execute Package,Field_Execute,Field_Number 0x14 04e6 0b48 | H | Execute_Immediate Case_Compare,0x48 04e7 7017 |p | Jump_Nonzero 0x4ff 04e8 0b47 | G | Execute_Immediate Case_Compare,0x47 04e9 7030 |p0 | Jump_Nonzero 0x51a 04ea 0b46 | F | Execute_Immediate Case_Compare,0x46 04eb 702e |p. | Jump_Nonzero 0x51a 04ec 0b3e | > | Execute_Immediate Case_Compare,0x3e 04ed 7047 |pG | Jump_Nonzero 0x535 04ee 0b3f | ? | Execute_Immediate Case_Compare,0x3f 04ef 7045 |pE | Jump_Nonzero 0x535 04f0 0b3d | = | Execute_Immediate Case_Compare,0x3d 04f1 7043 |pC | Jump_Nonzero 0x535 04f2 0b41 | A | Execute_Immediate Case_Compare,0x41 04f3 7041 |pA | Jump_Nonzero 0x535 04f4 0b3b | ; | Execute_Immediate Case_Compare,0x3b 04f5 7042 |pB | Jump_Nonzero 0x538 04f6 0092 0ab2 | | Action Push_String_Extended,0xab2 ; "Element is not a Program Unit" ; Debug Table 0x1b.0x5 = 0x4f6,0x12 04f8 e004 | | Load 0x0,0x4 04f9 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 04fa e005 | | Load 0x0,0x5 04fb 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04fc e001 | | Load 0x0,0x1 ; Debug Table 0x1b.0x6 = 0x4fc,0x13 04fd 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 04fe 0257 | W | Execute Discrete,Raise 04ff 00da | | Load_Top At_Offset_2 ; Debug Table 0x1b.0x7 = 0x4ff,0x3 0500 00eb | | Load_Encached Diana_Cache 0501 18bf | | Execute Package,Field_Execute,Field_Number 0xbf 0502 a402 | | Store_Unchecked 0x2,0x2 0503 00db | | Load_Top At_Offset_3 ; Debug Table 0x1b.0x8 = 0x503,0x4 0504 490b |I | Short_Literal 0x10b 0505 00eb | | Load_Encached Diana_Cache 0506 0096 | | Execute Package,Entry 0507 e008 | | Load 0x0,0x8 0508 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0509 0032 | 2 | Store_Top Heap_Access,At_Offset_2 050a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1b.0x9 = 0x50a,0x5 050b 00eb | | Load_Encached Diana_Cache 050c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 050d 7004 |p | Jump_Nonzero 0x512 050e 00d9 | | Load_Top At_Offset_1 050f e402 | | Load 0x2,0x2 0510 021f | | Execute Heap_Access,Equal 0511 6803 |h | Jump_Zero 0x515 0512 e001 | | Load 0x0,0x1 ; Debug Table 0x1b.0xa = 0x512,0x6 0513 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0514 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0515 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1b.0xb = 0x515,0x7 0516 00eb | | Load_Encached Diana_Cache 0517 18ec | | Execute Package,Field_Execute,Field_Number 0xec 0518 8253 | S | Call 0x1,0x53 0519 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 051a 00da | | Load_Top At_Offset_2 ; Debug Table 0x1b.0xc = 0x51a,0x8 051b 00eb | | Load_Encached Diana_Cache 051c 18cf | | Execute Package,Field_Execute,Field_Number 0xcf 051d a402 | | Store_Unchecked 0x2,0x2 051e 00db | | Load_Top At_Offset_3 ; Debug Table 0x1b.0xd = 0x51e,0x9 051f 490b |I | Short_Literal 0x10b 0520 00eb | | Load_Encached Diana_Cache 0521 0096 | | Execute Package,Entry 0522 e008 | | Load 0x0,0x8 0523 182d | - | Execute Package,Field_Execute,Field_Number 0x2d 0524 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0525 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1b.0xe = 0x525,0xa 0526 00eb | | Load_Encached Diana_Cache 0527 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0528 7004 |p | Jump_Nonzero 0x52d 0529 00d9 | | Load_Top At_Offset_1 052a e402 | | Load 0x2,0x2 052b 021f | | Execute Heap_Access,Equal 052c 6803 |h | Jump_Zero 0x530 052d e001 | | Load 0x0,0x1 ; Debug Table 0x1b.0xf = 0x52d,0xb 052e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 052f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0530 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1b.0x10 = 0x530,0xc 0531 00eb | | Load_Encached Diana_Cache 0532 18ec | | Execute Package,Field_Execute,Field_Number 0xec 0533 8253 | S | Call 0x1,0x53 0534 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0535 00da | | Load_Top At_Offset_2 ; Debug Table 0x1b.0x11 = 0x535,0xd 0536 8253 | S | Call 0x1,0x53 0537 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0538 00da | | Load_Top At_Offset_2 ; Debug Table 0x1b.0x12 = 0x538,0xe 0539 00eb | | Load_Encached Diana_Cache 053a 18e8 | | Execute Package,Field_Execute,Field_Number 0xe8 053b 00eb | | Load_Encached Diana_Cache 053c 1814 | | Execute Package,Field_Execute,Field_Number 0x14 053d 0f73 | s | Execute_Immediate Equal,0x73 053e 6803 |h | Jump_Zero 0x542 053f 00da | | Load_Top At_Offset_2 ; Debug Table 0x1b.0x13 = 0x53f,0xf 0540 8253 | S | Call 0x1,0x53 0541 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0542 0092 0ab2 | | Action Push_String_Extended,0xab2 ; "Element is not a Program Unit" ; Debug Table 0x1b.0x14 = 0x542,0x10 0544 e004 | | Load 0x0,0x4 0545 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 0546 e005 | | Load 0x0,0x5 0547 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0548 e001 | | Load 0x0,0x1 ; Debug Table 0x1b.0x15 = 0x548,0x11 0549 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 054a 0257 | W | Execute Discrete,Raise 054b 0000 0000 | | .BLANK 0000[0x5] 0550 ; -------------------------------------------------------------------------------------- 0550 ; SUBPROGRAM 0550 ; -------------------------------------------------------------------------------------- 0550 0555 | U | .CONST 0x0555 ; Address of begin 0551 0004 | | .CONST 0x0004 ; Address of exception handler 0552 0003 | | .CONST 0x0003 ; Number of locals 0553 INIT_0550: 0553 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1c = .DEBUG 0x0553,0x1326,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0164 ; Debug Table 0x1c.0x0 = 0x553,0xffff 0554 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1c.0x1 = 0x554,0xfffe 0555 BODY_0550: 0555 4801 |H | Short_Literal 0x1 ; Debug Table 0x1c.0x2 = 0x555,0x1 0556 e5ff | | Load 0x2,-0x1 0557 8252 | R | Call 0x1,0x52 0558 8256 | V | Call 0x1,0x56 0559 0031 | 1 | Store_Top Heap_Access,At_Offset_1 055a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1c.0x3 = 0x55a,0x2 055b 00eb | | Load_Encached Diana_Cache 055c 1814 | | Execute Package,Field_Execute,Field_Number 0x14 055d 0b3e | > | Execute_Immediate Case_Compare,0x3e 055e 7017 |p | Jump_Nonzero 0x576 055f 0b3f | ? | Execute_Immediate Case_Compare,0x3f 0560 7015 |p | Jump_Nonzero 0x576 0561 0b3d | = | Execute_Immediate Case_Compare,0x3d 0562 7013 |p | Jump_Nonzero 0x576 0563 0b41 | A | Execute_Immediate Case_Compare,0x41 0564 7011 |p | Jump_Nonzero 0x576 0565 0b47 | G | Execute_Immediate Case_Compare,0x47 0566 7015 |p | Jump_Nonzero 0x57c 0567 0b46 | F | Execute_Immediate Case_Compare,0x46 0568 7013 |p | Jump_Nonzero 0x57c 0569 0b48 | H | Execute_Immediate Case_Compare,0x48 056a 7011 |p | Jump_Nonzero 0x57c 056b 0b3b | ; | Execute_Immediate Case_Compare,0x3b 056c 7021 |p! | Jump_Nonzero 0x58e 056d 0092 0ab3 | | Action Push_String_Extended,0xab3 ; "Element has no unit body" ; Debug Table 0x1c.0x4 = 0x56d,0xb 056f e004 | | Load 0x0,0x4 0570 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 0571 e005 | | Load 0x0,0x5 0572 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0573 e001 | | Load 0x0,0x1 ; Debug Table 0x1c.0x5 = 0x573,0xc 0574 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 0575 0257 | W | Execute Discrete,Raise 0576 4800 |H | Short_Literal 0x0 ; Debug Table 0x1c.0x6 = 0x576,0x3 0577 00da | | Load_Top At_Offset_2 0578 e006 | | Load 0x0,0x6 0579 180e | | Execute Package,Field_Execute,Field_Number 0xe 057a 0033 | 3 | Store_Top Heap_Access,At_Offset_3 057b 7828 |x( | Jump 0x5a4 057c 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1c.0x7 = 0x57c,0x4 057d 00eb | | Load_Encached Diana_Cache 057e 18b6 | | Execute Package,Field_Execute,Field_Number 0xb6 057f 00eb | | Load_Encached Diana_Cache 0580 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0581 0f77 | w | Execute_Immediate Equal,0x77 0582 6808 |h | Jump_Zero 0x58b 0583 4801 |H | Short_Literal 0x1 ; Debug Table 0x1c.0x8 = 0x583,0x5 0584 00da | | Load_Top At_Offset_2 0585 e006 | | Load 0x0,0x6 0586 180e | | Execute Package,Field_Execute,Field_Number 0xe 0587 8253 | S | Call 0x1,0x53 0588 e009 | | Load 0x0,0x9 0589 1810 | | Execute Package,Field_Execute,Field_Number 0x10 058a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 058b 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1c.0x9 = 0x58b,0x6 058c 8253 | S | Call 0x1,0x53 058d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 058e 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1c.0xa = 0x58e,0x7 058f 00eb | | Load_Encached Diana_Cache 0590 18e8 | | Execute Package,Field_Execute,Field_Number 0xe8 0591 00eb | | Load_Encached Diana_Cache 0592 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0593 0f73 | s | Execute_Immediate Equal,0x73 0594 6806 |h | Jump_Zero 0x59b 0595 4800 |H | Short_Literal 0x0 ; Debug Table 0x1c.0xb = 0x595,0x8 0596 00da | | Load_Top At_Offset_2 0597 e006 | | Load 0x0,0x6 0598 180e | | Execute Package,Field_Execute,Field_Number 0xe 0599 0033 | 3 | Store_Top Heap_Access,At_Offset_3 059a 7809 |x | Jump 0x5a4 059b 0092 0ab3 | | Action Push_String_Extended,0xab3 ; "Element has no unit body" ; Debug Table 0x1c.0xc = 0x59b,0x9 059d e004 | | Load 0x0,0x4 059e 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 059f e005 | | Load 0x0,0x5 05a0 1813 | | Execute Package,Field_Execute,Field_Number 0x13 05a1 e001 | | Load 0x0,0x1 ; Debug Table 0x1c.0xd = 0x5a1,0xa 05a2 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 05a3 0257 | W | Execute Discrete,Raise 05a4 00d1 | | Pop_Control Pop_Count_1 05a5 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1c.0xe = 0x5a5,0xd 05a6 00eb | | Load_Encached Diana_Cache 05a7 1813 | | Execute Package,Field_Execute,Field_Number 0x13 05a8 6803 |h | Jump_Zero 0x5ac 05a9 e001 | | Load 0x0,0x1 ; Debug Table 0x1c.0xf = 0x5a9,0xe 05aa 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05ab 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05ac 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1c.0x10 = 0x5ac,0xf 05ad 8253 | S | Call 0x1,0x53 05ae 8230 | 0 | Call 0x1,0x30 05af 6803 |h | Jump_Zero 0x5b3 05b0 e001 | | Load 0x0,0x1 ; Debug Table 0x1c.0x11 = 0x5b0,0x10 05b1 1b0e | | Execute Package,Field_Read,Field_Number 0xe 05b2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05b3 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1c.0x12 = 0x5b3,0x11 05b4 00eb | | Load_Encached Diana_Cache 05b5 18ec | | Execute Package,Field_Execute,Field_Number 0xec 05b6 8253 | S | Call 0x1,0x53 05b7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05b8 ; -------------------------------------------------------------------------------------- 05b8 ; SUBPROGRAM 05b8 ; -------------------------------------------------------------------------------------- 05b8 05bc | | .CONST 0x05bc ; Address of begin 05b9 0004 | | .CONST 0x0004 ; Address of exception handler 05ba 0002 | | .CONST 0x0002 ; Number of locals 05bb INIT_05b8: 05bb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1d = .DEBUG 0x05bb,0x134e,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x016d ; Debug Table 0x1d.0x0 = 0x5bb,0xffff 05bc BODY_05b8: 05bc 4801 |H | Short_Literal 0x1 ; Debug Table 0x1d.0x1 = 0x5bc,0x1 05bd e5ff | | Load 0x2,-0x1 05be 8252 | R | Call 0x1,0x52 05bf 8256 | V | Call 0x1,0x56 05c0 0031 | 1 | Store_Top Heap_Access,At_Offset_1 05c1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x2 = 0x5c1,0x2 05c2 8257 | W | Call 0x1,0x57 05c3 00eb | | Load_Encached Diana_Cache 05c4 18bd | | Execute Package,Field_Execute,Field_Number 0xbd 05c5 00eb | | Load_Encached Diana_Cache 05c6 1889 | | Execute Package,Field_Execute,Field_Number 0x89 05c7 e001 | | Load 0x0,0x1 05c8 1b46 | F | Execute Package,Field_Read,Field_Number 0x46 05c9 1814 | | Execute Package,Field_Execute,Field_Number 0x14 05ca 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05cb 0000 0000 | | .BLANK 0000[0x5] 05d0 ; -------------------------------------------------------------------------------------- 05d0 ; SUBPROGRAM 05d0 ; -------------------------------------------------------------------------------------- 05d0 05d4 | | .CONST 0x05d4 ; Address of begin 05d1 0004 | | .CONST 0x0004 ; Address of exception handler 05d2 0002 | | .CONST 0x0002 ; Number of locals 05d3 INIT_05d0: 05d3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1e = .DEBUG 0x05d3,0x1356,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0178 ; Debug Table 0x1e.0x0 = 0x5d3,0xffff 05d4 BODY_05d0: 05d4 4801 |H | Short_Literal 0x1 ; Debug Table 0x1e.0x1 = 0x5d4,0x1 05d5 e5ff | | Load 0x2,-0x1 05d6 8252 | R | Call 0x1,0x52 05d7 8256 | V | Call 0x1,0x56 05d8 0031 | 1 | Store_Top Heap_Access,At_Offset_1 05d9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1e.0x2 = 0x5d9,0x2 05da 8257 | W | Call 0x1,0x57 05db 00eb | | Load_Encached Diana_Cache 05dc 18be | | Execute Package,Field_Execute,Field_Number 0xbe 05dd 00eb | | Load_Encached Diana_Cache 05de 1889 | | Execute Package,Field_Execute,Field_Number 0x89 05df e001 | | Load 0x0,0x1 05e0 1b46 | F | Execute Package,Field_Read,Field_Number 0x46 05e1 1814 | | Execute Package,Field_Execute,Field_Number 0x14 05e2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05e3 0000 0000 | | .BLANK 0000[0x5] 05e8 ; -------------------------------------------------------------------------------------- 05e8 ; SUBPROGRAM 05e8 ; -------------------------------------------------------------------------------------- 05e8 05ec | | .CONST 0x05ec ; Address of begin 05e9 0004 | | .CONST 0x0004 ; Address of exception handler 05ea 0002 | | .CONST 0x0002 ; Number of locals 05eb INIT_05e8: 05eb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1f = .DEBUG 0x05eb,0x135e,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0183 ; Debug Table 0x1f.0x0 = 0x5eb,0xffff 05ec BODY_05e8: 05ec 4801 |H | Short_Literal 0x1 ; Debug Table 0x1f.0x1 = 0x5ec,0x1 05ed e5ff | | Load 0x2,-0x1 05ee 8252 | R | Call 0x1,0x52 05ef 8256 | V | Call 0x1,0x56 05f0 0031 | 1 | Store_Top Heap_Access,At_Offset_1 05f1 0092 0ab4 | | Action Push_String_Extended,0xab4 ; "Package Body Declaration);" ; Debug Table 0x1f.0x2 = 0x5f1,0x2 05f3 4847 |HG | Short_Literal 0x47 05f4 00da | | Load_Top At_Offset_2 05f5 8258 | X | Call 0x1,0x58 05f6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05f7 0000 | | .XXX[0x1] 05f8 ; -------------------------------------------------------------------------------------- 05f8 ; SUBPROGRAM 05f8 ; -------------------------------------------------------------------------------------- 05f8 05fb | | .CONST 0x05fb ; Address of begin 05f9 0004 | | .CONST 0x0004 ; Address of exception handler 05fa 0001 | | .CONST 0x0001 ; Number of locals 05fb BODY_05f8: 05fb INIT_05f8: 05fb 4603 |F | Jump_Case 0x4 ; Debug Table 0x20 = .DEBUG 0x05fb,0x1366,0x0005,0x0000,0x0032,0xc7b4,0x0000,0x0192 05fc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 05fd 7802 |x | Jump 0x600 ; case 0x1 05fe 7805 |x | Jump 0x604 ; case 0x2 05ff 7809 |x | Jump 0x609 ; case 0x3 0600 00da | | Load_Top At_Offset_2 0601 0091 0a9a | | Action Push_String_Extended_Indexed,0xa9a ; "DEFAULT_IN_PARAMETER" 0603 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0604 00db | | Load_Top At_Offset_3 0605 00db | | Load_Top At_Offset_3 0606 00e0 | | Load_Encached Standard_Cache 0607 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0608 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0609 00da | | Load_Top At_Offset_2 060a 00e0 | | Load_Encached Standard_Cache 060b 181c | | Execute Package,Field_Execute,Field_Number 0x1c 060c 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 060d 0000 0000 | | .XXX[0x3] 060f 0000 | | 0610 ; -------------------------------------------------------------------------------------- 0610 ; SUBPROGRAM 0610 ; -------------------------------------------------------------------------------------- 0610 0617 | | .CONST 0x0617 ; Address of begin 0611 0004 | | .CONST 0x0004 ; Address of exception handler 0612 0002 | | .CONST 0x0002 ; Number of locals 0613 INIT_0610: 0613 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x21 = .DEBUG 0x0613,0x1368,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x019b ; Debug Table 0x21.0x0 = 0x613,0xffff 0614 00db | | Load_Top At_Offset_3 0615 8252 | R | Call 0x1,0x52 0616 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0617 BODY_0610: 0617 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x21.0x1 = 0x617,0x1 0618 00eb | | Load_Encached Diana_Cache 0619 1814 | | Execute Package,Field_Execute,Field_Number 0x14 061a 0b23 | # | Execute_Immediate Case_Compare,0x23 061b 700c |p | Jump_Nonzero 0x628 061c 0b24 | $ | Execute_Immediate Case_Compare,0x24 061d 7018 |p | Jump_Nonzero 0x636 061e 0b25 | % | Execute_Immediate Case_Compare,0x25 061f 7018 |p | Jump_Nonzero 0x638 0620 0b7e | ~ | Execute_Immediate Case_Compare,0x7e 0621 7018 |p | Jump_Nonzero 0x63a 0622 0b7f | | Execute_Immediate Case_Compare,0x7f 0623 701e |p | Jump_Nonzero 0x642 0624 0b7d | } | Execute_Immediate Case_Compare,0x7d 0625 701e |p | Jump_Nonzero 0x644 0626 4804 |H | Short_Literal 0x4 ; Debug Table 0x21.0x2 = 0x626,0xd 0627 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0628 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x21.0x3 = 0x628,0x2 0629 00eb | | Load_Encached Diana_Cache 062a 18ec | | Execute Package,Field_Execute,Field_Number 0xec 062b 00eb | | Load_Encached Diana_Cache 062c 18ec | | Execute Package,Field_Execute,Field_Number 0xec 062d 0032 | 2 | Store_Top Heap_Access,At_Offset_2 062e 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x21.0x4 = 0x62e,0x3 062f 00eb | | Load_Encached Diana_Cache 0630 1844 | D | Execute Package,Field_Execute,Field_Number 0x44 0631 6802 |h | Jump_Zero 0x634 0632 4800 |H | Short_Literal 0x0 ; Debug Table 0x21.0x5 = 0x632,0x4 0633 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0634 4801 |H | Short_Literal 0x1 ; Debug Table 0x21.0x6 = 0x634,0x5 0635 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0636 4803 |H | Short_Literal 0x3 ; Debug Table 0x21.0x7 = 0x636,0x6 0637 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0638 4802 |H | Short_Literal 0x2 ; Debug Table 0x21.0x8 = 0x638,0x7 0639 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 063a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x21.0x9 = 0x63a,0x8 063b 00eb | | Load_Encached Diana_Cache 063c 1844 | D | Execute Package,Field_Execute,Field_Number 0x44 063d 6802 |h | Jump_Zero 0x640 063e 4800 |H | Short_Literal 0x0 ; Debug Table 0x21.0xa = 0x63e,0x9 063f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0640 4801 |H | Short_Literal 0x1 ; Debug Table 0x21.0xb = 0x640,0xa 0641 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0642 4803 |H | Short_Literal 0x3 ; Debug Table 0x21.0xc = 0x642,0xb 0643 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0644 4802 |H | Short_Literal 0x2 ; Debug Table 0x21.0xd = 0x644,0xc 0645 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0646 0000 0000 | | .XXX[0x2] 0648 ; -------------------------------------------------------------------------------------- 0648 ; SUBPROGRAM 0648 ; -------------------------------------------------------------------------------------- 0648 064d | M | .CONST 0x064d ; Address of begin 0649 0004 | | .CONST 0x0004 ; Address of exception handler 064a 0003 | | .CONST 0x0003 ; Number of locals 064b INIT_0648: 064b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x22 = .DEBUG 0x064b,0x1386,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x01a4 ; Debug Table 0x22.0x0 = 0x64b,0xffff 064c 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x22.0x1 = 0x64c,0xfffe 064d BODY_0648: 064d 4801 |H | Short_Literal 0x1 ; Debug Table 0x22.0x2 = 0x64d,0x1 064e e5ff | | Load 0x2,-0x1 064f 8252 | R | Call 0x1,0x52 0650 8256 | V | Call 0x1,0x56 0651 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0652 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x22.0x3 = 0x652,0x2 0653 00eb | | Load_Encached Diana_Cache 0654 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0655 0b3d | = | Execute_Immediate Case_Compare,0x3d 0656 7008 |p | Jump_Nonzero 0x65f 0657 0b48 | H | Execute_Immediate Case_Compare,0x48 0658 7006 |p | Jump_Nonzero 0x65f 0659 0b41 | A | Execute_Immediate Case_Compare,0x41 065a 7009 |p | Jump_Nonzero 0x664 065b 00eb | | Load_Encached Diana_Cache ; Debug Table 0x22.0x4 = 0x65b,0x5 065c 1812 | | Execute Package,Field_Execute,Field_Number 0x12 065d 0032 | 2 | Store_Top Heap_Access,At_Offset_2 065e 7809 |x | Jump 0x668 065f 00da | | Load_Top At_Offset_2 ; Debug Table 0x22.0x5 = 0x65f,0x3 0660 00eb | | Load_Encached Diana_Cache 0661 18ce | | Execute Package,Field_Execute,Field_Number 0xce 0662 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0663 7804 |x | Jump 0x668 0664 00da | | Load_Top At_Offset_2 ; Debug Table 0x22.0x6 = 0x664,0x4 0665 00eb | | Load_Encached Diana_Cache 0666 18cc | | Execute Package,Field_Execute,Field_Number 0xcc 0667 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0668 00d1 | | Pop_Control Pop_Count_1 0669 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x22.0x7 = 0x669,0x6 066a 00eb | | Load_Encached Diana_Cache 066b 1814 | | Execute Package,Field_Execute,Field_Number 0x14 066c 0b7a | z | Execute_Immediate Case_Compare,0x7a 066d 700d |p | Jump_Nonzero 0x67b 066e 0b7b | { | Execute_Immediate Case_Compare,0x7b 066f 700b |p | Jump_Nonzero 0x67b 0670 0b79 | y | Execute_Immediate Case_Compare,0x79 0671 7009 |p | Jump_Nonzero 0x67b 0672 0092 0ab5 | | Action Push_String_Extended,0xab5 ; "Element is not a Subprogram or Entry Declaration" ; Debug Table 0x22.0x8 = 0x672,0x8 0674 e004 | | Load 0x0,0x4 0675 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 0676 e005 | | Load 0x0,0x5 0677 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0678 e001 | | Load 0x0,0x1 ; Debug Table 0x22.0x9 = 0x678,0x9 0679 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 067a 0257 | W | Execute Discrete,Raise 067b 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x22.0xa = 0x67b,0x7 067c 00eb | | Load_Encached Diana_Cache 067d 18da | | Execute Package,Field_Execute,Field_Number 0xda 067e 00eb | | Load_Encached Diana_Cache 067f 1889 | | Execute Package,Field_Execute,Field_Number 0x89 0680 e001 | | Load 0x0,0x1 0681 1b46 | F | Execute Package,Field_Read,Field_Number 0x46 0682 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0683 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0684 0000 0000 | | .BLANK 0000[0x4] 0688 ; -------------------------------------------------------------------------------------- 0688 ; SUBPROGRAM 0688 ; -------------------------------------------------------------------------------------- 0688 068d | | .CONST 0x068d ; Address of begin 0689 0004 | | .CONST 0x0004 ; Address of exception handler 068a 0003 | | .CONST 0x0003 ; Number of locals 068b INIT_0688: 068b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x23 = .DEBUG 0x068b,0x139e,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x01af ; Debug Table 0x23.0x0 = 0x68b,0xffff 068c 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x23.0x1 = 0x68c,0xfffe 068d BODY_0688: 068d 4801 |H | Short_Literal 0x1 ; Debug Table 0x23.0x2 = 0x68d,0x1 068e e5ff | | Load 0x2,-0x1 068f 8252 | R | Call 0x1,0x52 0690 8256 | V | Call 0x1,0x56 0691 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0692 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x23.0x3 = 0x692,0x2 0693 00eb | | Load_Encached Diana_Cache 0694 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0695 0b3d | = | Execute_Immediate Case_Compare,0x3d 0696 7008 |p | Jump_Nonzero 0x69f 0697 0b48 | H | Execute_Immediate Case_Compare,0x48 0698 7006 |p | Jump_Nonzero 0x69f 0699 0b41 | A | Execute_Immediate Case_Compare,0x41 069a 7009 |p | Jump_Nonzero 0x6a4 069b 00eb | | Load_Encached Diana_Cache ; Debug Table 0x23.0x4 = 0x69b,0x5 069c 1812 | | Execute Package,Field_Execute,Field_Number 0x12 069d 0032 | 2 | Store_Top Heap_Access,At_Offset_2 069e 7809 |x | Jump 0x6a8 069f 00da | | Load_Top At_Offset_2 ; Debug Table 0x23.0x5 = 0x69f,0x3 06a0 00eb | | Load_Encached Diana_Cache 06a1 18ce | | Execute Package,Field_Execute,Field_Number 0xce 06a2 0032 | 2 | Store_Top Heap_Access,At_Offset_2 06a3 7804 |x | Jump 0x6a8 06a4 00da | | Load_Top At_Offset_2 ; Debug Table 0x23.0x6 = 0x6a4,0x4 06a5 00eb | | Load_Encached Diana_Cache 06a6 18cc | | Execute Package,Field_Execute,Field_Number 0xcc 06a7 0032 | 2 | Store_Top Heap_Access,At_Offset_2 06a8 00d1 | | Pop_Control Pop_Count_1 06a9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x23.0x7 = 0x6a9,0x6 06aa 00eb | | Load_Encached Diana_Cache 06ab 1814 | | Execute Package,Field_Execute,Field_Number 0x14 06ac 0f7a | z | Execute_Immediate Equal,0x7a 06ad 6805 |h | Jump_Zero 0x6b3 06ae 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x23.0x8 = 0x6ae,0x7 06af 00eb | | Load_Encached Diana_Cache 06b0 18d6 | | Execute Package,Field_Execute,Field_Number 0xd6 06b1 8253 | S | Call 0x1,0x53 06b2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06b3 0092 0ab6 | | Action Push_String_Extended,0xab6 ; "Element is not a Function Declaration" ; Debug Table 0x23.0x9 = 0x6b3,0x8 06b5 e004 | | Load 0x0,0x4 06b6 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 06b7 e005 | | Load 0x0,0x5 06b8 1813 | | Execute Package,Field_Execute,Field_Number 0x13 06b9 e001 | | Load 0x0,0x1 ; Debug Table 0x23.0xa = 0x6b9,0x9 06ba 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 06bb 0257 | W | Execute Discrete,Raise 06bc 0000 0000 | | .BLANK 0000[0x4] 06c0 ; -------------------------------------------------------------------------------------- 06c0 ; SUBPROGRAM 06c0 ; -------------------------------------------------------------------------------------- 06c0 06c4 | | .CONST 0x06c4 ; Address of begin 06c1 0004 | | .CONST 0x0004 ; Address of exception handler 06c2 0002 | | .CONST 0x0002 ; Number of locals 06c3 INIT_06c0: 06c3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x24 = .DEBUG 0x06c3,0x13b6,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x01b8 ; Debug Table 0x24.0x0 = 0x6c3,0xffff 06c4 BODY_06c0: 06c4 4801 |H | Short_Literal 0x1 ; Debug Table 0x24.0x1 = 0x6c4,0x1 06c5 e5ff | | Load 0x2,-0x1 06c6 8252 | R | Call 0x1,0x52 06c7 8256 | V | Call 0x1,0x56 06c8 0031 | 1 | Store_Top Heap_Access,At_Offset_1 06c9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x24.0x2 = 0x6c9,0x2 06ca 00eb | | Load_Encached Diana_Cache 06cb 1814 | | Execute Package,Field_Execute,Field_Number 0x14 06cc 0b3d | = | Execute_Immediate Case_Compare,0x3d 06cd 700b |p | Jump_Nonzero 0x6d9 06ce 0b48 | H | Execute_Immediate Case_Compare,0x48 06cf 7009 |p | Jump_Nonzero 0x6d9 06d0 0092 0ab6 | | Action Push_String_Extended,0xab6 ; "Element is not a Function Declaration" ; Debug Table 0x24.0x3 = 0x6d0,0x4 06d2 e004 | | Load 0x0,0x4 06d3 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 06d4 e005 | | Load 0x0,0x5 06d5 1813 | | Execute Package,Field_Execute,Field_Number 0x13 06d6 e001 | | Load 0x0,0x1 ; Debug Table 0x24.0x4 = 0x6d6,0x5 06d7 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 06d8 0257 | W | Execute Discrete,Raise 06d9 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x24.0x5 = 0x6d9,0x3 06da 00eb | | Load_Encached Diana_Cache 06db 18bf | | Execute Package,Field_Execute,Field_Number 0xbf 06dc 00eb | | Load_Encached Diana_Cache 06dd 1814 | | Execute Package,Field_Execute,Field_Number 0x14 06de 0f33 | 3 | Execute_Immediate Equal,0x33 06df 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06e0 ; -------------------------------------------------------------------------------------- 06e0 ; SUBPROGRAM 06e0 ; -------------------------------------------------------------------------------------- 06e0 06e4 | | .CONST 0x06e4 ; Address of begin 06e1 0004 | | .CONST 0x0004 ; Address of exception handler 06e2 0002 | | .CONST 0x0002 ; Number of locals 06e3 INIT_06e0: 06e3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x25 = .DEBUG 0x06e3,0x13c4,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x01c1 ; Debug Table 0x25.0x0 = 0x6e3,0xffff 06e4 BODY_06e0: 06e4 4801 |H | Short_Literal 0x1 ; Debug Table 0x25.0x1 = 0x6e4,0x1 06e5 e5ff | | Load 0x2,-0x1 06e6 8252 | R | Call 0x1,0x52 06e7 8256 | V | Call 0x1,0x56 06e8 0031 | 1 | Store_Top Heap_Access,At_Offset_1 06e9 0092 0ab7 | | Action Push_String_Extended,0xab7 ; "Subprogram Body Declaration);" ; Debug Table 0x25.0x2 = 0x6e9,0x2 06eb 4848 |HH | Short_Literal 0x48 06ec 00da | | Load_Top At_Offset_2 06ed 8258 | X | Call 0x1,0x58 06ee 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06ef 0000 | | .XXX[0x1] 06f0 ; -------------------------------------------------------------------------------------- 06f0 ; SUBPROGRAM 06f0 ; -------------------------------------------------------------------------------------- 06f0 06f4 | | .CONST 0x06f4 ; Address of begin 06f1 0004 | | .CONST 0x0004 ; Address of exception handler 06f2 0002 | | .CONST 0x0002 ; Number of locals 06f3 INIT_06f0: 06f3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x26 = .DEBUG 0x06f3,0x13cc,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x01ca ; Debug Table 0x26.0x0 = 0x6f3,0xffff 06f4 BODY_06f0: 06f4 4801 |H | Short_Literal 0x1 ; Debug Table 0x26.0x1 = 0x6f4,0x1 06f5 e5ff | | Load 0x2,-0x1 06f6 8252 | R | Call 0x1,0x52 06f7 8256 | V | Call 0x1,0x56 06f8 0031 | 1 | Store_Top Heap_Access,At_Offset_1 06f9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x26.0x2 = 0x6f9,0x2 06fa 00eb | | Load_Encached Diana_Cache 06fb 1814 | | Execute Package,Field_Execute,Field_Number 0x14 06fc 0f41 | A | Execute_Immediate Equal,0x41 06fd 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06fe 0000 0000 | | .XXX[0x2] 0700 ; -------------------------------------------------------------------------------------- 0700 ; SUBPROGRAM 0700 ; -------------------------------------------------------------------------------------- 0700 0703 | | .CONST 0x0703 ; Address of begin 0701 0004 | | .CONST 0x0004 ; Address of exception handler 0702 0001 | | .CONST 0x0001 ; Number of locals 0703 BODY_0700: 0703 INIT_0700: 0703 4603 |F | Jump_Case 0x4 ; Debug Table 0x27 = .DEBUG 0x0703,0x13d4,0x0005,0x0000,0x0032,0xc7b4,0x0000,0x01d9 0704 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0705 7802 |x | Jump 0x708 ; case 0x1 0706 7805 |x | Jump 0x70c ; case 0x2 0707 7809 |x | Jump 0x711 ; case 0x3 0708 00da | | Load_Top At_Offset_2 0709 0091 0a9f | | Action Push_String_Extended_Indexed,0xa9f ; "SUBPROGRAM" 070b 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 070c 00db | | Load_Top At_Offset_3 070d 00db | | Load_Top At_Offset_3 070e 00e0 | | Load_Encached Standard_Cache 070f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0710 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0711 00da | | Load_Top At_Offset_2 0712 00e0 | | Load_Encached Standard_Cache 0713 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0714 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0715 0000 0000 | | .XXX[0x3] 0717 0000 | | 0718 ; -------------------------------------------------------------------------------------- 0718 ; SUBPROGRAM 0718 ; -------------------------------------------------------------------------------------- 0718 071c | | .CONST 0x071c ; Address of begin 0719 0004 | | .CONST 0x0004 ; Address of exception handler 071a 0002 | | .CONST 0x0002 ; Number of locals 071b INIT_0718: 071b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x28 = .DEBUG 0x071b,0x13d6,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x01e7 ; Debug Table 0x28.0x0 = 0x71b,0xffff 071c BODY_0718: 071c 4801 |H | Short_Literal 0x1 ; Debug Table 0x28.0x1 = 0x71c,0x1 071d e5ff | | Load 0x2,-0x1 071e 8252 | R | Call 0x1,0x52 071f 8256 | V | Call 0x1,0x56 0720 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0721 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x28.0x2 = 0x721,0x2 0722 00eb | | Load_Encached Diana_Cache 0723 18ec | | Execute Package,Field_Execute,Field_Number 0xec 0724 00eb | | Load_Encached Diana_Cache 0725 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0726 0f8f | | Execute_Immediate Equal,-0x71 0727 7002 |p | Jump_Nonzero 0x72a 0728 4809 |H | Short_Literal 0x9 ; Debug Table 0x28.0x3 = 0x728,0x3 0729 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 072a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x28.0x4 = 0x72a,0x4 072b 00eb | | Load_Encached Diana_Cache 072c 1814 | | Execute Package,Field_Execute,Field_Number 0x14 072d 0b7e | ~ | Execute_Immediate Case_Compare,0x7e 072e 7008 |p | Jump_Nonzero 0x737 072f 0b7f | | Execute_Immediate Case_Compare,0x7f 0730 7006 |p | Jump_Nonzero 0x737 0731 0b3b | ; | Execute_Immediate Case_Compare,0x3b 0732 7006 |p | Jump_Nonzero 0x739 0733 0b3d | = | Execute_Immediate Case_Compare,0x3d 0734 7027 |p' | Jump_Nonzero 0x75c 0735 4809 |H | Short_Literal 0x9 ; Debug Table 0x28.0x5 = 0x735,0x10 0736 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0737 4801 |H | Short_Literal 0x1 ; Debug Table 0x28.0x6 = 0x737,0x5 0738 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0739 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x28.0x7 = 0x739,0x6 073a 00eb | | Load_Encached Diana_Cache 073b 18e8 | | Execute Package,Field_Execute,Field_Number 0xe8 073c 00eb | | Load_Encached Diana_Cache 073d 1814 | | Execute Package,Field_Execute,Field_Number 0x14 073e 0b67 | g | Execute_Immediate Case_Compare,0x67 073f 700e |p | Jump_Nonzero 0x74e 0740 0b6a | j | Execute_Immediate Case_Compare,0x6a 0741 700e |p | Jump_Nonzero 0x750 0742 0b68 | h | Execute_Immediate Case_Compare,0x68 0743 700e |p | Jump_Nonzero 0x752 0744 0b69 | i | Execute_Immediate Case_Compare,0x69 0745 700e |p | Jump_Nonzero 0x754 0746 0b71 | q | Execute_Immediate Case_Compare,0x71 0747 700e |p | Jump_Nonzero 0x756 0748 0b6c | l | Execute_Immediate Case_Compare,0x6c 0749 700e |p | Jump_Nonzero 0x758 074a 0b6b | k | Execute_Immediate Case_Compare,0x6b 074b 700e |p | Jump_Nonzero 0x75a 074c 4809 |H | Short_Literal 0x9 ; Debug Table 0x28.0x8 = 0x74c,0xe 074d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 074e 4803 |H | Short_Literal 0x3 ; Debug Table 0x28.0x9 = 0x74e,0x7 074f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0750 4804 |H | Short_Literal 0x4 ; Debug Table 0x28.0xa = 0x750,0x8 0751 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0752 4806 |H | Short_Literal 0x6 ; Debug Table 0x28.0xb = 0x752,0x9 0753 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0754 4805 |H | Short_Literal 0x5 ; Debug Table 0x28.0xc = 0x754,0xa 0755 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0756 4802 |H | Short_Literal 0x2 ; Debug Table 0x28.0xd = 0x756,0xb 0757 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0758 4807 |H | Short_Literal 0x7 ; Debug Table 0x28.0xe = 0x758,0xc 0759 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 075a 4808 |H | Short_Literal 0x8 ; Debug Table 0x28.0xf = 0x75a,0xd 075b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 075c 4800 |H | Short_Literal 0x0 ; Debug Table 0x28.0x10 = 0x75c,0xf 075d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 075e 0000 0000 | | .XXX[0x2] 0760 ; -------------------------------------------------------------------------------------- 0760 ; SUBPROGRAM 0760 ; -------------------------------------------------------------------------------------- 0760 0764 | d | .CONST 0x0764 ; Address of begin 0761 0004 | | .CONST 0x0004 ; Address of exception handler 0762 0002 | | .CONST 0x0002 ; Number of locals 0763 INIT_0760: 0763 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x29 = .DEBUG 0x0763,0x13fa,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x01f0 ; Debug Table 0x29.0x0 = 0x763,0xffff 0764 BODY_0760: 0764 4801 |H | Short_Literal 0x1 ; Debug Table 0x29.0x1 = 0x764,0x1 0765 e5ff | | Load 0x2,-0x1 0766 8252 | R | Call 0x1,0x52 0767 8256 | V | Call 0x1,0x56 0768 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0769 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x29.0x2 = 0x769,0x2 076a 00eb | | Load_Encached Diana_Cache 076b 1814 | | Execute Package,Field_Execute,Field_Number 0x14 076c 0f41 | A | Execute_Immediate Equal,0x41 076d 6809 |h | Jump_Zero 0x777 076e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x29.0x3 = 0x76e,0x3 076f 00eb | | Load_Encached Diana_Cache 0770 18cd | | Execute Package,Field_Execute,Field_Number 0xcd 0771 00eb | | Load_Encached Diana_Cache 0772 1889 | | Execute Package,Field_Execute,Field_Number 0x89 0773 e001 | | Load 0x0,0x1 0774 1b46 | F | Execute Package,Field_Read,Field_Number 0x46 0775 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0776 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0777 0092 0ab8 | | Action Push_String_Extended,0xab8 ; "Element is not a Generic Declaration" ; Debug Table 0x29.0x4 = 0x777,0x4 0779 e004 | | Load 0x0,0x4 077a 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 077b e005 | | Load 0x0,0x5 077c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 077d e001 | | Load 0x0,0x1 ; Debug Table 0x29.0x5 = 0x77d,0x5 077e 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 077f 0257 | W | Execute Discrete,Raise 0780 ; -------------------------------------------------------------------------------------- 0780 ; SUBPROGRAM 0780 ; -------------------------------------------------------------------------------------- 0780 0783 | | .CONST 0x0783 ; Address of begin 0781 0004 | | .CONST 0x0004 ; Address of exception handler 0782 0001 | | .CONST 0x0001 ; Number of locals 0783 BODY_0780: 0783 INIT_0780: 0783 4603 |F | Jump_Case 0x4 ; Debug Table 0x2a = .DEBUG 0x0783,0x1408,0x0005,0x0000,0x0032,0xc7b4,0x0000,0x01fb 0784 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0785 7802 |x | Jump 0x788 ; case 0x1 0786 7805 |x | Jump 0x78c ; case 0x2 0787 7809 |x | Jump 0x791 ; case 0x3 0788 00da | | Load_Top At_Offset_2 0789 0091 0aa9 | | Action Push_String_Extended_Indexed,0xaa9 ; "BOX" 078b 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 078c 00db | | Load_Top At_Offset_3 078d 00db | | Load_Top At_Offset_3 078e 00e0 | | Load_Encached Standard_Cache 078f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0790 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0791 00da | | Load_Top At_Offset_2 0792 00e0 | | Load_Encached Standard_Cache 0793 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0794 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0795 0000 0000 | | .XXX[0x3] 0797 0000 | | 0798 ; -------------------------------------------------------------------------------------- 0798 ; SUBPROGRAM 0798 ; -------------------------------------------------------------------------------------- 0798 079c | | .CONST 0x079c ; Address of begin 0799 0004 | | .CONST 0x0004 ; Address of exception handler 079a 0002 | | .CONST 0x0002 ; Number of locals 079b INIT_0798: 079b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2b = .DEBUG 0x079b,0x140a,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0203 ; Debug Table 0x2b.0x0 = 0x79b,0xffff 079c BODY_0798: 079c 4801 |H | Short_Literal 0x1 ; Debug Table 0x2b.0x1 = 0x79c,0x1 079d e5ff | | Load 0x2,-0x1 079e 8252 | R | Call 0x1,0x52 079f 8256 | V | Call 0x1,0x56 07a0 0031 | 1 | Store_Top Heap_Access,At_Offset_1 07a1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2b.0x2 = 0x7a1,0x2 07a2 00eb | | Load_Encached Diana_Cache 07a3 1814 | | Execute Package,Field_Execute,Field_Number 0x14 07a4 0f3d | = | Execute_Immediate Equal,0x3d 07a5 680f |h | Jump_Zero 0x7b5 07a6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2b.0x3 = 0x7a6,0x3 07a7 00eb | | Load_Encached Diana_Cache 07a8 18e4 | | Execute Package,Field_Execute,Field_Number 0xe4 07a9 00eb | | Load_Encached Diana_Cache 07aa 1814 | | Execute Package,Field_Execute,Field_Number 0x14 07ab 0b34 | 4 | Execute_Immediate Case_Compare,0x34 07ac 7004 |p | Jump_Nonzero 0x7b1 07ad 0b35 | 5 | Execute_Immediate Case_Compare,0x35 07ae 7004 |p | Jump_Nonzero 0x7b3 07af 4801 |H | Short_Literal 0x1 ; Debug Table 0x2b.0x4 = 0x7af,0x6 07b0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07b1 4800 |H | Short_Literal 0x0 ; Debug Table 0x2b.0x5 = 0x7b1,0x4 07b2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07b3 4802 |H | Short_Literal 0x2 ; Debug Table 0x2b.0x6 = 0x7b3,0x5 07b4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07b5 4803 |H | Short_Literal 0x3 ; Debug Table 0x2b.0x7 = 0x7b5,0x7 07b6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07b7 0000 | | .XXX[0x1] 07b8 ; -------------------------------------------------------------------------------------- 07b8 ; SUBPROGRAM 07b8 ; -------------------------------------------------------------------------------------- 07b8 07bd | | .CONST 0x07bd ; Address of begin 07b9 0004 | | .CONST 0x0004 ; Address of exception handler 07ba 0003 | | .CONST 0x0003 ; Number of locals 07bb INIT_07b8: 07bb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2c = .DEBUG 0x07bb,0x141c,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x020c ; Debug Table 0x2c.0x0 = 0x7bb,0xffff 07bc 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2c.0x1 = 0x7bc,0xfffe 07bd BODY_07b8: 07bd 4801 |H | Short_Literal 0x1 ; Debug Table 0x2c.0x2 = 0x7bd,0x1 07be e5ff | | Load 0x2,-0x1 07bf 8252 | R | Call 0x1,0x52 07c0 8256 | V | Call 0x1,0x56 07c1 0032 | 2 | Store_Top Heap_Access,At_Offset_2 07c2 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2c.0x3 = 0x7c2,0x2 07c3 00eb | | Load_Encached Diana_Cache 07c4 1814 | | Execute Package,Field_Execute,Field_Number 0x14 07c5 0f3d | = | Execute_Immediate Equal,0x3d 07c6 6820 |h | Jump_Zero 0x7e7 07c7 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2c.0x4 = 0x7c7,0x3 07c8 00eb | | Load_Encached Diana_Cache 07c9 18e4 | | Execute Package,Field_Execute,Field_Number 0xe4 07ca 0031 | 1 | Store_Top Heap_Access,At_Offset_1 07cb 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2c.0x5 = 0x7cb,0x4 07cc 00eb | | Load_Encached Diana_Cache 07cd 1814 | | Execute Package,Field_Execute,Field_Number 0x14 07ce 0b34 | 4 | Execute_Immediate Case_Compare,0x34 07cf 7005 |p | Jump_Nonzero 0x7d5 07d0 0b35 | 5 | Execute_Immediate Case_Compare,0x35 07d1 700c |p | Jump_Nonzero 0x7de 07d2 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2c.0x6 = 0x7d2,0x9 07d3 8253 | S | Call 0x1,0x53 07d4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07d5 0092 0ab9 | | Action Push_String_Extended,0xab9 ; "Element default is box" ; Debug Table 0x2c.0x7 = 0x7d5,0x5 07d7 e004 | | Load 0x0,0x4 07d8 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 07d9 e005 | | Load 0x0,0x5 07da 1813 | | Execute Package,Field_Execute,Field_Number 0x13 07db e001 | | Load 0x0,0x1 ; Debug Table 0x2c.0x8 = 0x7db,0x6 07dc 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 07dd 0257 | W | Execute Discrete,Raise 07de 0092 0aba | | Action Push_String_Extended,0xaba ; "Element has no default" ; Debug Table 0x2c.0x9 = 0x7de,0x7 07e0 e004 | | Load 0x0,0x4 07e1 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 07e2 e005 | | Load 0x0,0x5 07e3 1813 | | Execute Package,Field_Execute,Field_Number 0x13 07e4 e001 | | Load 0x0,0x1 ; Debug Table 0x2c.0xa = 0x7e4,0x8 07e5 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 07e6 0257 | W | Execute Discrete,Raise 07e7 0092 0abb | | Action Push_String_Extended,0xabb ; "Element is not a generic formal subprogram" ; Debug Table 0x2c.0xb = 0x7e7,0xa 07e9 e004 | | Load 0x0,0x4 07ea 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 07eb e005 | | Load 0x0,0x5 07ec 1813 | | Execute Package,Field_Execute,Field_Number 0x13 07ed e001 | | Load 0x0,0x1 ; Debug Table 0x2c.0xc = 0x7ed,0xb 07ee 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 07ef 0257 | W | Execute Discrete,Raise 07f0 ; -------------------------------------------------------------------------------------- 07f0 ; SUBPROGRAM 07f0 ; -------------------------------------------------------------------------------------- 07f0 07f4 | | .CONST 0x07f4 ; Address of begin 07f1 0004 | | .CONST 0x0004 ; Address of exception handler 07f2 0002 | | .CONST 0x0002 ; Number of locals 07f3 INIT_07f0: 07f3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2d = .DEBUG 0x07f3,0x1438,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0215 ; Debug Table 0x2d.0x0 = 0x7f3,0xffff 07f4 BODY_07f0: 07f4 4801 |H | Short_Literal 0x1 ; Debug Table 0x2d.0x1 = 0x7f4,0x1 07f5 e5ff | | Load 0x2,-0x1 07f6 8252 | R | Call 0x1,0x52 07f7 8256 | V | Call 0x1,0x56 07f8 0031 | 1 | Store_Top Heap_Access,At_Offset_1 07f9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2d.0x2 = 0x7f9,0x2 07fa 00eb | | Load_Encached Diana_Cache 07fb 1814 | | Execute Package,Field_Execute,Field_Number 0x14 07fc 0b3d | = | Execute_Immediate Case_Compare,0x3d 07fd 7004 |p | Jump_Nonzero 0x802 07fe 0b3e | > | Execute_Immediate Case_Compare,0x3e 07ff 7009 |p | Jump_Nonzero 0x809 0800 4800 |H | Short_Literal 0x0 ; Debug Table 0x2d.0x3 = 0x800,0x5 0801 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0802 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2d.0x4 = 0x802,0x3 0803 00eb | | Load_Encached Diana_Cache 0804 18e4 | | Execute Package,Field_Execute,Field_Number 0xe4 0805 00eb | | Load_Encached Diana_Cache 0806 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0807 0f36 | 6 | Execute_Immediate Equal,0x36 0808 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0809 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2d.0x5 = 0x809,0x4 080a 00eb | | Load_Encached Diana_Cache 080b 18d8 | | Execute Package,Field_Execute,Field_Number 0xd8 080c 00eb | | Load_Encached Diana_Cache 080d 1814 | | Execute Package,Field_Execute,Field_Number 0x14 080e 0f36 | 6 | Execute_Immediate Equal,0x36 080f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0810 ; -------------------------------------------------------------------------------------- 0810 ; SUBPROGRAM 0810 ; -------------------------------------------------------------------------------------- 0810 0815 | | .CONST 0x0815 ; Address of begin 0811 0004 | | .CONST 0x0004 ; Address of exception handler 0812 0003 | | .CONST 0x0003 ; Number of locals 0813 INIT_0810: 0813 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2e = .DEBUG 0x0813,0x1446,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x021e ; Debug Table 0x2e.0x0 = 0x813,0xffff 0814 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2e.0x1 = 0x814,0xfffe 0815 BODY_0810: 0815 4801 |H | Short_Literal 0x1 ; Debug Table 0x2e.0x2 = 0x815,0x1 0816 e5ff | | Load 0x2,-0x1 0817 8252 | R | Call 0x1,0x52 0818 8256 | V | Call 0x1,0x56 0819 0032 | 2 | Store_Top Heap_Access,At_Offset_2 081a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2e.0x3 = 0x81a,0x2 081b 00eb | | Load_Encached Diana_Cache 081c 1814 | | Execute Package,Field_Execute,Field_Number 0x14 081d 0b3d | = | Execute_Immediate Case_Compare,0x3d 081e 700b |p | Jump_Nonzero 0x82a 081f 0b3e | > | Execute_Immediate Case_Compare,0x3e 0820 700e |p | Jump_Nonzero 0x82f 0821 0092 0abc | | Action Push_String_Extended,0xabc ; "Element is not a Generic Instantiation" ; Debug Table 0x2e.0x4 = 0x821,0x5 0823 e004 | | Load 0x0,0x4 0824 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 0825 e005 | | Load 0x0,0x5 0826 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0827 e001 | | Load 0x0,0x1 ; Debug Table 0x2e.0x5 = 0x827,0x6 0828 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 0829 0257 | W | Execute Discrete,Raise 082a 00da | | Load_Top At_Offset_2 ; Debug Table 0x2e.0x6 = 0x82a,0x3 082b 00eb | | Load_Encached Diana_Cache 082c 18e4 | | Execute Package,Field_Execute,Field_Number 0xe4 082d 0032 | 2 | Store_Top Heap_Access,At_Offset_2 082e 7804 |x | Jump 0x833 082f 00da | | Load_Top At_Offset_2 ; Debug Table 0x2e.0x7 = 0x82f,0x4 0830 00eb | | Load_Encached Diana_Cache 0831 18d8 | | Execute Package,Field_Execute,Field_Number 0xd8 0832 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0833 00d1 | | Pop_Control Pop_Count_1 0834 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2e.0x8 = 0x834,0x7 0835 00eb | | Load_Encached Diana_Cache 0836 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0837 0f36 | 6 | Execute_Immediate Equal,0x36 0838 6809 |h | Jump_Zero 0x842 0839 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2e.0x9 = 0x839,0x8 083a 00eb | | Load_Encached Diana_Cache 083b 18cb | | Execute Package,Field_Execute,Field_Number 0xcb 083c 00eb | | Load_Encached Diana_Cache 083d 1889 | | Execute Package,Field_Execute,Field_Number 0x89 083e e001 | | Load 0x0,0x1 083f 1b46 | F | Execute Package,Field_Read,Field_Number 0x46 0840 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0841 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0842 0092 0abc | | Action Push_String_Extended,0xabc ; "Element is not a Generic Instantiation" ; Debug Table 0x2e.0xa = 0x842,0x9 0844 e004 | | Load 0x0,0x4 0845 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 0846 e005 | | Load 0x0,0x5 0847 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0848 e001 | | Load 0x0,0x1 ; Debug Table 0x2e.0xb = 0x848,0xa 0849 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 084a 0257 | W | Execute Discrete,Raise 084b 0000 0000 | | .BLANK 0000[0x5] 0850 ; -------------------------------------------------------------------------------------- 0850 ; SUBPROGRAM 0850 ; -------------------------------------------------------------------------------------- 0850 0855 | U | .CONST 0x0855 ; Address of begin 0851 0004 | | .CONST 0x0004 ; Address of exception handler 0852 0003 | | .CONST 0x0003 ; Number of locals 0853 INIT_0850: 0853 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2f = .DEBUG 0x0853,0x1460,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0229 ; Debug Table 0x2f.0x0 = 0x853,0xffff 0854 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2f.0x1 = 0x854,0xfffe 0855 BODY_0850: 0855 4801 |H | Short_Literal 0x1 ; Debug Table 0x2f.0x2 = 0x855,0x1 0856 e5ff | | Load 0x2,-0x1 0857 8252 | R | Call 0x1,0x52 0858 8256 | V | Call 0x1,0x56 0859 0032 | 2 | Store_Top Heap_Access,At_Offset_2 085a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2f.0x3 = 0x85a,0x2 085b 00eb | | Load_Encached Diana_Cache 085c 1814 | | Execute Package,Field_Execute,Field_Number 0x14 085d 0b3f | ? | Execute_Immediate Case_Compare,0x3f 085e 7003 |p | Jump_Nonzero 0x862 085f 0b3b | ; | Execute_Immediate Case_Compare,0x3b 0860 7008 |p | Jump_Nonzero 0x869 0861 7813 |x | Jump 0x875 ; Debug Table 0x2f.0x4 = 0x861,0x8 0862 00da | | Load_Top At_Offset_2 ; Debug Table 0x2f.0x5 = 0x862,0x3 0863 00eb | | Load_Encached Diana_Cache 0864 18e6 | | Execute Package,Field_Execute,Field_Number 0xe6 0865 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0866 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2f.0x6 = 0x866,0x4 0867 8253 | S | Call 0x1,0x53 0868 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0869 00da | | Load_Top At_Offset_2 ; Debug Table 0x2f.0x7 = 0x869,0x5 086a 00eb | | Load_Encached Diana_Cache 086b 18e8 | | Execute Package,Field_Execute,Field_Number 0xe8 086c 0032 | 2 | Store_Top Heap_Access,At_Offset_2 086d 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2f.0x8 = 0x86d,0x6 086e 00eb | | Load_Encached Diana_Cache 086f 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0870 0f73 | s | Execute_Immediate Equal,0x73 0871 6803 |h | Jump_Zero 0x875 0872 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2f.0x9 = 0x872,0x7 0873 8253 | S | Call 0x1,0x53 0874 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0875 00d1 | | Pop_Control Pop_Count_1 0876 0092 0abd | | Action Push_String_Extended,0xabd ; "Element is not a Task Type Declaration" ; Debug Table 0x2f.0xa = 0x876,0x9 0878 e004 | | Load 0x0,0x4 0879 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 087a e005 | | Load 0x0,0x5 087b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 087c e001 | | Load 0x0,0x1 ; Debug Table 0x2f.0xb = 0x87c,0xa 087d 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 087e 0257 | W | Execute Discrete,Raise 087f 0000 | | .XXX[0x1] 0880 ; -------------------------------------------------------------------------------------- 0880 ; SUBPROGRAM 0880 ; -------------------------------------------------------------------------------------- 0880 0884 | | .CONST 0x0884 ; Address of begin 0881 0004 | | .CONST 0x0004 ; Address of exception handler 0882 0002 | | .CONST 0x0002 ; Number of locals 0883 INIT_0880: 0883 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x30 = .DEBUG 0x0883,0x147a,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0232 ; Debug Table 0x30.0x0 = 0x883,0xffff 0884 BODY_0880: 0884 4801 |H | Short_Literal 0x1 ; Debug Table 0x30.0x1 = 0x884,0x1 0885 e5ff | | Load 0x2,-0x1 0886 8252 | R | Call 0x1,0x52 0887 8256 | V | Call 0x1,0x56 0888 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0889 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x30.0x2 = 0x889,0x2 088a 00eb | | Load_Encached Diana_Cache 088b 1814 | | Execute Package,Field_Execute,Field_Number 0x14 088c 0b3f | ? | Execute_Immediate Case_Compare,0x3f 088d 700b |p | Jump_Nonzero 0x899 088e 0b3b | ; | Execute_Immediate Case_Compare,0x3b 088f 700e |p | Jump_Nonzero 0x89e 0890 0092 0abe | | Action Push_String_Extended,0xabe ; "Element is not a Task Declaration" ; Debug Table 0x30.0x3 = 0x890,0x8 0892 e004 | | Load 0x0,0x4 0893 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 0894 e005 | | Load 0x0,0x5 0895 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0896 e001 | | Load 0x0,0x1 ; Debug Table 0x30.0x4 = 0x896,0x9 0897 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 0898 0257 | W | Execute Discrete,Raise 0899 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x30.0x5 = 0x899,0x3 089a 00eb | | Load_Encached Diana_Cache 089b 18e6 | | Execute Package,Field_Execute,Field_Number 0xe6 089c 0032 | 2 | Store_Top Heap_Access,At_Offset_2 089d 7812 |x | Jump 0x8b0 089e 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x30.0x6 = 0x89e,0x4 089f 00eb | | Load_Encached Diana_Cache 08a0 18e8 | | Execute Package,Field_Execute,Field_Number 0xe8 08a1 0032 | 2 | Store_Top Heap_Access,At_Offset_2 08a2 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x30.0x7 = 0x8a2,0x5 08a3 00eb | | Load_Encached Diana_Cache 08a4 1814 | | Execute Package,Field_Execute,Field_Number 0x14 08a5 0f73 | s | Execute_Immediate Equal,0x73 08a6 7009 |p | Jump_Nonzero 0x8b0 08a7 0092 0abe | | Action Push_String_Extended,0xabe ; "Element is not a Task Declaration" ; Debug Table 0x30.0x8 = 0x8a7,0x6 08a9 e004 | | Load 0x0,0x4 08aa 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 08ab e005 | | Load 0x0,0x5 08ac 1813 | | Execute Package,Field_Execute,Field_Number 0x13 08ad e001 | | Load 0x0,0x1 ; Debug Table 0x30.0x9 = 0x8ad,0x7 08ae 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 08af 0257 | W | Execute Discrete,Raise 08b0 00d1 | | Pop_Control Pop_Count_1 08b1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x30.0xa = 0x8b1,0xa 08b2 00eb | | Load_Encached Diana_Cache 08b3 18bc | | Execute Package,Field_Execute,Field_Number 0xbc 08b4 00eb | | Load_Encached Diana_Cache 08b5 1889 | | Execute Package,Field_Execute,Field_Number 0x89 08b6 e001 | | Load 0x0,0x1 08b7 1b46 | F | Execute Package,Field_Read,Field_Number 0x46 08b8 1814 | | Execute Package,Field_Execute,Field_Number 0x14 08b9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08ba 0000 0000 | | .BLANK 0000[0x6] 08c0 ; -------------------------------------------------------------------------------------- 08c0 ; SUBPROGRAM 08c0 ; -------------------------------------------------------------------------------------- 08c0 08c4 | | .CONST 0x08c4 ; Address of begin 08c1 0004 | | .CONST 0x0004 ; Address of exception handler 08c2 0002 | | .CONST 0x0002 ; Number of locals 08c3 INIT_08c0: 08c3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x31 = .DEBUG 0x08c3,0x1492,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x023d ; Debug Table 0x31.0x0 = 0x8c3,0xffff 08c4 BODY_08c0: 08c4 4801 |H | Short_Literal 0x1 ; Debug Table 0x31.0x1 = 0x8c4,0x1 08c5 e5ff | | Load 0x2,-0x1 08c6 8252 | R | Call 0x1,0x52 08c7 8256 | V | Call 0x1,0x56 08c8 0031 | 1 | Store_Top Heap_Access,At_Offset_1 08c9 0092 0abf | | Action Push_String_Extended,0xabf ; "Task Body Declaration" ; Debug Table 0x31.0x2 = 0x8c9,0x2 08cb 4846 |HF | Short_Literal 0x46 08cc 00da | | Load_Top At_Offset_2 08cd 8258 | X | Call 0x1,0x58 08ce 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08cf 0000 | | .XXX[0x1] 08d0 ; -------------------------------------------------------------------------------------- 08d0 ; SUBPROGRAM 08d0 ; -------------------------------------------------------------------------------------- 08d0 08d5 | | .CONST 0x08d5 ; Address of begin 08d1 0004 | | .CONST 0x0004 ; Address of exception handler 08d2 0003 | | .CONST 0x0003 ; Number of locals 08d3 INIT_08d0: 08d3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x32 = .DEBUG 0x08d3,0x149a,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x024c ; Debug Table 0x32.0x0 = 0x8d3,0xffff 08d4 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x32.0x1 = 0x8d4,0xfffe 08d5 BODY_08d0: 08d5 4801 |H | Short_Literal 0x1 ; Debug Table 0x32.0x2 = 0x8d5,0x1 08d6 e5ff | | Load 0x2,-0x1 08d7 8252 | R | Call 0x1,0x52 08d8 8256 | V | Call 0x1,0x56 08d9 0032 | 2 | Store_Top Heap_Access,At_Offset_2 08da 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x32.0x3 = 0x8da,0x2 08db 00eb | | Load_Encached Diana_Cache 08dc 1814 | | Execute Package,Field_Execute,Field_Number 0x14 08dd 0f3d | = | Execute_Immediate Equal,0x3d 08de 680e |h | Jump_Zero 0x8ed 08df 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x32.0x4 = 0x8df,0x3 08e0 00eb | | Load_Encached Diana_Cache 08e1 18ce | | Execute Package,Field_Execute,Field_Number 0xce 08e2 0031 | 1 | Store_Top Heap_Access,At_Offset_1 08e3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x32.0x5 = 0x8e3,0x4 08e4 00eb | | Load_Encached Diana_Cache 08e5 1814 | | Execute Package,Field_Execute,Field_Number 0x14 08e6 0f79 | y | Execute_Immediate Equal,0x79 08e7 6805 |h | Jump_Zero 0x8ed 08e8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x32.0x6 = 0x8e8,0x5 08e9 00eb | | Load_Encached Diana_Cache 08ea 18c3 | | Execute Package,Field_Execute,Field_Number 0xc3 08eb 8253 | S | Call 0x1,0x53 08ec 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08ed 0092 0ac0 | | Action Push_String_Extended,0xac0 ; "Element is not an Entry Declaration" ; Debug Table 0x32.0x7 = 0x8ed,0x6 08ef e004 | | Load 0x0,0x4 08f0 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 08f1 e005 | | Load 0x0,0x5 08f2 1813 | | Execute Package,Field_Execute,Field_Number 0x13 08f3 e001 | | Load 0x0,0x1 ; Debug Table 0x32.0x8 = 0x8f3,0x7 08f4 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 08f5 0257 | W | Execute Discrete,Raise 08f6 0000 0000 | | .XXX[0x2] 08f8 ; -------------------------------------------------------------------------------------- 08f8 ; SUBPROGRAM 08f8 ; -------------------------------------------------------------------------------------- 08f8 08fc | | .CONST 0x08fc ; Address of begin 08f9 0004 | | .CONST 0x0004 ; Address of exception handler 08fa 0002 | | .CONST 0x0002 ; Number of locals 08fb INIT_08f8: 08fb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x33 = .DEBUG 0x08fb,0x14ae,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0255 ; Debug Table 0x33.0x0 = 0x8fb,0xffff 08fc BODY_08f8: 08fc 4801 |H | Short_Literal 0x1 ; Debug Table 0x33.0x1 = 0x8fc,0x1 08fd e5ff | | Load 0x2,-0x1 08fe 8252 | R | Call 0x1,0x52 08ff 8256 | V | Call 0x1,0x56 0900 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0901 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x33.0x2 = 0x901,0x2 0902 00eb | | Load_Encached Diana_Cache 0903 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0904 0b48 | H | Execute_Immediate Case_Compare,0x48 0905 7005 |p | Jump_Nonzero 0x90b 0906 0b47 | G | Execute_Immediate Case_Compare,0x47 0907 7003 |p | Jump_Nonzero 0x90b 0908 0b46 | F | Execute_Immediate Case_Compare,0x46 0909 7001 |p | Jump_Nonzero 0x90b 090a 780d |x | Jump 0x918 ; Debug Table 0x33.0x3 = 0x90a,0x5 090b 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x33.0x4 = 0x90b,0x3 090c 00eb | | Load_Encached Diana_Cache 090d 18b6 | | Execute Package,Field_Execute,Field_Number 0xb6 090e 00eb | | Load_Encached Diana_Cache 090f 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0910 0f77 | w | Execute_Immediate Equal,0x77 0911 6806 |h | Jump_Zero 0x918 0912 4801 |H | Short_Literal 0x1 ; Debug Table 0x33.0x5 = 0x912,0x4 0913 00da | | Load_Top At_Offset_2 0914 e006 | | Load 0x0,0x6 0915 180e | | Execute Package,Field_Execute,Field_Number 0xe 0916 8253 | S | Call 0x1,0x53 0917 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0918 00d1 | | Pop_Control Pop_Count_1 0919 0092 0ac1 | | Action Push_String_Extended,0xac1 ; "Element is not a Subunit Stub" ; Debug Table 0x33.0x6 = 0x919,0x6 091b e004 | | Load 0x0,0x4 091c 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 091d e005 | | Load 0x0,0x5 091e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 091f e001 | | Load 0x0,0x1 ; Debug Table 0x33.0x7 = 0x91f,0x7 0920 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 0921 0257 | W | Execute Discrete,Raise 0922 0000 0000 | | .BLANK 0000[0x6] 0928 ; -------------------------------------------------------------------------------------- 0928 ; SUBPROGRAM 0928 ; -------------------------------------------------------------------------------------- 0928 092b | + | .CONST 0x092b ; Address of begin 0929 0004 | | .CONST 0x0004 ; Address of exception handler 092a 0001 | | .CONST 0x0001 ; Number of locals 092b BODY_0928: 092b INIT_0928: 092b 00db | | Load_Top At_Offset_3 ; Debug Table 0x34 = .DEBUG 0x092b,0x14c0,0x0001,0x0000,0x0033,0xdd84,0x0000,0x007a ; Debug Table 0x34.0x0 = 0x92b,0x1 092c e001 | | Load 0x0,0x1 092d 1835 | 5 | Execute Package,Field_Execute,Field_Number 0x35 092e 00db | | Load_Top At_Offset_3 092f 027f | | Execute Discrete,Equal 0930 700f |p | Jump_Nonzero 0x940 0931 0092 0ac2 | | Action Push_String_Extended,0xac2 ; "Element is not " ; Debug Table 0x34.0x1 = 0x931,0x2 0933 00db | | Load_Top At_Offset_3 0934 e001 | | Load 0x0,0x1 0935 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34 0936 025e | ^ | Execute Discrete,Convert 0937 1c01 | | Execute_Immediate Run_Utility,0x1 0938 01cc | | Execute Vector,Catenate 0939 e004 | | Load 0x0,0x4 093a 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 093b e005 | | Load 0x0,0x5 093c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 093d e001 | | Load 0x0,0x1 ; Debug Table 0x34.0x2 = 0x93d,0x3 093e 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 093f 0257 | W | Execute Discrete,Raise 0940 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0941 0000 0000 | | .BLANK 0000[0x7] 0948 ; -------------------------------------------------------------------------------------- 0948 ; SUBPROGRAM 0948 ; -------------------------------------------------------------------------------------- 0948 094f | O | .CONST 0x094f ; Address of begin 0949 0004 | | .CONST 0x0004 ; Address of exception handler 094a 0002 | | .CONST 0x0002 ; Number of locals 094b INIT_0948: 094b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x35 = .DEBUG 0x094b,0x14c8,0x0002,0x0000,0x0033,0xdd84,0x0000,0x00b6 ; Debug Table 0x35.0x0 = 0x94b,0xffff 094c 00db | | Load_Top At_Offset_3 094d 8252 | R | Call 0x1,0x52 094e 0031 | 1 | Store_Top Heap_Access,At_Offset_1 094f BODY_0948: 094f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x35.0x1 = 0x94f,0x1 0950 00eb | | Load_Encached Diana_Cache 0951 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0952 0b3b | ; | Execute_Immediate Case_Compare,0x3b 0953 7034 |p4 | Jump_Nonzero 0x988 0954 0b3c | < | Execute_Immediate Case_Compare,0x3c 0955 7032 |p2 | Jump_Nonzero 0x988 0956 0b3e | > | Execute_Immediate Case_Compare,0x3e 0957 7030 |p0 | Jump_Nonzero 0x988 0958 0b47 | G | Execute_Immediate Case_Compare,0x47 0959 702e |p. | Jump_Nonzero 0x988 095a 0b3f | ? | Execute_Immediate Case_Compare,0x3f 095b 702c |p, | Jump_Nonzero 0x988 095c 0b46 | F | Execute_Immediate Case_Compare,0x46 095d 702a |p* | Jump_Nonzero 0x988 095e 0b41 | A | Execute_Immediate Case_Compare,0x41 095f 7028 |p( | Jump_Nonzero 0x988 0960 0b39 | 9 | Execute_Immediate Case_Compare,0x39 0961 702a |p* | Jump_Nonzero 0x98c 0962 0b9b | | Execute_Immediate Case_Compare,0x9b 0963 7028 |p( | Jump_Nonzero 0x98c 0964 0b38 | 8 | Execute_Immediate Case_Compare,0x38 0965 7026 |p& | Jump_Nonzero 0x98c 0966 0b02 | | Execute_Immediate Case_Compare,0x2 0967 7024 |p$ | Jump_Nonzero 0x98c 0968 0b3a | : | Execute_Immediate Case_Compare,0x3a 0969 7022 |p" | Jump_Nonzero 0x98c 096a 0b37 | 7 | Execute_Immediate Case_Compare,0x37 096b 7020 |p | Jump_Nonzero 0x98c 096c 00d8 | | Load_Top At_Offset_0 096d 487d |H} | Short_Literal 0x7d 096e 487f |H | Short_Literal 0x7f 096f 0262 | b | Execute Discrete,In_Range 0970 701b |p | Jump_Nonzero 0x98c 0971 0b3d | = | Execute_Immediate Case_Compare,0x3d 0972 701d |p | Jump_Nonzero 0x990 0973 0b48 | H | Execute_Immediate Case_Compare,0x48 0974 701b |p | Jump_Nonzero 0x990 0975 0b90 | | Execute_Immediate Case_Compare,0x90 0976 701d |p | Jump_Nonzero 0x994 0977 0b33 | 3 | Execute_Immediate Case_Compare,0x33 0978 701d |p | Jump_Nonzero 0x996 0979 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x35.0x2 = 0x979,0x7 097a e007 | | Load 0x0,0x7 097b 1818 | | Execute Package,Field_Execute,Field_Number 0x18 097c 6802 |h | Jump_Zero 0x97f 097d 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x35.0x3 = 0x97d,0x8 097e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 097f 0092 0ac3 | | Action Push_String_Extended,0xac3 ; "Element has no ID" ; Debug Table 0x35.0x4 = 0x97f,0x9 0981 e004 | | Load 0x0,0x4 0982 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 0983 e005 | | Load 0x0,0x5 0984 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0985 e001 | | Load 0x0,0x1 ; Debug Table 0x35.0x5 = 0x985,0xa 0986 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 0987 0257 | W | Execute Discrete,Raise 0988 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x35.0x6 = 0x988,0x2 0989 00eb | | Load_Encached Diana_Cache 098a 18cf | | Execute Package,Field_Execute,Field_Number 0xcf 098b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 098c 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x35.0x7 = 0x98c,0x3 098d 00eb | | Load_Encached Diana_Cache 098e 18d0 | | Execute Package,Field_Execute,Field_Number 0xd0 098f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0990 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x35.0x8 = 0x990,0x4 0991 00eb | | Load_Encached Diana_Cache 0992 18bf | | Execute Package,Field_Execute,Field_Number 0xbf 0993 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0994 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x35.0x9 = 0x994,0x5 0995 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0996 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x35.0xa = 0x996,0x6 0997 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0998 ; -------------------------------------------------------------------------------------- 0998 ; SUBPROGRAM 0998 ; -------------------------------------------------------------------------------------- 0998 099d | | .CONST 0x099d ; Address of begin 0999 0004 | | .CONST 0x0004 ; Address of exception handler 099a 0003 | | .CONST 0x0003 ; Number of locals 099b INIT_0998: 099b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x36 = .DEBUG 0x099b,0x14e0,0x0002,0x0000,0x0033,0xdd84,0x0000,0x0158 ; Debug Table 0x36.0x0 = 0x99b,0xffff 099c 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x36.0x1 = 0x99c,0xfffe 099d BODY_0998: 099d e5ff | | Load 0x2,-0x1 ; Debug Table 0x36.0x2 = 0x99d,0x1 099e 00eb | | Load_Encached Diana_Cache 099f 1814 | | Execute Package,Field_Execute,Field_Number 0x14 09a0 0f33 | 3 | Execute_Immediate Equal,0x33 09a1 7004 |p | Jump_Nonzero 0x9a6 09a2 e5ff | | Load 0x2,-0x1 09a3 e007 | | Load 0x0,0x7 09a4 1818 | | Execute Package,Field_Execute,Field_Number 0x18 09a5 6811 |h | Jump_Zero 0x9b7 09a6 e5ff | | Load 0x2,-0x1 ; Debug Table 0x36.0x3 = 0x9a6,0x2 09a7 00eb | | Load_Encached Diana_Cache 09a8 18ec | | Execute Package,Field_Execute,Field_Number 0xec 09a9 0032 | 2 | Store_Top Heap_Access,At_Offset_2 09aa 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x36.0x4 = 0x9aa,0x3 09ab 00eb | | Load_Encached Diana_Cache 09ac 1814 | | Execute Package,Field_Execute,Field_Number 0x14 09ad 0f90 | | Execute_Immediate Equal,-0x70 09ae 6805 |h | Jump_Zero 0x9b4 09af 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x36.0x5 = 0x9af,0x4 09b0 00eb | | Load_Encached Diana_Cache 09b1 18ec | | Execute Package,Field_Execute,Field_Number 0xec 09b2 0031 | 1 | Store_Top Heap_Access,At_Offset_1 09b3 7805 |x | Jump 0x9b9 09b4 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x36.0x6 = 0x9b4,0x5 09b5 0031 | 1 | Store_Top Heap_Access,At_Offset_1 09b6 7802 |x | Jump 0x9b9 09b7 e5ff | | Load 0x2,-0x1 ; Debug Table 0x36.0x7 = 0x9b7,0x6 09b8 0031 | 1 | Store_Top Heap_Access,At_Offset_1 09b9 00cf | | Action Mark_Auxiliary 09ba 0007 | | Action Break_Optional ; Debug Table 0x36.0x8 = 0x9ba,0x7 09bb 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x36.0x9 = 0x9bb,0x8 09bc 00eb | | Load_Encached Diana_Cache 09bd 1814 | | Execute Package,Field_Execute,Field_Number 0x14 09be 0ba8 | | Execute_Immediate Case_Compare,0xa8 09bf 7018 |p | Jump_Nonzero 0x9d8 09c0 0b49 | I | Execute_Immediate Case_Compare,0x49 09c1 701b |p | Jump_Nonzero 0x9dd 09c2 00da | | Load_Top At_Offset_2 ; Debug Table 0x36.0xa = 0x9c2,0xb 09c3 e002 | | Load 0x0,0x2 09c4 1811 | | Execute Package,Field_Execute,Field_Number 0x11 09c5 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 09c6 0f02 | | Execute_Immediate Equal,0x2 09c7 6802 |h | Jump_Zero 0x9ca 09c8 00da | | Load_Top At_Offset_2 ; Debug Table 0x36.0xb = 0x9c8,0xc 09c9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 09ca e5fe | | Load 0x2,-0x2 ; Debug Table 0x36.0xc = 0x9ca,0xd 09cb 6809 |h | Jump_Zero 0x9d5 09cc 0092 0ac4 | | Action Push_String_Extended,0xac4 ; "Element is not a Declaration" ; Debug Table 0x36.0xd = 0x9cc,0xe 09ce e004 | | Load 0x0,0x4 09cf 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 09d0 e005 | | Load 0x0,0x5 09d1 1813 | | Execute Package,Field_Execute,Field_Number 0x13 09d2 e001 | | Load 0x0,0x1 ; Debug Table 0x36.0xe = 0x9d2,0xf 09d3 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 09d4 0257 | W | Execute Discrete,Raise 09d5 00eb | | Load_Encached Diana_Cache ; Debug Table 0x36.0xf = 0x9d5,0x10 09d6 1812 | | Execute Package,Field_Execute,Field_Number 0x12 09d7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 09d8 00da | | Load_Top At_Offset_2 ; Debug Table 0x36.0x10 = 0x9d8,0x9 09d9 00eb | | Load_Encached Diana_Cache 09da 18e9 | | Execute Package,Field_Execute,Field_Number 0xe9 09db 0033 | 3 | Store_Top Heap_Access,At_Offset_3 09dc 7804 |x | Jump 0x9e1 09dd 00da | | Load_Top At_Offset_2 ; Debug Table 0x36.0x11 = 0x9dd,0xa 09de 00eb | | Load_Encached Diana_Cache 09df 18e5 | | Execute Package,Field_Execute,Field_Number 0xe5 09e0 0033 | 3 | Store_Top Heap_Access,At_Offset_3 09e1 00d1 | | Pop_Control Pop_Count_1 09e2 00c9 | | Action Pop_Auxiliary_Loop 09e3 7fd7 | | Jump 0x9bb 09e4 0000 0000 | | .BLANK 0000[0x4] 09e8 ; -------------------------------------------------------------------------------------- 09e8 ; SUBPROGRAM 09e8 ; -------------------------------------------------------------------------------------- 09e8 09ed | | .CONST 0x09ed ; Address of begin 09e9 0004 | | .CONST 0x0004 ; Address of exception handler 09ea 0003 | | .CONST 0x0003 ; Number of locals 09eb INIT_09e8: 09eb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x37 = .DEBUG 0x09eb,0x1506,0x0002,0x0000,0x0033,0xdd84,0x0000,0x0212 ; Debug Table 0x37.0x0 = 0x9eb,0xffff 09ec 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x37.0x1 = 0x9ec,0xfffe 09ed BODY_09e8: 09ed e5ff | | Load 0x2,-0x1 ; Debug Table 0x37.0x2 = 0x9ed,0x1 09ee 00eb | | Load_Encached Diana_Cache 09ef 1814 | | Execute Package,Field_Execute,Field_Number 0x14 09f0 0b3e | > | Execute_Immediate Case_Compare,0x3e 09f1 7003 |p | Jump_Nonzero 0x9f5 09f2 0b41 | A | Execute_Immediate Case_Compare,0x41 09f3 7023 |p# | Jump_Nonzero 0xa17 09f4 782d |x- | Jump 0xa22 ; Debug Table 0x37.0x3 = 0x9f4,0xd 09f5 e5ff | | Load 0x2,-0x1 ; Debug Table 0x37.0x4 = 0x9f5,0x2 09f6 00eb | | Load_Encached Diana_Cache 09f7 18d8 | | Execute Package,Field_Execute,Field_Number 0xd8 09f8 0032 | 2 | Store_Top Heap_Access,At_Offset_2 09f9 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x37.0x5 = 0x9f9,0x3 09fa 00eb | | Load_Encached Diana_Cache 09fb 1814 | | Execute Package,Field_Execute,Field_Number 0x14 09fc 0b7c | | | Execute_Immediate Case_Compare,0x7c 09fd 7006 |p | Jump_Nonzero 0xa04 09fe 0b36 | 6 | Execute_Immediate Case_Compare,0x36 09ff 7006 |p | Jump_Nonzero 0xa06 0a00 0b80 | | Execute_Immediate Case_Compare,0x80 0a01 7004 |p | Jump_Nonzero 0xa06 0a02 48e2 |H | Short_Literal 0xe2 ; Debug Table 0x37.0x6 = 0xa02,0x9 0a03 0257 | W | Execute Discrete,Raise 0a04 00da | | Load_Top At_Offset_2 ; Debug Table 0x37.0x7 = 0xa04,0x4 0a05 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0a06 4801 |H | Short_Literal 0x1 ; Debug Table 0x37.0x8 = 0xa06,0x5 0a07 00db | | Load_Top At_Offset_3 0a08 e006 | | Load 0x0,0x6 0a09 180e | | Execute Package,Field_Execute,Field_Number 0xe 0a0a a402 | | Store_Unchecked 0x2,0x2 0a0b 00db | | Load_Top At_Offset_3 ; Debug Table 0x37.0x9 = 0xa0b,0x6 0a0c 00eb | | Load_Encached Diana_Cache 0a0d 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0a0e 6803 |h | Jump_Zero 0xa12 0a0f 00eb | | Load_Encached Diana_Cache ; Debug Table 0x37.0xa = 0xa0f,0x7 0a10 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0a11 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0a12 00db | | Load_Top At_Offset_3 ; Debug Table 0x37.0xb = 0xa12,0x8 0a13 00eb | | Load_Encached Diana_Cache 0a14 18ec | | Execute Package,Field_Execute,Field_Number 0xec 0a15 8257 | W | Call 0x1,0x57 0a16 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0a17 e5ff | | Load 0x2,-0x1 ; Debug Table 0x37.0xc = 0xa17,0xa 0a18 00eb | | Load_Encached Diana_Cache 0a19 18cc | | Execute Package,Field_Execute,Field_Number 0xcc 0a1a 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0a1b 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x37.0xd = 0xa1b,0xb 0a1c 00eb | | Load_Encached Diana_Cache 0a1d 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0a1e 0f7c | | | Execute_Immediate Equal,0x7c 0a1f 6802 |h | Jump_Zero 0xa22 0a20 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x37.0xe = 0xa20,0xc 0a21 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0a22 00d1 | | Pop_Control Pop_Count_1 0a23 0092 0ac5 | | Action Push_String_Extended,0xac5 ; "Element is not a Package specification" ; Debug Table 0x37.0xf = 0xa23,0xe 0a25 e004 | | Load 0x0,0x4 0a26 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 0a27 e005 | | Load 0x0,0x5 0a28 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0a29 e001 | | Load 0x0,0x1 ; Debug Table 0x37.0x10 = 0xa29,0xf 0a2a 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 0a2b 0257 | W | Execute Discrete,Raise 0a2c 0000 0000 | | .BLANK 0000[0x4] 0a30 ; -------------------------------------------------------------------------------------- 0a30 ; SUBPROGRAM 0a30 ; -------------------------------------------------------------------------------------- 0a30 0a36 | 6 | .CONST 0x0a36 ; Address of begin 0a31 0004 | | .CONST 0x0004 ; Address of exception handler 0a32 0004 | | .CONST 0x0004 ; Number of locals 0a33 INIT_0a30: 0a33 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x38 = .DEBUG 0x0a33,0x152a,0x0002,0x0000,0x0033,0xdd84,0x0000,0x02bb ; Debug Table 0x38.0x0 = 0xa33,0xffff 0a34 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x38.0x1 = 0xa34,0xfffe 0a35 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x38.0x2 = 0xa35,0xfffd 0a36 BODY_0a30: 0a36 e5ff | | Load 0x2,-0x1 ; Debug Table 0x38.0x3 = 0xa36,0x1 0a37 00eb | | Load_Encached Diana_Cache 0a38 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0a39 e5fe | | Load 0x2,-0x2 0a3a 027f | | Execute Discrete,Equal 0a3b 682e |h. | Jump_Zero 0xa6a 0a3c e5ff | | Load 0x2,-0x1 ; Debug Table 0x38.0x4 = 0xa3c,0x2 0a3d 00eb | | Load_Encached Diana_Cache 0a3e 18b6 | | Execute Package,Field_Execute,Field_Number 0xb6 0a3f 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0a40 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x38.0x5 = 0xa40,0x3 0a41 00eb | | Load_Encached Diana_Cache 0a42 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0a43 0b4e | N | Execute_Immediate Case_Compare,0x4e 0a44 7004 |p | Jump_Nonzero 0xa49 0a45 0b77 | w | Execute_Immediate Case_Compare,0x77 0a46 7005 |p | Jump_Nonzero 0xa4c 0a47 48e2 |H | Short_Literal 0xe2 ; Debug Table 0x38.0x6 = 0xa47,0xb 0a48 0257 | W | Execute Discrete,Raise 0a49 00da | | Load_Top At_Offset_2 ; Debug Table 0x38.0x7 = 0xa49,0x4 0a4a 8253 | S | Call 0x1,0x53 0a4b 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0a4c 4801 |H | Short_Literal 0x1 ; Debug Table 0x38.0x8 = 0xa4c,0x5 0a4d e5ff | | Load 0x2,-0x1 0a4e e006 | | Load 0x0,0x6 0a4f 180e | | Execute Package,Field_Execute,Field_Number 0xe 0a50 a402 | | Store_Unchecked 0x2,0x2 0a51 00db | | Load_Top At_Offset_3 ; Debug Table 0x38.0x9 = 0xa51,0x6 0a52 00eb | | Load_Encached Diana_Cache 0a53 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0a54 0ba8 | | Execute_Immediate Case_Compare,0xa8 0a55 7006 |p | Jump_Nonzero 0xa5c 0a56 0b00 | | Execute_Immediate Case_Compare,0x0 0a57 700f |p | Jump_Nonzero 0xa67 0a58 0b77 | w | Execute_Immediate Case_Compare,0x77 0a59 700d |p | Jump_Nonzero 0xa67 0a5a 48e2 |H | Short_Literal 0xe2 ; Debug Table 0x38.0xa = 0xa5a,0xa 0a5b 0257 | W | Execute Discrete,Raise 0a5c e402 | | Load 0x2,0x2 ; Debug Table 0x38.0xb = 0xa5c,0x7 0a5d 00eb | | Load_Encached Diana_Cache 0a5e 18e9 | | Execute Package,Field_Execute,Field_Number 0xe9 0a5f 00eb | | Load_Encached Diana_Cache 0a60 18e5 | | Execute Package,Field_Execute,Field_Number 0xe5 0a61 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0a62 00da | | Load_Top At_Offset_2 ; Debug Table 0x38.0xc = 0xa62,0x8 0a63 00eb | | Load_Encached Diana_Cache 0a64 18b6 | | Execute Package,Field_Execute,Field_Number 0xb6 0a65 8253 | S | Call 0x1,0x53 0a66 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0a67 e001 | | Load 0x0,0x1 ; Debug Table 0x38.0xd = 0xa67,0x9 0a68 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0a69 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0a6a 0092 0ac6 | | Action Push_String_Extended,0xac6 ; "Element is not a " ; Debug Table 0x38.0xe = 0xa6a,0xc 0a6c e5fd | | Load 0x2,-0x3 0a6d 01cc | | Execute Vector,Catenate 0a6e e004 | | Load 0x0,0x4 0a6f 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 0a70 e005 | | Load 0x0,0x5 0a71 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0a72 e001 | | Load 0x0,0x1 ; Debug Table 0x38.0xf = 0xa72,0xd 0a73 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 0a74 0257 | W | Execute Discrete,Raise 0a75 ; -------------------------------------------------------------------------------------- 0a75 ; STRING TABLE 0a75 ; -------------------------------------------------------------------------------------- 0a75 00a6 | | .STRTAB 0x00a6->0x0ac8 ; "A_VARIABLE_DECLARATION" 0a76 00ba | | .STRTAB 0x00ba->0x0ad3 ; "A_CONSTANT_DECLARATION" 0a77 00ce | | .STRTAB 0x00ce->0x0ade ; "A_DEFERRED_CONSTANT_DECLARATION" 0a78 00eb | | .STRTAB 0x00eb->0x0aed ; "AN_INTEGER_NUMBER_DECLARATION" 0a79 0106 | | .STRTAB 0x0106->0x0afc ; "A_REAL_NUMBER_DECLARATION" 0a7a 011d | | .STRTAB 0x011d->0x0b08 ; "A_TYPE_DECLARATION" 0a7b 012d | - | .STRTAB 0x012d->0x0b11 ; "AN_INCOMPLETE_TYPE_DECLARATION" 0a7c 0149 | I | .STRTAB 0x0149->0x0b20 ; "A_SUBTYPE_DECLARATION" 0a7d 015c | \ | .STRTAB 0x015c->0x0b2b ; "A_PACKAGE_DECLARATION" 0a7e 016f | o | .STRTAB 0x016f->0x0b35 ; "A_PACKAGE_BODY_DECLARATION" 0a7f 0187 | | .STRTAB 0x0187->0x0b42 ; "A_PROCEDURE_DECLARATION" 0a80 019c | | .STRTAB 0x019c->0x0b4e ; "A_PROCEDURE_BODY_DECLARATION" 0a81 01b6 | | .STRTAB 0x01b6->0x0b5c ; "A_FUNCTION_DECLARATION" 0a82 01ca | | .STRTAB 0x01ca->0x0b67 ; "A_FUNCTION_BODY_DECLARATION" 0a83 01e3 | | .STRTAB 0x01e3->0x0b74 ; "A_PACKAGE_RENAME_DECLARATION" 0a84 01fd | | .STRTAB 0x01fd->0x0b82 ; "A_PROCEDURE_RENAME_DECLARATION" 0a85 0219 | | .STRTAB 0x0219->0x0b91 ; "A_FUNCTION_RENAME_DECLARATION" 0a86 0234 | 4 | .STRTAB 0x0234->0x0ba0 ; "AN_OBJECT_RENAME_DECLARATION" 0a87 024e | N | .STRTAB 0x024e->0x0bae ; "AN_EXCEPTION_RENAME_DECLARATION" 0a88 026b | k | .STRTAB 0x026b->0x0bbd ; "A_GENERIC_PACKAGE_DECLARATION" 0a89 0286 | | .STRTAB 0x0286->0x0bcc ; "A_GENERIC_PROCEDURE_DECLARATION" 0a8a 02a3 | | .STRTAB 0x02a3->0x0bdb ; "A_GENERIC_FUNCTION_DECLARATION" 0a8b 02bf | | .STRTAB 0x02bf->0x0bea ; "A_PACKAGE_INSTANTIATION" 0a8c 02d4 | | .STRTAB 0x02d4->0x0bf6 ; "A_PROCEDURE_INSTANTIATION" 0a8d 02eb | | .STRTAB 0x02eb->0x0c02 ; "A_FUNCTION_INSTANTIATION" 0a8e 0301 | | .STRTAB 0x0301->0x0c0e ; "A_TASK_DECLARATION" 0a8f 0311 | | .STRTAB 0x0311->0x0c17 ; "A_TASK_BODY_DECLARATION" 0a90 0326 | & | .STRTAB 0x0326->0x0c23 ; "A_TASK_TYPE_DECLARATION" 0a91 033b | ; | .STRTAB 0x033b->0x0c2e ; "AN_ENTRY_DECLARATION" 0a92 034d | M | .STRTAB 0x034d->0x0c38 ; "AN_EXCEPTION_DECLARATION" 0a93 0363 | c | .STRTAB 0x0363->0x0c44 ; "A_PROCEDURE_SUBUNIT" 0a94 0374 | t | .STRTAB 0x0374->0x0c4e ; "A_FUNCTION_SUBUNIT" 0a95 0384 | | .STRTAB 0x0384->0x0c57 ; "A_PACKAGE_SUBUNIT" 0a96 0393 | | .STRTAB 0x0393->0x0c5f ; "A_TASK_SUBUNIT" 0a97 039f | | .STRTAB 0x039f->0x0c66 ; "A_SUBPROGRAM_FORMAL_PARAMETER" 0a98 03ba | | .STRTAB 0x03ba->0x0c75 ; "A_GENERIC_FORMAL_PARAMETER" 0a99 03d2 | | .STRTAB 0x03d2->0x0c82 ; "NOT_A_DECLARATION" 0a9a 03e1 | | .STRTAB 0x03e1->0x0c8a ; "DEFAULT_IN_PARAMETER" 0a9b 03f3 | | .STRTAB 0x03f3->0x0c94 ; "IN_PARAMETER" 0a9c 03fd | | .STRTAB 0x03fd->0x0c9a ; "OUT_PARAMETER" 0a9d 0408 | | .STRTAB 0x0408->0x0ca1 ; "IN_OUT_PARAMETER" 0a9e 0416 | | .STRTAB 0x0416->0x0ca9 ; "NOT_A_PARAMETER" 0a9f 0423 | # | .STRTAB 0x0423->0x0cb0 ; "SUBPROGRAM" 0aa0 042b | + | .STRTAB 0x042b->0x0cb5 ; "OBJECT" 0aa1 042f | / | .STRTAB 0x042f->0x0cb8 ; "PRIVATE_TYPE" 0aa2 0439 | 9 | .STRTAB 0x0439->0x0cbe ; "DISCRETE_TYPE" 0aa3 0444 | D | .STRTAB 0x0444->0x0cc5 ; "INTEGER_TYPE" 0aa4 044e | N | .STRTAB 0x044e->0x0ccb ; "FLOATING_POINT_TYPE" 0aa5 045f | _ | .STRTAB 0x045f->0x0cd4 ; "FIXED_POINT_TYPE" 0aa6 046d | m | .STRTAB 0x046d->0x0cdc ; "ARRAY_TYPE" 0aa7 0475 | u | .STRTAB 0x0475->0x0ce1 ; "ACCESS_TYPE" 0aa8 047e | ~ | .STRTAB 0x047e->0x0ce7 ; "NOT_A_GENERIC_PARAMETER" 0aa9 0493 | | .STRTAB 0x0493->0x0cf2 ; "BOX" 0aaa 0494 | | .STRTAB 0x0494->0x0cf4 ; "NAME" 0aab 0496 | | .STRTAB 0x0496->0x0cf6 ; "NONE" 0aac 0498 | | .STRTAB 0x0498->0x0cf8 ; "NOT_A_GENERIC_FORMAL_SUBPROGRAM" 0aad 04b5 | | .STRTAB 0x04b5->0x0d07 ; "Element is not a Renaming Declaration" 0aae 04d8 | | .STRTAB 0x04d8->0x0d1a ; "Element is not an Object or Parameter Declaration" 0aaf 0507 | | .STRTAB 0x0507->0x0d32 ; "Element is not an object declaration or id" 0ab0 052f | / | .STRTAB 0x052f->0x0d47 ; "Element is not a subprogram formal or deferred constant" 0ab1 0564 | d | .STRTAB 0x0564->0x0d63 ; "Element is not a type or subtype" 0ab2 0582 | | .STRTAB 0x0582->0x0d73 ; "Element is not a Program Unit" 0ab3 059d | | .STRTAB 0x059d->0x0d81 ; "Element has no unit body" 0ab4 05b3 | | .STRTAB 0x05b3->0x0d8d ; "Package Body Declaration);" 0ab5 05cb | | .STRTAB 0x05cb->0x0d9a ; "Element is not a Subprogram or Entry Declaration" 0ab6 05f9 | | .STRTAB 0x05f9->0x0db2 ; "Element is not a Function Declaration" 0ab7 061c | | .STRTAB 0x061c->0x0dc5 ; "Subprogram Body Declaration);" 0ab8 0637 | 7 | .STRTAB 0x0637->0x0dd3 ; "Element is not a Generic Declaration" 0ab9 0659 | Y | .STRTAB 0x0659->0x0de5 ; "Element default is box" 0aba 066d | m | .STRTAB 0x066d->0x0df0 ; "Element has no default" 0abb 0681 | | .STRTAB 0x0681->0x0dfb ; "Element is not a generic formal subprogram" 0abc 06a9 | | .STRTAB 0x06a9->0x0e10 ; "Element is not a Generic Instantiation" 0abd 06cd | | .STRTAB 0x06cd->0x0e23 ; "Element is not a Task Type Declaration" 0abe 06f1 | | .STRTAB 0x06f1->0x0e36 ; "Element is not a Task Declaration" 0abf 0710 | | .STRTAB 0x0710->0x0e47 ; "Task Body Declaration" 0ac0 0723 | # | .STRTAB 0x0723->0x0e51 ; "Element is not an Entry Declaration" 0ac1 0744 | D | .STRTAB 0x0744->0x0e63 ; "Element is not a Subunit Stub" 0ac2 075f | _ | .STRTAB 0x075f->0x0e71 ; "Element is not " 0ac3 076c | l | .STRTAB 0x076c->0x0e79 ; "Element has no ID" 0ac4 077b | { | .STRTAB 0x077b->0x0e81 ; "Element is not a Declaration" 0ac5 0795 | | .STRTAB 0x0795->0x0e8f ; "Element is not a Package specification" 0ac6 07b9 | | .STRTAB 0x07b9->0x0ea2 ; "Element is not a " 0ac7 07c8 | | .STREND 0x07c8->0x0eab 0ac8 415f 5641 |A_VA| .STRTAB_STRINGS 0eab 0000 0000 | | .BLANK 0000[0x5] 0eb0 ; -------------------------------------------------------------------------------------- 0eb0 ; Debug Table 0eb0 ; -------------------------------------------------------------------------------------- 0eb0 0003 0039 | 9| .CONST 0x0003,0x0039 0eb2 000b 107a | z| .DEBUG 0x000b,0x107a,0x8000,0x0000,0x0032,0xc7b4,0x0000,0x0005 0eba 00ad 110c | | .DEBUG 0x00ad,0x110c,0x8000,0x0000,0x0033,0xdd84,0x0000,0x001b 0ec2 0133 1190 | 3 | .DEBUG 0x0133,0x1190,0x0005,0x0000,0x0032,0xc7b4,0x0000,0x002a 0eca 014b 1192 | K | .DEBUG 0x014b,0x1192,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0053 0ed2 016b 119e | k | .DEBUG 0x016b,0x119e,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0084 0eda 017b 11a6 | { | .DEBUG 0x017b,0x11a6,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x008d 0ee2 019b 11b4 | | .DEBUG 0x019b,0x11b4,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0096 0eea 01db 11d0 | | .DEBUG 0x01db,0x11d0,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x009f 0ef2 0213 11ea | | .DEBUG 0x0213,0x11ea,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x00a8 0efa 0233 11f2 | 3 | .DEBUG 0x0233,0x11f2,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x00b3 0f02 0253 11fa | S | .DEBUG 0x0253,0x11fa,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x00be 0f0a 027b 120e | { | .DEBUG 0x027b,0x120e,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x00c9 0f12 028b 1212 | | .DEBUG 0x028b,0x1212,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x00d2 0f1a 02ab 121c | | .DEBUG 0x02ab,0x121c,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x00dd 0f22 02f3 1234 | 4| .DEBUG 0x02f3,0x1234,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x00e6 0f2a 0333 124a | 3 J| .DEBUG 0x0333,0x124a,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x00ef 0f32 035b 125a | [ Z| .DEBUG 0x035b,0x125a,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x00f8 0f3a 038b 126c | l| .DEBUG 0x038b,0x126c,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0101 0f42 03a3 1278 | x| .DEBUG 0x03a3,0x1278,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x010a 0f4a 03bb 1284 | | .DEBUG 0x03bb,0x1284,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0113 0f52 03d3 1290 | | .DEBUG 0x03d3,0x1290,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x011c 0f5a 03fb 12a0 | | .DEBUG 0x03fb,0x12a0,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0125 0f62 0423 12ae | # | .DEBUG 0x0423,0x12ae,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x012e 0f6a 0443 12bc | C | .DEBUG 0x0443,0x12bc,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0137 0f72 0463 12ca | c | .DEBUG 0x0463,0x12ca,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0140 0f7a 048b 12d8 | | .DEBUG 0x048b,0x12d8,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0149 0f82 04b3 12e6 | | .DEBUG 0x04b3,0x12e6,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0152 0f8a 04db 12f8 | | .DEBUG 0x04db,0x12f8,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x015b 0f92 0553 1326 | S &| .DEBUG 0x0553,0x1326,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0164 0f9a 05bb 134e | N| .DEBUG 0x05bb,0x134e,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x016d 0fa2 05d3 1356 | V| .DEBUG 0x05d3,0x1356,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0178 0faa 05eb 135e | ^| .DEBUG 0x05eb,0x135e,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0183 0fb2 05fb 1366 | f| .DEBUG 0x05fb,0x1366,0x0005,0x0000,0x0032,0xc7b4,0x0000,0x0192 0fba 0613 1368 | h| .DEBUG 0x0613,0x1368,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x019b 0fc2 064b 1386 | K | .DEBUG 0x064b,0x1386,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x01a4 0fca 068b 139e | | .DEBUG 0x068b,0x139e,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x01af 0fd2 06c3 13b6 | | .DEBUG 0x06c3,0x13b6,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x01b8 0fda 06e3 13c4 | | .DEBUG 0x06e3,0x13c4,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x01c1 0fe2 06f3 13cc | | .DEBUG 0x06f3,0x13cc,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x01ca 0fea 0703 13d4 | | .DEBUG 0x0703,0x13d4,0x0005,0x0000,0x0032,0xc7b4,0x0000,0x01d9 0ff2 071b 13d6 | | .DEBUG 0x071b,0x13d6,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x01e7 0ffa 0763 13fa | c | .DEBUG 0x0763,0x13fa,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x01f0 1002 0783 1408 | | .DEBUG 0x0783,0x1408,0x0005,0x0000,0x0032,0xc7b4,0x0000,0x01fb 100a 079b 140a | | .DEBUG 0x079b,0x140a,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0203 1012 07bb 141c | | .DEBUG 0x07bb,0x141c,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x020c 101a 07f3 1438 | 8| .DEBUG 0x07f3,0x1438,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0215 1022 0813 1446 | F| .DEBUG 0x0813,0x1446,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x021e 102a 0853 1460 | S `| .DEBUG 0x0853,0x1460,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0229 1032 0883 147a | z| .DEBUG 0x0883,0x147a,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0232 103a 08c3 1492 | | .DEBUG 0x08c3,0x1492,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x023d 1042 08d3 149a | | .DEBUG 0x08d3,0x149a,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x024c 104a 08fb 14ae | | .DEBUG 0x08fb,0x14ae,0x0002,0x0000,0x0032,0xc7b4,0x0000,0x0255 1052 092b 14c0 | + | .DEBUG 0x092b,0x14c0,0x0001,0x0000,0x0033,0xdd84,0x0000,0x007a 105a 094b 14c8 | K | .DEBUG 0x094b,0x14c8,0x0002,0x0000,0x0033,0xdd84,0x0000,0x00b6 1062 099b 14e0 | | .DEBUG 0x099b,0x14e0,0x0002,0x0000,0x0033,0xdd84,0x0000,0x0158 106a 09eb 1506 | | .DEBUG 0x09eb,0x1506,0x0002,0x0000,0x0033,0xdd84,0x0000,0x0212 1072 0a33 152a | 3 *| .DEBUG 0x0a33,0x152a,0x0002,0x0000,0x0033,0xdd84,0x0000,0x02bb 107a ; -------------------------------------------------------------------------------------- 107a ; Debug3 Subtable 0x0 107a ; -------------------------------------------------------------------------------------- 107a 0048 0000 | H | .DBG3TAB 0x0048,0x0000 107c 000b ffff | | .CONST 0x000b,0xffff 107e 000e fffe | | .CONST 0x000e,0xfffe 1080 0011 fffd | | .CONST 0x0011,0xfffd 1082 0014 fffc | | .CONST 0x0014,0xfffc 1084 0017 fffb | | .CONST 0x0017,0xfffb 1086 001a fffa | | .CONST 0x001a,0xfffa 1088 001d fff9 | | .CONST 0x001d,0xfff9 108a 0022 fff8 | " | .CONST 0x0022,0xfff8 108c 0024 fff7 | $ | .CONST 0x0024,0xfff7 108e 0026 fff6 | & | .CONST 0x0026,0xfff6 1090 0028 fff5 | ( | .CONST 0x0028,0xfff5 1092 002a fff4 | * | .CONST 0x002a,0xfff4 1094 002c fff3 | , | .CONST 0x002c,0xfff3 1096 002e fff2 | . | .CONST 0x002e,0xfff2 1098 0030 fff1 | 0 | .CONST 0x0030,0xfff1 109a 0032 fff0 | 2 | .CONST 0x0032,0xfff0 109c 0034 ffef | 4 | .CONST 0x0034,0xffef 109e 0036 ffee | 6 | .CONST 0x0036,0xffee 10a0 0038 ffed | 8 | .CONST 0x0038,0xffed 10a2 003a ffec | : | .CONST 0x003a,0xffec 10a4 003c ffeb | < | .CONST 0x003c,0xffeb 10a6 003e ffea | > | .CONST 0x003e,0xffea 10a8 0040 ffe9 | @ | .CONST 0x0040,0xffe9 10aa 0042 ffe8 | B | .CONST 0x0042,0xffe8 10ac 0044 ffe7 | D | .CONST 0x0044,0xffe7 10ae 0046 ffe6 | F | .CONST 0x0046,0xffe6 10b0 0048 ffe5 | H | .CONST 0x0048,0xffe5 10b2 004a ffe4 | J | .CONST 0x004a,0xffe4 10b4 004c ffe3 | L | .CONST 0x004c,0xffe3 10b6 004e ffe2 | N | .CONST 0x004e,0xffe2 10b8 0050 ffe1 | P | .CONST 0x0050,0xffe1 10ba 0052 ffe0 | R | .CONST 0x0052,0xffe0 10bc 0054 ffdf | T | .CONST 0x0054,0xffdf 10be 0056 ffde | V | .CONST 0x0056,0xffde 10c0 0058 ffdd | X | .CONST 0x0058,0xffdd 10c2 005a ffdc | Z | .CONST 0x005a,0xffdc 10c4 005c ffdb | \ | .CONST 0x005c,0xffdb 10c6 005e ffda | ^ | .CONST 0x005e,0xffda 10c8 0060 ffd9 | ` | .CONST 0x0060,0xffd9 10ca 0062 ffd8 | b | .CONST 0x0062,0xffd8 10cc 0064 ffd7 | d | .CONST 0x0064,0xffd7 10ce 0066 ffd6 | f | .CONST 0x0066,0xffd6 10d0 0068 ffd5 | h | .CONST 0x0068,0xffd5 10d2 006a ffd4 | j | .CONST 0x006a,0xffd4 10d4 006c ffd3 | l | .CONST 0x006c,0xffd3 10d6 006e ffd2 | n | .CONST 0x006e,0xffd2 10d8 0070 ffd1 | p | .CONST 0x0070,0xffd1 10da 0073 ffd0 | s | .CONST 0x0073,0xffd0 10dc 0078 ffcf | x | .CONST 0x0078,0xffcf 10de 007a ffce | z | .CONST 0x007a,0xffce 10e0 007c ffcd | | | .CONST 0x007c,0xffcd 10e2 007e ffcc | ~ | .CONST 0x007e,0xffcc 10e4 0080 ffcb | | .CONST 0x0080,0xffcb 10e6 0082 ffca | | .CONST 0x0082,0xffca 10e8 0084 ffc9 | | .CONST 0x0084,0xffc9 10ea 0087 ffc8 | | .CONST 0x0087,0xffc8 10ec 008c ffc7 | | .CONST 0x008c,0xffc7 10ee 008e ffc6 | | .CONST 0x008e,0xffc6 10f0 0090 ffc5 | | .CONST 0x0090,0xffc5 10f2 0095 ffc4 | | .CONST 0x0095,0xffc4 10f4 0097 ffc3 | | .CONST 0x0097,0xffc3 10f6 0099 ffc2 | | .CONST 0x0099,0xffc2 10f8 009b ffc1 | | .CONST 0x009b,0xffc1 10fa 009d ffc0 | | .CONST 0x009d,0xffc0 10fc 009f ffbf | | .CONST 0x009f,0xffbf 10fe 00a1 ffbe | | .CONST 0x00a1,0xffbe 1100 00a3 ffbd | | .CONST 0x00a3,0xffbd 1102 00a6 ffbc | | .CONST 0x00a6,0xffbc 1104 00a8 ffbb | | .CONST 0x00a8,0xffbb 1106 00aa ffba | | .CONST 0x00aa,0xffba 1108 00ab ffb9 | | .CONST 0x00ab,0xffb9 110a 00ac ffb8 | | .CONST 0x00ac,0xffb8 110c ; -------------------------------------------------------------------------------------- 110c ; Debug3 Subtable 0x1 110c ; -------------------------------------------------------------------------------------- 110c 0041 0000 | A | .DBG3TAB 0x0041,0x0000 110e 00ad ffff | | .CONST 0x00ad,0xffff 1110 00ae fffe | | .CONST 0x00ae,0xfffe 1112 00af fffd | | .CONST 0x00af,0xfffd 1114 00b0 fffc | | .CONST 0x00b0,0xfffc 1116 00b1 fffb | | .CONST 0x00b1,0xfffb 1118 00b2 fffa | | .CONST 0x00b2,0xfffa 111a 00b6 fff9 | | .CONST 0x00b6,0xfff9 111c 00ba fff8 | | .CONST 0x00ba,0xfff8 111e 00bc fff7 | | .CONST 0x00bc,0xfff7 1120 00bd fff6 | | .CONST 0x00bd,0xfff6 1122 00bf fff5 | | .CONST 0x00bf,0xfff5 1124 00c1 fff4 | | .CONST 0x00c1,0xfff4 1126 00c3 fff3 | | .CONST 0x00c3,0xfff3 1128 00c5 fff2 | | .CONST 0x00c5,0xfff2 112a 00c6 fff1 | | .CONST 0x00c6,0xfff1 112c 00c8 fff0 | | .CONST 0x00c8,0xfff0 112e 00ca ffef | | .CONST 0x00ca,0xffef 1130 00cc ffee | | .CONST 0x00cc,0xffee 1132 00ce ffed | | .CONST 0x00ce,0xffed 1134 00d0 ffec | | .CONST 0x00d0,0xffec 1136 00d2 ffeb | | .CONST 0x00d2,0xffeb 1138 00d4 ffea | | .CONST 0x00d4,0xffea 113a 00d6 ffe9 | | .CONST 0x00d6,0xffe9 113c 00d8 ffe8 | | .CONST 0x00d8,0xffe8 113e 00da ffe7 | | .CONST 0x00da,0xffe7 1140 00dc ffe6 | | .CONST 0x00dc,0xffe6 1142 00de ffe5 | | .CONST 0x00de,0xffe5 1144 00e0 ffe4 | | .CONST 0x00e0,0xffe4 1146 00e2 ffe3 | | .CONST 0x00e2,0xffe3 1148 00e4 ffe2 | | .CONST 0x00e4,0xffe2 114a 00e6 ffe1 | | .CONST 0x00e6,0xffe1 114c 00e8 ffe0 | | .CONST 0x00e8,0xffe0 114e 00ea ffdf | | .CONST 0x00ea,0xffdf 1150 00ec ffde | | .CONST 0x00ec,0xffde 1152 00ee ffdd | | .CONST 0x00ee,0xffdd 1154 00f0 ffdc | | .CONST 0x00f0,0xffdc 1156 00f2 ffdb | | .CONST 0x00f2,0xffdb 1158 00f4 ffda | | .CONST 0x00f4,0xffda 115a 00f6 ffd9 | | .CONST 0x00f6,0xffd9 115c 00f8 ffd8 | | .CONST 0x00f8,0xffd8 115e 00fa ffd7 | | .CONST 0x00fa,0xffd7 1160 00fb ffd6 | | .CONST 0x00fb,0xffd6 1162 00fd ffd5 | | .CONST 0x00fd,0xffd5 1164 00ff ffd4 | | .CONST 0x00ff,0xffd4 1166 0101 ffd3 | | .CONST 0x0101,0xffd3 1168 0102 ffd2 | | .CONST 0x0102,0xffd2 116a 0104 ffd1 | | .CONST 0x0104,0xffd1 116c 0106 ffd0 | | .CONST 0x0106,0xffd0 116e 0108 ffcf | | .CONST 0x0108,0xffcf 1170 010a ffce | | .CONST 0x010a,0xffce 1172 010c ffcd | | .CONST 0x010c,0xffcd 1174 010d ffcc | | .CONST 0x010d,0xffcc 1176 010f ffcb | | .CONST 0x010f,0xffcb 1178 0111 ffca | | .CONST 0x0111,0xffca 117a 0113 ffc9 | | .CONST 0x0113,0xffc9 117c 0115 ffc8 | | .CONST 0x0115,0xffc8 117e 0117 ffc7 | | .CONST 0x0117,0xffc7 1180 0119 ffc6 | | .CONST 0x0119,0xffc6 1182 011b ffc5 | | .CONST 0x011b,0xffc5 1184 011c ffc4 | | .CONST 0x011c,0xffc4 1186 011e ffc3 | | .CONST 0x011e,0xffc3 1188 0120 ffc2 | | .CONST 0x0120,0xffc2 118a 0122 ffc1 | " | .CONST 0x0122,0xffc1 118c 0123 ffc0 | # | .CONST 0x0123,0xffc0 118e 0125 ffbf | % | .CONST 0x0125,0xffbf 1190 ; -------------------------------------------------------------------------------------- 1190 ; Debug3 Subtable 0x2 1190 ; -------------------------------------------------------------------------------------- 1190 0000 0000 | | .DBG3TAB 0x0000,0x0000 1192 ; -------------------------------------------------------------------------------------- 1192 ; Debug3 Subtable 0x3 1192 ; -------------------------------------------------------------------------------------- 1192 0001 0004 | | .DBG3TAB 0x0001,0x0004 1194 014b ffff | K | .CONST 0x014b,0xffff 1196 0150 0001 | P | .CONST 0x0150,0x0001 1198 0158 0002 | X | .CONST 0x0158,0x0002 119a 015c 0003 | \ | .CONST 0x015c,0x0003 119c 015f 0004 | _ | .CONST 0x015f,0x0004 119e ; -------------------------------------------------------------------------------------- 119e ; Debug3 Subtable 0x4 119e ; -------------------------------------------------------------------------------------- 119e 0001 0002 | | .DBG3TAB 0x0001,0x0002 11a0 016b ffff | k | .CONST 0x016b,0xffff 11a2 016c 0001 | l | .CONST 0x016c,0x0001 11a4 0172 0002 | r | .CONST 0x0172,0x0002 11a6 ; -------------------------------------------------------------------------------------- 11a6 ; Debug3 Subtable 0x5 11a6 ; -------------------------------------------------------------------------------------- 11a6 0001 0005 | | .DBG3TAB 0x0001,0x0005 11a8 017b ffff | { | .CONST 0x017b,0xffff 11aa 017c 0001 | | | .CONST 0x017c,0x0001 11ac 0182 0002 | | .CONST 0x0182,0x0002 11ae 0186 0003 | | .CONST 0x0186,0x0003 11b0 018c 0004 | | .CONST 0x018c,0x0004 11b2 018f 0005 | | .CONST 0x018f,0x0005 11b4 ; -------------------------------------------------------------------------------------- 11b4 ; Debug3 Subtable 0x6 11b4 ; -------------------------------------------------------------------------------------- 11b4 0001 000c | | .DBG3TAB 0x0001,0x000c 11b6 019b ffff | | .CONST 0x019b,0xffff 11b8 01a4 0001 | | .CONST 0x01a4,0x0001 11ba 01a5 0002 | | .CONST 0x01a5,0x0002 11bc 01b4 000a | | .CONST 0x01b4,0x000a 11be 01b5 0003 | | .CONST 0x01b5,0x0003 11c0 01b9 0004 | | .CONST 0x01b9,0x0004 11c2 01be 0005 | | .CONST 0x01be,0x0005 11c4 01c0 0006 | | .CONST 0x01c0,0x0006 11c6 01c2 0007 | | .CONST 0x01c2,0x0007 11c8 01c4 0008 | | .CONST 0x01c4,0x0008 11ca 01ca 0009 | | .CONST 0x01ca,0x0009 11cc 01cd 000b | | .CONST 0x01cd,0x000b 11ce 01cf 000c | | .CONST 0x01cf,0x000c 11d0 ; -------------------------------------------------------------------------------------- 11d0 ; Debug3 Subtable 0x7 11d0 ; -------------------------------------------------------------------------------------- 11d0 0001 000b | | .DBG3TAB 0x0001,0x000b 11d2 01db ffff | | .CONST 0x01db,0xffff 11d4 01e4 0001 | | .CONST 0x01e4,0x0001 11d6 01e5 0002 | | .CONST 0x01e5,0x0002 11d8 01ee 0009 | | .CONST 0x01ee,0x0009 11da 01ef 0003 | | .CONST 0x01ef,0x0003 11dc 01f3 0004 | | .CONST 0x01f3,0x0004 11de 01f8 0005 | | .CONST 0x01f8,0x0005 11e0 01fa 0006 | | .CONST 0x01fa,0x0006 11e2 01fc 0007 | | .CONST 0x01fc,0x0007 11e4 0202 0008 | | .CONST 0x0202,0x0008 11e6 0205 000a | | .CONST 0x0205,0x000a 11e8 0207 000b | | .CONST 0x0207,0x000b 11ea ; -------------------------------------------------------------------------------------- 11ea ; Debug3 Subtable 0x8 11ea ; -------------------------------------------------------------------------------------- 11ea 0001 0002 | | .DBG3TAB 0x0001,0x0002 11ec 0213 ffff | | .CONST 0x0213,0xffff 11ee 0214 0001 | | .CONST 0x0214,0x0001 11f0 0219 0002 | | .CONST 0x0219,0x0002 11f2 ; -------------------------------------------------------------------------------------- 11f2 ; Debug3 Subtable 0x9 11f2 ; -------------------------------------------------------------------------------------- 11f2 0001 0002 | | .DBG3TAB 0x0001,0x0002 11f4 0233 ffff | 3 | .CONST 0x0233,0xffff 11f6 0234 0001 | 4 | .CONST 0x0234,0x0001 11f8 0239 0002 | 9 | .CONST 0x0239,0x0002 11fa ; -------------------------------------------------------------------------------------- 11fa ; Debug3 Subtable 0xa 11fa ; -------------------------------------------------------------------------------------- 11fa 0003 0006 | | .DBG3TAB 0x0003,0x0006 11fc 0253 ffff | S | .CONST 0x0253,0xffff 11fe 0254 fffe | T | .CONST 0x0254,0xfffe 1200 0257 fffd | W | .CONST 0x0257,0xfffd 1202 025a 0001 | Z | .CONST 0x025a,0x0001 1204 025d 0002 | ] | .CONST 0x025d,0x0002 1206 0262 0003 | b | .CONST 0x0262,0x0003 1208 026a 0004 | j | .CONST 0x026a,0x0004 120a 0270 0005 | p | .CONST 0x0270,0x0005 120c 0276 0006 | v | .CONST 0x0276,0x0006 120e ; -------------------------------------------------------------------------------------- 120e ; Debug3 Subtable 0xb 120e ; -------------------------------------------------------------------------------------- 120e 0000 0001 | | .DBG3TAB 0x0000,0x0001 1210 027b 0001 | { | .CONST 0x027b,0x0001 1212 ; -------------------------------------------------------------------------------------- 1212 ; Debug3 Subtable 0xc 1212 ; -------------------------------------------------------------------------------------- 1212 0001 0003 | | .DBG3TAB 0x0001,0x0003 1214 028b ffff | | .CONST 0x028b,0xffff 1216 0291 0002 | | .CONST 0x0291,0x0002 1218 0296 0001 | | .CONST 0x0296,0x0001 121a 02a3 0003 | | .CONST 0x02a3,0x0003 121c ; -------------------------------------------------------------------------------------- 121c ; Debug3 Subtable 0xd 121c ; -------------------------------------------------------------------------------------- 121c 0001 000a | | .DBG3TAB 0x0001,0x000a 121e 02ab ffff | | .CONST 0x02ab,0xffff 1220 02af 0001 | | .CONST 0x02af,0x0001 1222 02b4 0003 | | .CONST 0x02b4,0x0003 1224 02b8 0004 | | .CONST 0x02b8,0x0004 1226 02c8 0009 | | .CONST 0x02c8,0x0009 1228 02ce 000a | | .CONST 0x02ce,0x000a 122a 02d1 0005 | | .CONST 0x02d1,0x0005 122c 02d3 0006 | | .CONST 0x02d3,0x0006 122e 02d5 0007 | | .CONST 0x02d5,0x0007 1230 02dc 0008 | | .CONST 0x02dc,0x0008 1232 02e3 0002 | | .CONST 0x02e3,0x0002 1234 ; -------------------------------------------------------------------------------------- 1234 ; Debug3 Subtable 0xe 1234 ; -------------------------------------------------------------------------------------- 1234 0001 0009 | | .DBG3TAB 0x0001,0x0009 1236 02f3 ffff | | .CONST 0x02f3,0xffff 1238 02f7 0001 | | .CONST 0x02f7,0x0001 123a 02fc 0003 | | .CONST 0x02fc,0x0003 123c 0300 0004 | | .CONST 0x0300,0x0004 123e 030e 0008 | | .CONST 0x030e,0x0008 1240 0314 0009 | | .CONST 0x0314,0x0009 1242 0317 0005 | | .CONST 0x0317,0x0005 1244 031c 0006 | | .CONST 0x031c,0x0006 1246 0321 0007 | ! | .CONST 0x0321,0x0007 1248 0326 0002 | & | .CONST 0x0326,0x0002 124a ; -------------------------------------------------------------------------------------- 124a ; Debug3 Subtable 0xf 124a ; -------------------------------------------------------------------------------------- 124a 0001 0006 | | .DBG3TAB 0x0001,0x0006 124c 0333 ffff | 3 | .CONST 0x0333,0xffff 124e 0334 0001 | 4 | .CONST 0x0334,0x0001 1250 0339 0002 | 9 | .CONST 0x0339,0x0002 1252 0342 0005 | B | .CONST 0x0342,0x0005 1254 0348 0006 | H | .CONST 0x0348,0x0006 1256 034b 0003 | K | .CONST 0x034b,0x0003 1258 0350 0004 | P | .CONST 0x0350,0x0004 125a ; -------------------------------------------------------------------------------------- 125a ; Debug3 Subtable 0x10 125a ; -------------------------------------------------------------------------------------- 125a 0001 0007 | | .DBG3TAB 0x0001,0x0007 125c 035b ffff | [ | .CONST 0x035b,0xffff 125e 035f 0001 | _ | .CONST 0x035f,0x0001 1260 0364 0003 | d | .CONST 0x0364,0x0003 1262 0368 0004 | h | .CONST 0x0368,0x0004 1264 0373 0006 | s | .CONST 0x0373,0x0006 1266 0379 0007 | y | .CONST 0x0379,0x0007 1268 037c 0005 | | | .CONST 0x037c,0x0005 126a 0381 0002 | | .CONST 0x0381,0x0002 126c ; -------------------------------------------------------------------------------------- 126c ; Debug3 Subtable 0x11 126c ; -------------------------------------------------------------------------------------- 126c 0001 0004 | | .DBG3TAB 0x0001,0x0004 126e 038b ffff | | .CONST 0x038b,0xffff 1270 038c 0001 | | .CONST 0x038c,0x0001 1272 0391 0002 | | .CONST 0x0391,0x0002 1274 0396 0003 | | .CONST 0x0396,0x0003 1276 039d 0004 | | .CONST 0x039d,0x0004 1278 ; -------------------------------------------------------------------------------------- 1278 ; Debug3 Subtable 0x12 1278 ; -------------------------------------------------------------------------------------- 1278 0001 0004 | | .DBG3TAB 0x0001,0x0004 127a 03a3 ffff | | .CONST 0x03a3,0xffff 127c 03a4 0001 | | .CONST 0x03a4,0x0001 127e 03a9 0002 | | .CONST 0x03a9,0x0002 1280 03ae 0003 | | .CONST 0x03ae,0x0003 1282 03b5 0004 | | .CONST 0x03b5,0x0004 1284 ; -------------------------------------------------------------------------------------- 1284 ; Debug3 Subtable 0x13 1284 ; -------------------------------------------------------------------------------------- 1284 0001 0004 | | .DBG3TAB 0x0001,0x0004 1286 03bb ffff | | .CONST 0x03bb,0xffff 1288 03bc 0001 | | .CONST 0x03bc,0x0001 128a 03c1 0002 | | .CONST 0x03c1,0x0002 128c 03c6 0003 | | .CONST 0x03c6,0x0003 128e 03cc 0004 | | .CONST 0x03cc,0x0004 1290 ; -------------------------------------------------------------------------------------- 1290 ; Debug3 Subtable 0x14 1290 ; -------------------------------------------------------------------------------------- 1290 0001 0006 | | .DBG3TAB 0x0001,0x0006 1292 03d3 ffff | | .CONST 0x03d3,0xffff 1294 03d4 0001 | | .CONST 0x03d4,0x0001 1296 03d9 0002 | | .CONST 0x03d9,0x0002 1298 03e0 0005 | | .CONST 0x03e0,0x0005 129a 03e6 0006 | | .CONST 0x03e6,0x0006 129c 03e9 0003 | | .CONST 0x03e9,0x0003 129e 03ee 0004 | | .CONST 0x03ee,0x0004 12a0 ; -------------------------------------------------------------------------------------- 12a0 ; Debug3 Subtable 0x15 12a0 ; -------------------------------------------------------------------------------------- 12a0 0001 0005 | | .DBG3TAB 0x0001,0x0005 12a2 03fb ffff | | .CONST 0x03fb,0xffff 12a4 03fc 0001 | | .CONST 0x03fc,0x0001 12a6 0401 0002 | | .CONST 0x0401,0x0002 12a8 040e 0005 | | .CONST 0x040e,0x0005 12aa 0410 0003 | | .CONST 0x0410,0x0003 12ac 0412 0004 | | .CONST 0x0412,0x0004 12ae ; -------------------------------------------------------------------------------------- 12ae ; Debug3 Subtable 0x16 12ae ; -------------------------------------------------------------------------------------- 12ae 0001 0005 | | .DBG3TAB 0x0001,0x0005 12b0 0423 ffff | # | .CONST 0x0423,0xffff 12b2 0424 0001 | $ | .CONST 0x0424,0x0001 12b4 0429 0002 | ) | .CONST 0x0429,0x0002 12b6 0432 0005 | 2 | .CONST 0x0432,0x0005 12b8 0434 0003 | 4 | .CONST 0x0434,0x0003 12ba 0436 0004 | 6 | .CONST 0x0436,0x0004 12bc ; -------------------------------------------------------------------------------------- 12bc ; Debug3 Subtable 0x17 12bc ; -------------------------------------------------------------------------------------- 12bc 0001 0005 | | .DBG3TAB 0x0001,0x0005 12be 0443 ffff | C | .CONST 0x0443,0xffff 12c0 0444 0001 | D | .CONST 0x0444,0x0001 12c2 0449 0002 | I | .CONST 0x0449,0x0002 12c4 0452 0005 | R | .CONST 0x0452,0x0005 12c6 0454 0003 | T | .CONST 0x0454,0x0003 12c8 0456 0004 | V | .CONST 0x0456,0x0004 12ca ; -------------------------------------------------------------------------------------- 12ca ; Debug3 Subtable 0x18 12ca ; -------------------------------------------------------------------------------------- 12ca 0001 0005 | | .DBG3TAB 0x0001,0x0005 12cc 0463 ffff | c | .CONST 0x0463,0xffff 12ce 0464 0001 | d | .CONST 0x0464,0x0001 12d0 0469 0002 | i | .CONST 0x0469,0x0002 12d2 0472 0005 | r | .CONST 0x0472,0x0005 12d4 0474 0003 | t | .CONST 0x0474,0x0003 12d6 047b 0004 | { | .CONST 0x047b,0x0004 12d8 ; -------------------------------------------------------------------------------------- 12d8 ; Debug3 Subtable 0x19 12d8 ; -------------------------------------------------------------------------------------- 12d8 0001 0005 | | .DBG3TAB 0x0001,0x0005 12da 048b ffff | | .CONST 0x048b,0xffff 12dc 048c 0001 | | .CONST 0x048c,0x0001 12de 0491 0002 | | .CONST 0x0491,0x0002 12e0 049a 0005 | | .CONST 0x049a,0x0005 12e2 049c 0003 | | .CONST 0x049c,0x0003 12e4 04a3 0004 | | .CONST 0x04a3,0x0004 12e6 ; -------------------------------------------------------------------------------------- 12e6 ; Debug3 Subtable 0x1a 12e6 ; -------------------------------------------------------------------------------------- 12e6 0001 0007 | | .DBG3TAB 0x0001,0x0007 12e8 04b3 ffff | | .CONST 0x04b3,0xffff 12ea 04b4 0001 | | .CONST 0x04b4,0x0001 12ec 04b9 0002 | | .CONST 0x04b9,0x0002 12ee 04c2 0007 | | .CONST 0x04c2,0x0007 12f0 04c4 0003 | | .CONST 0x04c4,0x0003 12f2 04c6 0004 | | .CONST 0x04c6,0x0004 12f4 04cf 0006 | | .CONST 0x04cf,0x0006 12f6 04d1 0005 | | .CONST 0x04d1,0x0005 12f8 ; -------------------------------------------------------------------------------------- 12f8 ; Debug3 Subtable 0x1b 12f8 ; -------------------------------------------------------------------------------------- 12f8 0003 0013 | | .DBG3TAB 0x0003,0x0013 12fa 04db ffff | | .CONST 0x04db,0xffff 12fc 04dc fffe | | .CONST 0x04dc,0xfffe 12fe 04dd fffd | | .CONST 0x04dd,0xfffd 1300 04de 0001 | | .CONST 0x04de,0x0001 1302 04e3 0002 | | .CONST 0x04e3,0x0002 1304 04f6 0012 | | .CONST 0x04f6,0x0012 1306 04fc 0013 | | .CONST 0x04fc,0x0013 1308 04ff 0003 | | .CONST 0x04ff,0x0003 130a 0503 0004 | | .CONST 0x0503,0x0004 130c 050a 0005 | | .CONST 0x050a,0x0005 130e 0512 0006 | | .CONST 0x0512,0x0006 1310 0515 0007 | | .CONST 0x0515,0x0007 1312 051a 0008 | | .CONST 0x051a,0x0008 1314 051e 0009 | | .CONST 0x051e,0x0009 1316 0525 000a | % | .CONST 0x0525,0x000a 1318 052d 000b | - | .CONST 0x052d,0x000b 131a 0530 000c | 0 | .CONST 0x0530,0x000c 131c 0535 000d | 5 | .CONST 0x0535,0x000d 131e 0538 000e | 8 | .CONST 0x0538,0x000e 1320 053f 000f | ? | .CONST 0x053f,0x000f 1322 0542 0010 | B | .CONST 0x0542,0x0010 1324 0548 0011 | H | .CONST 0x0548,0x0011 1326 ; -------------------------------------------------------------------------------------- 1326 ; Debug3 Subtable 0x1c 1326 ; -------------------------------------------------------------------------------------- 1326 0002 0011 | | .DBG3TAB 0x0002,0x0011 1328 0553 ffff | S | .CONST 0x0553,0xffff 132a 0554 fffe | T | .CONST 0x0554,0xfffe 132c 0555 0001 | U | .CONST 0x0555,0x0001 132e 055a 0002 | Z | .CONST 0x055a,0x0002 1330 056d 000b | m | .CONST 0x056d,0x000b 1332 0573 000c | s | .CONST 0x0573,0x000c 1334 0576 0003 | v | .CONST 0x0576,0x0003 1336 057c 0004 | | | .CONST 0x057c,0x0004 1338 0583 0005 | | .CONST 0x0583,0x0005 133a 058b 0006 | | .CONST 0x058b,0x0006 133c 058e 0007 | | .CONST 0x058e,0x0007 133e 0595 0008 | | .CONST 0x0595,0x0008 1340 059b 0009 | | .CONST 0x059b,0x0009 1342 05a1 000a | | .CONST 0x05a1,0x000a 1344 05a5 000d | | .CONST 0x05a5,0x000d 1346 05a9 000e | | .CONST 0x05a9,0x000e 1348 05ac 000f | | .CONST 0x05ac,0x000f 134a 05b0 0010 | | .CONST 0x05b0,0x0010 134c 05b3 0011 | | .CONST 0x05b3,0x0011 134e ; -------------------------------------------------------------------------------------- 134e ; Debug3 Subtable 0x1d 134e ; -------------------------------------------------------------------------------------- 134e 0001 0002 | | .DBG3TAB 0x0001,0x0002 1350 05bb ffff | | .CONST 0x05bb,0xffff 1352 05bc 0001 | | .CONST 0x05bc,0x0001 1354 05c1 0002 | | .CONST 0x05c1,0x0002 1356 ; -------------------------------------------------------------------------------------- 1356 ; Debug3 Subtable 0x1e 1356 ; -------------------------------------------------------------------------------------- 1356 0001 0002 | | .DBG3TAB 0x0001,0x0002 1358 05d3 ffff | | .CONST 0x05d3,0xffff 135a 05d4 0001 | | .CONST 0x05d4,0x0001 135c 05d9 0002 | | .CONST 0x05d9,0x0002 135e ; -------------------------------------------------------------------------------------- 135e ; Debug3 Subtable 0x1f 135e ; -------------------------------------------------------------------------------------- 135e 0001 0002 | | .DBG3TAB 0x0001,0x0002 1360 05eb ffff | | .CONST 0x05eb,0xffff 1362 05ec 0001 | | .CONST 0x05ec,0x0001 1364 05f1 0002 | | .CONST 0x05f1,0x0002 1366 ; -------------------------------------------------------------------------------------- 1366 ; Debug3 Subtable 0x20 1366 ; -------------------------------------------------------------------------------------- 1366 0000 0000 | | .DBG3TAB 0x0000,0x0000 1368 ; -------------------------------------------------------------------------------------- 1368 ; Debug3 Subtable 0x21 1368 ; -------------------------------------------------------------------------------------- 1368 0001 000d | | .DBG3TAB 0x0001,0x000d 136a 0613 ffff | | .CONST 0x0613,0xffff 136c 0617 0001 | | .CONST 0x0617,0x0001 136e 0626 000d | & | .CONST 0x0626,0x000d 1370 0628 0002 | ( | .CONST 0x0628,0x0002 1372 062e 0003 | . | .CONST 0x062e,0x0003 1374 0632 0004 | 2 | .CONST 0x0632,0x0004 1376 0634 0005 | 4 | .CONST 0x0634,0x0005 1378 0636 0006 | 6 | .CONST 0x0636,0x0006 137a 0638 0007 | 8 | .CONST 0x0638,0x0007 137c 063a 0008 | : | .CONST 0x063a,0x0008 137e 063e 0009 | > | .CONST 0x063e,0x0009 1380 0640 000a | @ | .CONST 0x0640,0x000a 1382 0642 000b | B | .CONST 0x0642,0x000b 1384 0644 000c | D | .CONST 0x0644,0x000c 1386 ; -------------------------------------------------------------------------------------- 1386 ; Debug3 Subtable 0x22 1386 ; -------------------------------------------------------------------------------------- 1386 0002 0009 | | .DBG3TAB 0x0002,0x0009 1388 064b ffff | K | .CONST 0x064b,0xffff 138a 064c fffe | L | .CONST 0x064c,0xfffe 138c 064d 0001 | M | .CONST 0x064d,0x0001 138e 0652 0002 | R | .CONST 0x0652,0x0002 1390 065b 0005 | [ | .CONST 0x065b,0x0005 1392 065f 0003 | _ | .CONST 0x065f,0x0003 1394 0664 0004 | d | .CONST 0x0664,0x0004 1396 0669 0006 | i | .CONST 0x0669,0x0006 1398 0672 0008 | r | .CONST 0x0672,0x0008 139a 0678 0009 | x | .CONST 0x0678,0x0009 139c 067b 0007 | { | .CONST 0x067b,0x0007 139e ; -------------------------------------------------------------------------------------- 139e ; Debug3 Subtable 0x23 139e ; -------------------------------------------------------------------------------------- 139e 0002 0009 | | .DBG3TAB 0x0002,0x0009 13a0 068b ffff | | .CONST 0x068b,0xffff 13a2 068c fffe | | .CONST 0x068c,0xfffe 13a4 068d 0001 | | .CONST 0x068d,0x0001 13a6 0692 0002 | | .CONST 0x0692,0x0002 13a8 069b 0005 | | .CONST 0x069b,0x0005 13aa 069f 0003 | | .CONST 0x069f,0x0003 13ac 06a4 0004 | | .CONST 0x06a4,0x0004 13ae 06a9 0006 | | .CONST 0x06a9,0x0006 13b0 06ae 0007 | | .CONST 0x06ae,0x0007 13b2 06b3 0008 | | .CONST 0x06b3,0x0008 13b4 06b9 0009 | | .CONST 0x06b9,0x0009 13b6 ; -------------------------------------------------------------------------------------- 13b6 ; Debug3 Subtable 0x24 13b6 ; -------------------------------------------------------------------------------------- 13b6 0001 0005 | | .DBG3TAB 0x0001,0x0005 13b8 06c3 ffff | | .CONST 0x06c3,0xffff 13ba 06c4 0001 | | .CONST 0x06c4,0x0001 13bc 06c9 0002 | | .CONST 0x06c9,0x0002 13be 06d0 0004 | | .CONST 0x06d0,0x0004 13c0 06d6 0005 | | .CONST 0x06d6,0x0005 13c2 06d9 0003 | | .CONST 0x06d9,0x0003 13c4 ; -------------------------------------------------------------------------------------- 13c4 ; Debug3 Subtable 0x25 13c4 ; -------------------------------------------------------------------------------------- 13c4 0001 0002 | | .DBG3TAB 0x0001,0x0002 13c6 06e3 ffff | | .CONST 0x06e3,0xffff 13c8 06e4 0001 | | .CONST 0x06e4,0x0001 13ca 06e9 0002 | | .CONST 0x06e9,0x0002 13cc ; -------------------------------------------------------------------------------------- 13cc ; Debug3 Subtable 0x26 13cc ; -------------------------------------------------------------------------------------- 13cc 0001 0002 | | .DBG3TAB 0x0001,0x0002 13ce 06f3 ffff | | .CONST 0x06f3,0xffff 13d0 06f4 0001 | | .CONST 0x06f4,0x0001 13d2 06f9 0002 | | .CONST 0x06f9,0x0002 13d4 ; -------------------------------------------------------------------------------------- 13d4 ; Debug3 Subtable 0x27 13d4 ; -------------------------------------------------------------------------------------- 13d4 0000 0000 | | .DBG3TAB 0x0000,0x0000 13d6 ; -------------------------------------------------------------------------------------- 13d6 ; Debug3 Subtable 0x28 13d6 ; -------------------------------------------------------------------------------------- 13d6 0001 0010 | | .DBG3TAB 0x0001,0x0010 13d8 071b ffff | | .CONST 0x071b,0xffff 13da 071c 0001 | | .CONST 0x071c,0x0001 13dc 0721 0002 | ! | .CONST 0x0721,0x0002 13de 0728 0003 | ( | .CONST 0x0728,0x0003 13e0 072a 0004 | * | .CONST 0x072a,0x0004 13e2 0735 0010 | 5 | .CONST 0x0735,0x0010 13e4 0737 0005 | 7 | .CONST 0x0737,0x0005 13e6 0739 0006 | 9 | .CONST 0x0739,0x0006 13e8 074c 000e | L | .CONST 0x074c,0x000e 13ea 074e 0007 | N | .CONST 0x074e,0x0007 13ec 0750 0008 | P | .CONST 0x0750,0x0008 13ee 0752 0009 | R | .CONST 0x0752,0x0009 13f0 0754 000a | T | .CONST 0x0754,0x000a 13f2 0756 000b | V | .CONST 0x0756,0x000b 13f4 0758 000c | X | .CONST 0x0758,0x000c 13f6 075a 000d | Z | .CONST 0x075a,0x000d 13f8 075c 000f | \ | .CONST 0x075c,0x000f 13fa ; -------------------------------------------------------------------------------------- 13fa ; Debug3 Subtable 0x29 13fa ; -------------------------------------------------------------------------------------- 13fa 0001 0005 | | .DBG3TAB 0x0001,0x0005 13fc 0763 ffff | c | .CONST 0x0763,0xffff 13fe 0764 0001 | d | .CONST 0x0764,0x0001 1400 0769 0002 | i | .CONST 0x0769,0x0002 1402 076e 0003 | n | .CONST 0x076e,0x0003 1404 0777 0004 | w | .CONST 0x0777,0x0004 1406 077d 0005 | } | .CONST 0x077d,0x0005 1408 ; -------------------------------------------------------------------------------------- 1408 ; Debug3 Subtable 0x2a 1408 ; -------------------------------------------------------------------------------------- 1408 0000 0000 | | .DBG3TAB 0x0000,0x0000 140a ; -------------------------------------------------------------------------------------- 140a ; Debug3 Subtable 0x2b 140a ; -------------------------------------------------------------------------------------- 140a 0001 0007 | | .DBG3TAB 0x0001,0x0007 140c 079b ffff | | .CONST 0x079b,0xffff 140e 079c 0001 | | .CONST 0x079c,0x0001 1410 07a1 0002 | | .CONST 0x07a1,0x0002 1412 07a6 0003 | | .CONST 0x07a6,0x0003 1414 07af 0006 | | .CONST 0x07af,0x0006 1416 07b1 0004 | | .CONST 0x07b1,0x0004 1418 07b3 0005 | | .CONST 0x07b3,0x0005 141a 07b5 0007 | | .CONST 0x07b5,0x0007 141c ; -------------------------------------------------------------------------------------- 141c ; Debug3 Subtable 0x2c 141c ; -------------------------------------------------------------------------------------- 141c 0002 000b | | .DBG3TAB 0x0002,0x000b 141e 07bb ffff | | .CONST 0x07bb,0xffff 1420 07bc fffe | | .CONST 0x07bc,0xfffe 1422 07bd 0001 | | .CONST 0x07bd,0x0001 1424 07c2 0002 | | .CONST 0x07c2,0x0002 1426 07c7 0003 | | .CONST 0x07c7,0x0003 1428 07cb 0004 | | .CONST 0x07cb,0x0004 142a 07d2 0009 | | .CONST 0x07d2,0x0009 142c 07d5 0005 | | .CONST 0x07d5,0x0005 142e 07db 0006 | | .CONST 0x07db,0x0006 1430 07de 0007 | | .CONST 0x07de,0x0007 1432 07e4 0008 | | .CONST 0x07e4,0x0008 1434 07e7 000a | | .CONST 0x07e7,0x000a 1436 07ed 000b | | .CONST 0x07ed,0x000b 1438 ; -------------------------------------------------------------------------------------- 1438 ; Debug3 Subtable 0x2d 1438 ; -------------------------------------------------------------------------------------- 1438 0001 0005 | | .DBG3TAB 0x0001,0x0005 143a 07f3 ffff | | .CONST 0x07f3,0xffff 143c 07f4 0001 | | .CONST 0x07f4,0x0001 143e 07f9 0002 | | .CONST 0x07f9,0x0002 1440 0800 0005 | | .CONST 0x0800,0x0005 1442 0802 0003 | | .CONST 0x0802,0x0003 1444 0809 0004 | | .CONST 0x0809,0x0004 1446 ; -------------------------------------------------------------------------------------- 1446 ; Debug3 Subtable 0x2e 1446 ; -------------------------------------------------------------------------------------- 1446 0002 000a | | .DBG3TAB 0x0002,0x000a 1448 0813 ffff | | .CONST 0x0813,0xffff 144a 0814 fffe | | .CONST 0x0814,0xfffe 144c 0815 0001 | | .CONST 0x0815,0x0001 144e 081a 0002 | | .CONST 0x081a,0x0002 1450 0821 0005 | ! | .CONST 0x0821,0x0005 1452 0827 0006 | ' | .CONST 0x0827,0x0006 1454 082a 0003 | * | .CONST 0x082a,0x0003 1456 082f 0004 | / | .CONST 0x082f,0x0004 1458 0834 0007 | 4 | .CONST 0x0834,0x0007 145a 0839 0008 | 9 | .CONST 0x0839,0x0008 145c 0842 0009 | B | .CONST 0x0842,0x0009 145e 0848 000a | H | .CONST 0x0848,0x000a 1460 ; -------------------------------------------------------------------------------------- 1460 ; Debug3 Subtable 0x2f 1460 ; -------------------------------------------------------------------------------------- 1460 0002 000a | | .DBG3TAB 0x0002,0x000a 1462 0853 ffff | S | .CONST 0x0853,0xffff 1464 0854 fffe | T | .CONST 0x0854,0xfffe 1466 0855 0001 | U | .CONST 0x0855,0x0001 1468 085a 0002 | Z | .CONST 0x085a,0x0002 146a 0861 0008 | a | .CONST 0x0861,0x0008 146c 0862 0003 | b | .CONST 0x0862,0x0003 146e 0866 0004 | f | .CONST 0x0866,0x0004 1470 0869 0005 | i | .CONST 0x0869,0x0005 1472 086d 0006 | m | .CONST 0x086d,0x0006 1474 0872 0007 | r | .CONST 0x0872,0x0007 1476 0876 0009 | v | .CONST 0x0876,0x0009 1478 087c 000a | | | .CONST 0x087c,0x000a 147a ; -------------------------------------------------------------------------------------- 147a ; Debug3 Subtable 0x30 147a ; -------------------------------------------------------------------------------------- 147a 0001 000a | | .DBG3TAB 0x0001,0x000a 147c 0883 ffff | | .CONST 0x0883,0xffff 147e 0884 0001 | | .CONST 0x0884,0x0001 1480 0889 0002 | | .CONST 0x0889,0x0002 1482 0890 0008 | | .CONST 0x0890,0x0008 1484 0896 0009 | | .CONST 0x0896,0x0009 1486 0899 0003 | | .CONST 0x0899,0x0003 1488 089e 0004 | | .CONST 0x089e,0x0004 148a 08a2 0005 | | .CONST 0x08a2,0x0005 148c 08a7 0006 | | .CONST 0x08a7,0x0006 148e 08ad 0007 | | .CONST 0x08ad,0x0007 1490 08b1 000a | | .CONST 0x08b1,0x000a 1492 ; -------------------------------------------------------------------------------------- 1492 ; Debug3 Subtable 0x31 1492 ; -------------------------------------------------------------------------------------- 1492 0001 0002 | | .DBG3TAB 0x0001,0x0002 1494 08c3 ffff | | .CONST 0x08c3,0xffff 1496 08c4 0001 | | .CONST 0x08c4,0x0001 1498 08c9 0002 | | .CONST 0x08c9,0x0002 149a ; -------------------------------------------------------------------------------------- 149a ; Debug3 Subtable 0x32 149a ; -------------------------------------------------------------------------------------- 149a 0002 0007 | | .DBG3TAB 0x0002,0x0007 149c 08d3 ffff | | .CONST 0x08d3,0xffff 149e 08d4 fffe | | .CONST 0x08d4,0xfffe 14a0 08d5 0001 | | .CONST 0x08d5,0x0001 14a2 08da 0002 | | .CONST 0x08da,0x0002 14a4 08df 0003 | | .CONST 0x08df,0x0003 14a6 08e3 0004 | | .CONST 0x08e3,0x0004 14a8 08e8 0005 | | .CONST 0x08e8,0x0005 14aa 08ed 0006 | | .CONST 0x08ed,0x0006 14ac 08f3 0007 | | .CONST 0x08f3,0x0007 14ae ; -------------------------------------------------------------------------------------- 14ae ; Debug3 Subtable 0x33 14ae ; -------------------------------------------------------------------------------------- 14ae 0001 0007 | | .DBG3TAB 0x0001,0x0007 14b0 08fb ffff | | .CONST 0x08fb,0xffff 14b2 08fc 0001 | | .CONST 0x08fc,0x0001 14b4 0901 0002 | | .CONST 0x0901,0x0002 14b6 090a 0005 | | .CONST 0x090a,0x0005 14b8 090b 0003 | | .CONST 0x090b,0x0003 14ba 0912 0004 | | .CONST 0x0912,0x0004 14bc 0919 0006 | | .CONST 0x0919,0x0006 14be 091f 0007 | | .CONST 0x091f,0x0007 14c0 ; -------------------------------------------------------------------------------------- 14c0 ; Debug3 Subtable 0x34 14c0 ; -------------------------------------------------------------------------------------- 14c0 0000 0003 | | .DBG3TAB 0x0000,0x0003 14c2 092b 0001 | + | .CONST 0x092b,0x0001 14c4 0931 0002 | 1 | .CONST 0x0931,0x0002 14c6 093d 0003 | = | .CONST 0x093d,0x0003 14c8 ; -------------------------------------------------------------------------------------- 14c8 ; Debug3 Subtable 0x35 14c8 ; -------------------------------------------------------------------------------------- 14c8 0001 000a | | .DBG3TAB 0x0001,0x000a 14ca 094b ffff | K | .CONST 0x094b,0xffff 14cc 094f 0001 | O | .CONST 0x094f,0x0001 14ce 0979 0007 | y | .CONST 0x0979,0x0007 14d0 097d 0008 | } | .CONST 0x097d,0x0008 14d2 097f 0009 | | .CONST 0x097f,0x0009 14d4 0985 000a | | .CONST 0x0985,0x000a 14d6 0988 0002 | | .CONST 0x0988,0x0002 14d8 098c 0003 | | .CONST 0x098c,0x0003 14da 0990 0004 | | .CONST 0x0990,0x0004 14dc 0994 0005 | | .CONST 0x0994,0x0005 14de 0996 0006 | | .CONST 0x0996,0x0006 14e0 ; -------------------------------------------------------------------------------------- 14e0 ; Debug3 Subtable 0x36 14e0 ; -------------------------------------------------------------------------------------- 14e0 0002 0010 | | .DBG3TAB 0x0002,0x0010 14e2 099b ffff | | .CONST 0x099b,0xffff 14e4 099c fffe | | .CONST 0x099c,0xfffe 14e6 099d 0001 | | .CONST 0x099d,0x0001 14e8 09a6 0002 | | .CONST 0x09a6,0x0002 14ea 09aa 0003 | | .CONST 0x09aa,0x0003 14ec 09af 0004 | | .CONST 0x09af,0x0004 14ee 09b4 0005 | | .CONST 0x09b4,0x0005 14f0 09b7 0006 | | .CONST 0x09b7,0x0006 14f2 09ba 0007 | | .CONST 0x09ba,0x0007 14f4 09bb 0008 | | .CONST 0x09bb,0x0008 14f6 09c2 000b | | .CONST 0x09c2,0x000b 14f8 09c8 000c | | .CONST 0x09c8,0x000c 14fa 09ca 000d | | .CONST 0x09ca,0x000d 14fc 09cc 000e | | .CONST 0x09cc,0x000e 14fe 09d2 000f | | .CONST 0x09d2,0x000f 1500 09d5 0010 | | .CONST 0x09d5,0x0010 1502 09d8 0009 | | .CONST 0x09d8,0x0009 1504 09dd 000a | | .CONST 0x09dd,0x000a 1506 ; -------------------------------------------------------------------------------------- 1506 ; Debug3 Subtable 0x37 1506 ; -------------------------------------------------------------------------------------- 1506 0002 000f | | .DBG3TAB 0x0002,0x000f 1508 09eb ffff | | .CONST 0x09eb,0xffff 150a 09ec fffe | | .CONST 0x09ec,0xfffe 150c 09ed 0001 | | .CONST 0x09ed,0x0001 150e 09f4 000d | | .CONST 0x09f4,0x000d 1510 09f5 0002 | | .CONST 0x09f5,0x0002 1512 09f9 0003 | | .CONST 0x09f9,0x0003 1514 0a02 0009 | | .CONST 0x0a02,0x0009 1516 0a04 0004 | | .CONST 0x0a04,0x0004 1518 0a06 0005 | | .CONST 0x0a06,0x0005 151a 0a0b 0006 | | .CONST 0x0a0b,0x0006 151c 0a0f 0007 | | .CONST 0x0a0f,0x0007 151e 0a12 0008 | | .CONST 0x0a12,0x0008 1520 0a17 000a | | .CONST 0x0a17,0x000a 1522 0a1b 000b | | .CONST 0x0a1b,0x000b 1524 0a20 000c | | .CONST 0x0a20,0x000c 1526 0a23 000e | # | .CONST 0x0a23,0x000e 1528 0a29 000f | ) | .CONST 0x0a29,0x000f 152a ; -------------------------------------------------------------------------------------- 152a ; Debug3 Subtable 0x38 152a ; -------------------------------------------------------------------------------------- 152a 0003 000d | | .DBG3TAB 0x0003,0x000d 152c 0a33 ffff | 3 | .CONST 0x0a33,0xffff 152e 0a34 fffe | 4 | .CONST 0x0a34,0xfffe 1530 0a35 fffd | 5 | .CONST 0x0a35,0xfffd 1532 0a36 0001 | 6 | .CONST 0x0a36,0x0001 1534 0a3c 0002 | < | .CONST 0x0a3c,0x0002 1536 0a40 0003 | @ | .CONST 0x0a40,0x0003 1538 0a47 000b | G | .CONST 0x0a47,0x000b 153a 0a49 0004 | I | .CONST 0x0a49,0x0004 153c 0a4c 0005 | L | .CONST 0x0a4c,0x0005 153e 0a51 0006 | Q | .CONST 0x0a51,0x0006 1540 0a5a 000a | Z | .CONST 0x0a5a,0x000a 1542 0a5c 0007 | \ | .CONST 0x0a5c,0x0007 1544 0a62 0008 | b | .CONST 0x0a62,0x0008 1546 0a67 0009 | g | .CONST 0x0a67,0x0009 1548 0a6a 000c | j | .CONST 0x0a6a,0x000c 154a 0a72 000d | r | .CONST 0x0a72,0x000d 154c 0000 0000 | | .BLANK 0000[0xb4]