|
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: 6144 (0x1800) Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0728 | ( | .CONST 0x0728 ; 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 0005 | | .CONST 0x0005 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 00e5 | | .CONST 0x00e5 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0032 | 2 | .CONST 0x0032 ; Number of locals 000b INIT_0008: 000b 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible ; Debug Table 0x0 = .DEBUG 0x000b,0x0862,0x8000,0x0000,0x0057,0x3535,0x0000,0x0007 ; Debug Table 0x0.0x0 = 0xb,0xffff 000c 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible ; Debug Table 0x0.0x1 = 0xc,0xfffe 000d 00c4 | | Action Make_Default ; Debug Table 0x0.0x2 = 0xd,0xfffd 000e 03a6 | | Declare_Type Heap_Access,Indirect_Literal,Visible,Values_Relative ; Debug Table 0x0.0x3 = 0xe,0xfffc 000f 029a 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0xf,0xfffb 0011 029a 00fb | | Declare_Subprogram INIT_00f8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x11,0xfffa 0013 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x13,0xfff9 0015 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible ; Debug Table 0x0.0x7 = 0x15,0xfff8 0016 00c4 | | Action Make_Default ; Debug Table 0x0.0x8 = 0x16,0xfff7 0017 029a 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x17,0xfff6 0019 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xa = 0x19,0xfff5 001b 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xb = 0x1b,0xfff4 001d 0007 | | Action Break_Optional ; Debug Table 0x0.0xc = 0x1d,0xfff3 001e 029a 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xd = 0x1e,0xfff2 0020 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xe = 0x20,0xfff1 0022 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xf = 0x22,0xfff0 0024 0007 | | Action Break_Optional ; Debug Table 0x0.0x10 = 0x24,0xffef 0025 029a 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x11 = 0x25,0xffee 0027 029a 01f3 | | Declare_Subprogram INIT_01f0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x12 = 0x27,0xffed 0029 029a 0203 | | Declare_Subprogram INIT_0200,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x13 = 0x29,0xffec 002b 029a 0213 | | Declare_Subprogram INIT_0210,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x14 = 0x2b,0xffeb 002d 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x0.0x15 = 0x2d,0xffea 002e 00e1 | | Load_Encached Boolean_Cache 002f 4802 |H | Short_Literal 0x2 0030 4802 |H | Short_Literal 0x2 0031 4802 |H | Short_Literal 0x2 0032 4806 |H | Short_Literal 0x6 0033 0318 | | Declare_Type Variant_Record,Incomplete 0034 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x16 = 0x34,0xffe9 0035 02a0 | | Declare_Subprogram Null_Subprogram 0036 03ad | | Declare_Type Heap_Access,Defined 0037 03a5 | | Declare_Type Heap_Access,Indirect_Literal,Values_Relative ; Debug Table 0x0.0x17 = 0x37,0xffe8 0038 00d9 | | Load_Top At_Offset_1 0039 00d9 | | Load_Top At_Offset_1 003a 03a2 | | Complete_Type Heap_Access,By_Renaming 003b 03a5 | | Declare_Type Heap_Access,Indirect_Literal,Values_Relative ; Debug Table 0x0.0x18 = 0x3b,0xffe7 003c 00e9 | | Load_Encached String_Cache 003d 02a0 | | Declare_Subprogram Null_Subprogram 003e 00da | | Load_Top At_Offset_2 003f 03a3 | | Complete_Type Heap_Access,By_Defining 0040 0007 | | Action Break_Optional ; Debug Table 0x0.0x19 = 0x40,0xffe6 0041 0007 | | Action Break_Optional ; Debug Table 0x0.0x1a = 0x41,0xffe5 0042 0007 | | Action Break_Optional ; Debug Table 0x0.0x1b = 0x42,0xffe4 0043 0007 | | Action Break_Optional ; Debug Table 0x0.0x1c = 0x43,0xffe3 0044 00e5 | | Load_Encached Long_Integer_Cache ; Debug Table 0x0.0x1d = 0x44,0xffe2 0045 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x0.0x1e = 0x45,0xffe1 0046 00db | | Load_Top At_Offset_3 0047 4801 |H | Short_Literal 0x1 0048 4800 |H | Short_Literal 0x0 0049 e001 | | Load 0x0,0x1 004a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 004b 00e7 | | Load_Encached Duration_Cache 004c e224 | $ | Load 0x1,0x24 004d 4802 |H | Short_Literal 0x2 004e 00e1 | | Load_Encached Boolean_Cache 004f e222 | " | Load 0x1,0x22 0050 02a0 | | Declare_Subprogram Null_Subprogram 0051 4802 |H | Short_Literal 0x2 0052 4803 |H | Short_Literal 0x3 0053 4801 |H | Short_Literal 0x1 0054 4800 |H | Short_Literal 0x0 0055 4800 |H | Short_Literal 0x0 0056 031d | | Declare_Type Variant_Record,Defined 0057 4801 |H | Short_Literal 0x1 0058 4800 |H | Short_Literal 0x0 0059 00e3 | | Load_Encached Natural_Cache 005a 4802 |H | Short_Literal 0x2 005b 00e1 | | Load_Encached Boolean_Cache 005c e222 | " | Load 0x1,0x22 005d 02a0 | | Declare_Subprogram Null_Subprogram 005e 4802 |H | Short_Literal 0x2 005f 4801 |H | Short_Literal 0x1 0060 4801 |H | Short_Literal 0x1 0061 4800 |H | Short_Literal 0x0 0062 4800 |H | Short_Literal 0x0 0063 031d | | Declare_Type Variant_Record,Defined 0064 029f 025b | [| Declare_Subprogram INIT_0258,For_Call 0066 4802 |H | Short_Literal 0x2 0067 4800 |H | Short_Literal 0x0 0068 4802 |H | Short_Literal 0x2 0069 e220 | | Load 0x1,0x20 006a 0307 | | Complete_Type Variant_Record,By_Defining 006b 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x1f = 0x6b,0xffe0 006c 4800 |H | Short_Literal 0x0 006d e221 | ! | Load 0x1,0x21 006e 021a | | Execute Heap_Access,Element_Type 006f 1c07 | | Execute_Immediate Run_Utility,0x7 0070 e221 | ! | Load 0x1,0x21 0071 e20d | | Load 0x1,0xd 0072 03a1 | | Complete_Type Heap_Access,By_Constraining 0073 4801 |H | Short_Literal 0x1 ; Debug Table 0x0.0x20 = 0x73,0xffdf 0074 4800 |H | Short_Literal 0x0 0075 e221 | ! | Load 0x1,0x21 0076 021a | | Execute Heap_Access,Element_Type 0077 1c07 | | Execute_Immediate Run_Utility,0x7 0078 e221 | ! | Load 0x1,0x21 0079 e20e | | Load 0x1,0xe 007a 03a1 | | Complete_Type Heap_Access,By_Constraining 007b 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0x21 = 0x7b,0xffde 007c 4801 |H | Short_Literal 0x1 007d e221 | ! | Load 0x1,0x21 007e 021a | | Execute Heap_Access,Element_Type 007f 1c07 | | Execute_Immediate Run_Utility,0x7 0080 e221 | ! | Load 0x1,0x21 0081 e214 | | Load 0x1,0x14 0082 03a1 | | Complete_Type Heap_Access,By_Constraining 0083 e20d | | Load 0x1,0xd ; Debug Table 0x0.0x22 = 0x83,0xffdd 0084 039e | | Declare_Variable Heap_Access,Visible 0085 c20f | | Store 0x1,0xf 0086 e214 | | Load 0x1,0x14 ; Debug Table 0x0.0x23 = 0x86,0xffdc 0087 039e | | Declare_Variable Heap_Access,Visible 0088 c215 | | Store 0x1,0x15 0089 4803 |H | Short_Literal 0x3 ; Debug Table 0x0.0x24 = 0x89,0xffdb 008a 032a | * | Declare_Type Record,Incomplete 008b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x25 = 0x8b,0xffda 008c 02a0 | | Declare_Subprogram Null_Subprogram 008d e210 | | Load 0x1,0x10 008e 03a3 | | Complete_Type Heap_Access,By_Defining 008f 0007 | | Action Break_Optional ; Debug Table 0x0.0x26 = 0x8f,0xffd9 0090 00bf | | Action Accept_Activation ; Debug Table 0x0.0x27 = 0x90,0xffd8 0091 627e |b~ | Indirect_Literal Discrete,0x310,{0x00000000, 0x00573825} ; Debug Table 0x1 = .DEBUG 0x0091,0x08b4,0x8000,0x0000,0x0057,0x3825,0x0000,0x000b ; Debug Table 0x1.0x0 = 0x91,0xffff 0092 480c |H | Short_Literal 0xc 0093 4835 |H5 | Short_Literal 0x35 0094 e222 | " | Load 0x1,0x22 0095 e002 | | Load 0x0,0x2 0096 0387 | | Declare_Variable Package 0097 00d8 | | Load_Top At_Offset_0 0098 020f | | Execute Module,Activate 0099 6276 |bv | Indirect_Literal Discrete,0x310,{0x00000000, 0x00573825} ; Debug Table 0x1.0x1 = 0x99,0xfffe 009a 4817 |H | Short_Literal 0x17 009b 00e7 | | Load_Encached Duration_Cache 009c e003 | | Load 0x0,0x3 009d 1b52 | R | Execute Package,Field_Read,Field_Number 0x52 009e 0387 | | Declare_Variable Package 009f 00d8 | | Load_Top At_Offset_0 00a0 020f | | Execute Module,Activate 00a1 4801 |H | Short_Literal 0x1 ; Debug Table 0x1.0x2 = 0xa1,0xfffd 00a2 4801 |H | Short_Literal 0x1 00a3 e222 | " | Load 0x1,0x22 00a4 021a | | Execute Heap_Access,Element_Type 00a5 1c07 | | Execute_Immediate Run_Utility,0x7 00a6 e222 | " | Load 0x1,0x22 00a7 03ab | | Declare_Type Heap_Access,Constrained 00a8 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0x3 = 0xa8,0xfffc 00a9 4800 |H | Short_Literal 0x0 00aa e220 | | Load 0x1,0x20 00ab 1c07 | | Execute_Immediate Run_Utility,0x7 00ac 4801 |H | Short_Literal 0x1 ; Debug Table 0x1.0x4 = 0xac,0xfffb 00ad 4800 |H | Short_Literal 0x0 00ae e220 | | Load 0x1,0x20 00af 1c07 | | Execute_Immediate Run_Utility,0x7 00b0 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0x5 = 0xb0,0xfffa 00b1 4801 |H | Short_Literal 0x1 00b2 e220 | | Load 0x1,0x20 00b3 1c07 | | Execute_Immediate Run_Utility,0x7 00b4 4801 |H | Short_Literal 0x1 ; Debug Table 0x1.0x6 = 0xb4,0xfff9 00b5 4801 |H | Short_Literal 0x1 00b6 e220 | | Load 0x1,0x20 00b7 1c07 | | Execute_Immediate Run_Utility,0x7 00b8 e226 | & | Load 0x1,0x26 ; Debug Table 0x1.0x7 = 0xb8,0xfff8 00b9 1b12 | | Execute Package,Field_Read,Field_Number 0x12 00ba e20d | | Load 0x1,0xd 00bb e214 | | Load 0x1,0x14 00bc 02a0 | | Declare_Subprogram Null_Subprogram 00bd e225 | % | Load 0x1,0x25 00be 0326 | & | Complete_Type Record,By_Defining 00bf 029d 0303 | | Declare_Subprogram INIT_0300,For_Outer_Call ; Debug Table 0x1.0x8 = 0xbf,0xfff7 00c1 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0x9 = 0xc1,0xfff6 00c2 00c7 | | Action Elaborate_Subprogram 00c3 029d 031b | | Declare_Subprogram INIT_0318,For_Outer_Call ; Debug Table 0x1.0xa = 0xc3,0xfff5 00c5 029d 0343 | C| Declare_Subprogram INIT_0340,For_Outer_Call ; Debug Table 0x1.0xb = 0xc5,0xfff4 00c7 029d 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call ; Debug Table 0x1.0xc = 0xc7,0xfff3 00c9 029d 0393 | | Declare_Subprogram INIT_0390,For_Outer_Call ; Debug Table 0x1.0xd = 0xc9,0xfff2 00cb 1d1b | | Execute_Immediate Reference_Lex_1,0x1b ; Debug Table 0x1.0xe = 0xcb,0xfff1 00cc 00c7 | | Action Elaborate_Subprogram 00cd 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1.0xf = 0xcd,0xfff0 00ce 00c7 | | Action Elaborate_Subprogram 00cf 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0x10 = 0xcf,0xffef 00d0 00c7 | | Action Elaborate_Subprogram 00d1 029d 03ab | | Declare_Subprogram INIT_03a8,For_Outer_Call ; Debug Table 0x1.0x11 = 0xd1,0xffee 00d3 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x12 = 0xd3,0xffed 00d4 00c7 | | Action Elaborate_Subprogram 00d5 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x13 = 0xd5,0xffec 00d6 00c7 | | Action Elaborate_Subprogram 00d7 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x14 = 0xd7,0xffeb 00d8 00c7 | | Action Elaborate_Subprogram 00d9 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x15 = 0xd9,0xffea 00da 00c7 | | Action Elaborate_Subprogram 00db 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0x16 = 0xdb,0xffe9 00dc 00c7 | | Action Elaborate_Subprogram 00dd 1d1c | | Execute_Immediate Reference_Lex_1,0x1c ; Debug Table 0x1.0x17 = 0xdd,0xffe8 00de 00c7 | | Action Elaborate_Subprogram 00df 1d1d | | Execute_Immediate Reference_Lex_1,0x1d ; Debug Table 0x1.0x18 = 0xdf,0xffe7 00e0 00c7 | | Action Elaborate_Subprogram 00e1 1d1e | | Execute_Immediate Reference_Lex_1,0x1e ; Debug Table 0x1.0x19 = 0xe1,0xffe6 00e2 00c7 | | Action Elaborate_Subprogram 00e3 1d1f | | Execute_Immediate Reference_Lex_1,0x1f ; Debug Table 0x1.0x1a = 0xe3,0xffe5 00e4 00c7 | | Action Elaborate_Subprogram 00e5 BODY_0008: 00e5 00bc | | Action Signal_Activated 00e6 00bb | | Action Signal_Completion 00e7 0000 | | .XXX[0x1] 00e8 ; -------------------------------------------------------------------------------------- 00e8 ; SUBPROGRAM 00e8 ; -------------------------------------------------------------------------------------- 00e8 00ee | | .CONST 0x00ee ; Address of begin 00e9 0004 | | .CONST 0x0004 ; Address of exception handler 00ea 0003 | | .CONST 0x0003 ; Number of locals 00eb INIT_00e8: 00eb e20d | | Load 0x1,0xd ; Debug Table 0x2 = .DEBUG 0x00eb,0x08ec,0x0002,0x0000,0x0057,0x3535,0x0000,0x0018 ; Debug Table 0x2.0x0 = 0xeb,0xffff 00ec 029f 03bb | | Declare_Subprogram INIT_03b8,For_Call 00ee BODY_00e8: 00ee 8403 | | Call 0x2,0x3 ; Debug Table 0x2.0x1 = 0xee,0x1 00ef 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0x2 = 0xef,0x2 00f0 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 00f1 0000 0000 | | .BLANK 0000[0x7] 00f8 ; -------------------------------------------------------------------------------------- 00f8 ; SUBPROGRAM 00f8 ; -------------------------------------------------------------------------------------- 00f8 00fe | | .CONST 0x00fe ; Address of begin 00f9 0004 | | .CONST 0x0004 ; Address of exception handler 00fa 0003 | | .CONST 0x0003 ; Number of locals 00fb INIT_00f8: 00fb e20e | | Load 0x1,0xe ; Debug Table 0x3 = .DEBUG 0x00fb,0x08f4,0x0002,0x0000,0x0057,0x3535,0x0000,0x002f ; Debug Table 0x3.0x0 = 0xfb,0xffff 00fc 029f 03f3 | | Declare_Subprogram INIT_03f0,For_Call 00fe BODY_00f8: 00fe 8403 | | Call 0x2,0x3 ; Debug Table 0x3.0x1 = 0xfe,0x1 00ff 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0x2 = 0xff,0x2 0100 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0101 0000 0000 | | .BLANK 0000[0x7] 0108 ; -------------------------------------------------------------------------------------- 0108 ; SUBPROGRAM 0108 ; -------------------------------------------------------------------------------------- 0108 010e | | .CONST 0x010e ; Address of begin 0109 0004 | | .CONST 0x0004 ; Address of exception handler 010a 0003 | | .CONST 0x0003 ; Number of locals 010b INIT_0108: 010b e20e | | Load 0x1,0xe ; Debug Table 0x4 = .DEBUG 0x010b,0x08fc,0x0001,0x0000,0x0057,0x3535,0x0000,0x0041 ; Debug Table 0x4.0x0 = 0x10b,0xffff 010c 029f 042b | +| Declare_Subprogram INIT_0428,For_Call 010e BODY_0108: 010e 8403 | | Call 0x2,0x3 ; Debug Table 0x4.0x1 = 0x10e,0x1 010f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x2 = 0x10f,0x2 0110 0219 | | Execute Heap_Access,All_Read 0111 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 0112 e5fc | | Load 0x2,-0x4 0113 00d9 | | Load_Top At_Offset_1 0114 2801 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x1 0115 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0116 0000 0000 | | .XXX[0x2] 0118 ; -------------------------------------------------------------------------------------- 0118 ; SUBPROGRAM 0118 ; -------------------------------------------------------------------------------------- 0118 011e | | .CONST 0x011e ; Address of begin 0119 0004 | | .CONST 0x0004 ; Address of exception handler 011a 0003 | | .CONST 0x0003 ; Number of locals 011b INIT_0118: 011b e214 | | Load 0x1,0x14 ; Debug Table 0x5 = .DEBUG 0x011b,0x0904,0x0002,0x0000,0x0057,0x3535,0x0000,0x005e ; Debug Table 0x5.0x0 = 0x11b,0xffff 011c 029f 045b | [| Declare_Subprogram INIT_0458,For_Call 011e BODY_0118: 011e 8403 | | Call 0x2,0x3 ; Debug Table 0x5.0x1 = 0x11e,0x1 011f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x2 = 0x11f,0x2 0120 0219 | | Execute Heap_Access,All_Read 0121 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 0122 e001 | | Load 0x0,0x1 0123 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0124 00d9 | | Load_Top At_Offset_1 0125 2801 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x1 0126 00d1 | | Pop_Control Pop_Count_1 0127 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x3 = 0x127,0x3 0128 0219 | | Execute Heap_Access,All_Read 0129 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 012a 822d | - | Call 0x1,0x2d 012b 00d9 | | Load_Top At_Offset_1 012c 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 012d 00d1 | | Pop_Control Pop_Count_1 012e 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x4 = 0x12e,0x4 012f 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0130 ; -------------------------------------------------------------------------------------- 0130 ; SUBPROGRAM 0130 ; -------------------------------------------------------------------------------------- 0130 0136 | 6 | .CONST 0x0136 ; Address of begin 0131 0004 | | .CONST 0x0004 ; Address of exception handler 0132 0003 | | .CONST 0x0003 ; Number of locals 0133 INIT_0130: 0133 e228 | ( | Load 0x1,0x28 ; Debug Table 0x6 = .DEBUG 0x0133,0x0910,0x0001,0x0000,0x0057,0x3535,0x0000,0x0075 ; Debug Table 0x6.0x0 = 0x133,0xffff 0134 029f 0493 | | Declare_Subprogram INIT_0490,For_Call 0136 BODY_0130: 0136 8403 | | Call 0x2,0x3 ; Debug Table 0x6.0x1 = 0x136,0x1 0137 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x6.0x2 = 0x137,0x2 0138 0219 | | Execute Heap_Access,All_Read 0139 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 013a e001 | | Load 0x0,0x1 013b 1812 | | Execute Package,Field_Execute,Field_Number 0x12 013c 00d9 | | Load_Top At_Offset_1 013d 2801 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x1 013e 00d1 | | Pop_Control Pop_Count_1 013f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x6.0x3 = 0x13f,0x3 0140 0219 | | Execute Heap_Access,All_Read 0141 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 0142 822d | - | Call 0x1,0x2d 0143 00d9 | | Load_Top At_Offset_1 0144 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 0145 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0146 0000 0000 | | .XXX[0x2] 0148 ; -------------------------------------------------------------------------------------- 0148 ; SUBPROGRAM 0148 ; -------------------------------------------------------------------------------------- 0148 0151 | Q | .CONST 0x0151 ; Address of begin 0149 0004 | | .CONST 0x0004 ; Address of exception handler 014a 0002 | | .CONST 0x0002 ; Number of locals 014b INIT_0148: 014b e210 | | Load 0x1,0x10 ; Debug Table 0x7 = .DEBUG 0x014b,0x091a,0x0002,0x0000,0x0057,0x3535,0x0000,0x0086 ; Debug Table 0x7.0x0 = 0x14b,0xffff 014c e210 | | Load 0x1,0x10 014d e5ff | | Load 0x2,-0x1 014e 039c | | Declare_Variable Heap_Access,By_Allocation 014f 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0150 0007 | | Action Break_Optional ; Debug Table 0x7.0x1 = 0x150,0xfffe 0151 BODY_0148: 0151 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x2 = 0x151,0x1 0152 4800 |H | Short_Literal 0x0 0153 e220 | | Load 0x1,0x20 0154 1c08 | | Execute_Immediate Run_Utility,0x8 0155 00d8 | | Load_Top At_Offset_0 0156 1c01 | | Execute_Immediate Run_Utility,0x1 0157 e223 | # | Load 0x1,0x23 0158 00d9 | | Load_Top At_Offset_1 0159 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 015a e222 | " | Load 0x1,0x22 015b 00d9 | | Load_Top At_Offset_1 015c 2804 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4 015d 4800 |H | Short_Literal 0x0 015e 00d9 | | Load_Top At_Offset_1 015f 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 0160 2801 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x1 0161 4800 |H | Short_Literal 0x0 0162 00d9 | | Load_Top At_Offset_1 0163 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 0164 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 0165 e222 | " | Load 0x1,0x22 0166 00d9 | | Load_Top At_Offset_1 0167 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 0168 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3 0169 e229 | ) | Load 0x1,0x29 016a 0162 | b | Execute Variant_Record,Check_In_Type 016b e20d | | Load 0x1,0xd 016c e5ff | | Load 0x2,-0x1 016d 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value 016e 00d9 | | Load_Top At_Offset_1 016f 0217 | | Execute Heap_Access,All_Reference 0170 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0171 0007 | | Action Break_Optional ; Debug Table 0x7.0x3 = 0x171,0x2 0172 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x4 = 0x172,0x3 0173 4801 |H | Short_Literal 0x1 0174 e220 | | Load 0x1,0x20 0175 1c08 | | Execute_Immediate Run_Utility,0x8 0176 00d8 | | Load_Top At_Offset_0 0177 1c01 | | Execute_Immediate Run_Utility,0x1 0178 e223 | # | Load 0x1,0x23 0179 00d9 | | Load_Top At_Offset_1 017a 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 017b e222 | " | Load 0x1,0x22 017c 00d9 | | Load_Top At_Offset_1 017d 2804 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4 017e e001 | | Load 0x0,0x1 017f 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0180 e001 | | Load 0x0,0x1 0181 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0182 0119 | | Execute Any,Check_In_Formal_Type 0183 00d9 | | Load_Top At_Offset_1 0184 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 0185 2801 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x1 0186 4800 |H | Short_Literal 0x0 0187 00d9 | | Load_Top At_Offset_1 0188 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 0189 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 018a 822d | - | Call 0x1,0x2d 018b 00d9 | | Load_Top At_Offset_1 018c 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 018d 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 018e e222 | " | Load 0x1,0x22 018f 00d9 | | Load_Top At_Offset_1 0190 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 0191 2a05 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x5 0192 4800 |H | Short_Literal 0x0 0193 00d9 | | Load_Top At_Offset_1 0194 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 0195 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4 0196 e22b | + | Load 0x1,0x2b 0197 0162 | b | Execute Variant_Record,Check_In_Type 0198 e214 | | Load 0x1,0x14 0199 e5ff | | Load 0x2,-0x1 019a 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value 019b 00d9 | | Load_Top At_Offset_1 019c 0217 | | Execute Heap_Access,All_Reference 019d 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 019e 0007 | | Action Break_Optional ; Debug Table 0x7.0x5 = 0x19e,0x4 019f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x6 = 0x19f,0x5 01a0 0219 | | Execute Heap_Access,All_Read 01a1 e226 | & | Load 0x1,0x26 01a2 1b12 | | Execute Package,Field_Read,Field_Number 0x12 01a3 4835 |H5 | Short_Literal 0x35 01a4 e5ff | | Load 0x2,-0x1 01a5 e226 | & | Load 0x1,0x26 01a6 1817 | | Execute Package,Field_Execute,Field_Number 0x17 01a7 00d9 | | Load_Top At_Offset_1 01a8 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 01a9 00d1 | | Pop_Control Pop_Count_1 01aa 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x7 = 0x1aa,0x6 01ab 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01ac 0000 0000 | | .BLANK 0000[0x4] 01b0 ; -------------------------------------------------------------------------------------- 01b0 ; SUBPROGRAM 01b0 ; -------------------------------------------------------------------------------------- 01b0 01b3 | | .CONST 0x01b3 ; Address of begin 01b1 0004 | | .CONST 0x0004 ; Address of exception handler 01b2 0001 | | .CONST 0x0001 ; Number of locals 01b3 BODY_01b0: 01b3 INIT_01b0: 01b3 00db | | Load_Top At_Offset_3 ; Debug Table 0x8 = .DEBUG 0x01b3,0x092c,0x0002,0x0000,0x0057,0x3535,0x0000,0x0094 ; Debug Table 0x8.0x0 = 0x1b3,0x1 01b4 00db | | Load_Top At_Offset_3 01b5 8231 | 1 | Call 0x1,0x31 01b6 e20d | | Load 0x1,0xd 01b7 0213 | | Execute Heap_Access,Check_In_Type 01b8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 01b9 0000 0000 | | .BLANK 0000[0x7] 01c0 ; -------------------------------------------------------------------------------------- 01c0 ; SUBPROGRAM 01c0 ; -------------------------------------------------------------------------------------- 01c0 01c3 | | .CONST 0x01c3 ; Address of begin 01c1 0004 | | .CONST 0x0004 ; Address of exception handler 01c2 0001 | | .CONST 0x0001 ; Number of locals 01c3 BODY_01c0: 01c3 INIT_01c0: 01c3 00db | | Load_Top At_Offset_3 ; Debug Table 0x9 = .DEBUG 0x01c3,0x0930,0x0002,0x0000,0x0057,0x3535,0x0000,0x00a1 ; Debug Table 0x9.0x0 = 0x1c3,0x1 01c4 00db | | Load_Top At_Offset_3 01c5 8231 | 1 | Call 0x1,0x31 01c6 e214 | | Load 0x1,0x14 01c7 0213 | | Execute Heap_Access,Check_In_Type 01c8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 01c9 0000 0000 | | .BLANK 0000[0x7] 01d0 ; -------------------------------------------------------------------------------------- 01d0 ; SUBPROGRAM 01d0 ; -------------------------------------------------------------------------------------- 01d0 01d3 | | .CONST 0x01d3 ; Address of begin 01d1 0004 | | .CONST 0x0004 ; Address of exception handler 01d2 0001 | | .CONST 0x0001 ; Number of locals 01d3 BODY_01d0: 01d3 INIT_01d0: 01d3 00db | | Load_Top At_Offset_3 ; Debug Table 0xa = .DEBUG 0x01d3,0x0934,0x0002,0x0000,0x0057,0x3535,0x0000,0x00ae ; Debug Table 0xa.0x0 = 0x1d3,0x1 01d4 00db | | Load_Top At_Offset_3 01d5 8231 | 1 | Call 0x1,0x31 01d6 e20e | | Load 0x1,0xe 01d7 0213 | | Execute Heap_Access,Check_In_Type 01d8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 01d9 0000 0000 | | .BLANK 0000[0x7] 01e0 ; -------------------------------------------------------------------------------------- 01e0 ; SUBPROGRAM 01e0 ; -------------------------------------------------------------------------------------- 01e0 01e3 | | .CONST 0x01e3 ; Address of begin 01e1 0004 | | .CONST 0x0004 ; Address of exception handler 01e2 0001 | | .CONST 0x0001 ; Number of locals 01e3 BODY_01e0: 01e3 INIT_01e0: 01e3 00da | | Load_Top At_Offset_2 ; Debug Table 0xb = .DEBUG 0x01e3,0x0938,0x0001,0x0000,0x0057,0x3535,0x0000,0x00be ; Debug Table 0xb.0x0 = 0x1e3,0x1 01e4 0219 | | Execute Heap_Access,All_Read 01e5 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 01e6 e5fe | | Load 0x2,-0x2 01e7 00d9 | | Load_Top At_Offset_1 01e8 2801 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x1 01e9 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01ea 0000 0000 | | .BLANK 0000[0x6] 01f0 ; -------------------------------------------------------------------------------------- 01f0 ; SUBPROGRAM 01f0 ; -------------------------------------------------------------------------------------- 01f0 01f3 | | .CONST 0x01f3 ; Address of begin 01f1 0004 | | .CONST 0x0004 ; Address of exception handler 01f2 0001 | | .CONST 0x0001 ; Number of locals 01f3 BODY_01f0: 01f3 INIT_01f0: 01f3 00da | | Load_Top At_Offset_2 ; Debug Table 0xc = .DEBUG 0x01f3,0x093c,0x0001,0x0000,0x0057,0x3535,0x0000,0x00ca ; Debug Table 0xc.0x0 = 0x1f3,0x1 01f4 0219 | | Execute Heap_Access,All_Read 01f5 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 01f6 00db | | Load_Top At_Offset_3 01f7 0217 | | Execute Heap_Access,All_Reference 01f8 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 01f9 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 01fa e5fe | | Load 0x2,-0x2 01fb 0273 | s | Execute Discrete,Plus 01fc 00d9 | | Load_Top At_Offset_1 01fd 2801 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x1 01fe 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01ff 0000 | | .XXX[0x1] 0200 ; -------------------------------------------------------------------------------------- 0200 ; SUBPROGRAM 0200 ; -------------------------------------------------------------------------------------- 0200 0205 | | .CONST 0x0205 ; Address of begin 0201 0004 | | .CONST 0x0004 ; Address of exception handler 0202 0002 | | .CONST 0x0002 ; Number of locals 0203 INIT_0200: 0203 029f 04c3 | | Declare_Subprogram INIT_04c0,For_Call ; Debug Table 0xd = .DEBUG 0x0203,0x0940,0x0001,0x0000,0x0057,0x3535,0x0000,0x00d7 ; Debug Table 0xd.0x0 = 0x203,0xffff 0205 BODY_0200: 0205 00db | | Load_Top At_Offset_3 ; Debug Table 0xd.0x1 = 0x205,0x1 0206 0217 | | Execute Heap_Access,All_Reference 0207 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0208 8402 | | Call 0x2,0x2 0209 4502 |E | Exit_Suprogram New_Top_Offset 0x2 020a 0000 0000 | | .BLANK 0000[0x6] 0210 ; -------------------------------------------------------------------------------------- 0210 ; SUBPROGRAM 0210 ; -------------------------------------------------------------------------------------- 0210 0238 | 8 | .CONST 0x0238 ; Address of begin 0211 0004 | | .CONST 0x0004 ; Address of exception handler 0212 0012 | | .CONST 0x0012 ; Number of locals 0213 INIT_0210: 0213 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xe = .DEBUG 0x0213,0x0946,0x2801,0x0002,0x0057,0x3535,0x0000,0x00df ; Debug Table 0xe.0x0 = 0x213,0xffff 0214 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0215 e001 | | Load 0x0,0x1 ; Debug Table 0xe.0x1 = 0x215,0xfffe 0216 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0217 02c7 | | Declare_Variable Any 0218 00d8 | | Load_Top At_Offset_0 0219 1c00 | | Execute_Immediate Run_Utility,0x0 021a e224 | $ | Load 0x1,0x24 ; Debug Table 0xe.0x2 = 0x21a,0xfffd 021b 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 021c 0092 0707 | | Action Push_String_Extended,0x707 ; " " ; Debug Table 0xe.0x3 = 0x21c,0xfffc 021e 0092 0708 | | Action Push_String_Extended,0x708 ; " (100%)" ; Debug Table 0xe.0x4 = 0x21e,0xfffb 0220 0092 0709 | | Action Push_String_Extended,0x709 ; " (0%)" ; Debug Table 0xe.0x5 = 0x220,0xfffa 0222 029f 04e3 | | Declare_Subprogram INIT_04e0,For_Call ; Debug Table 0xe.0x6 = 0x222,0xfff9 0224 029f 0503 | | Declare_Subprogram INIT_0500,For_Call ; Debug Table 0xe.0x7 = 0x224,0xfff8 0226 029f 051b | | Declare_Subprogram INIT_0518,For_Call ; Debug Table 0xe.0x8 = 0x226,0xfff7 0228 029f 053b | ;| Declare_Subprogram INIT_0538,For_Call ; Debug Table 0xe.0x9 = 0x228,0xfff6 022a 029f 054b | K| Declare_Subprogram INIT_0548,For_Call ; Debug Table 0xe.0xa = 0x22a,0xfff5 022c 029f 0583 | | Declare_Subprogram INIT_0580,For_Call ; Debug Table 0xe.0xb = 0x22c,0xfff4 022e 029f 05c3 | | Declare_Subprogram INIT_05c0,For_Call ; Debug Table 0xe.0xc = 0x22e,0xfff3 0230 029f 062b | +| Declare_Subprogram INIT_0628,For_Call ; Debug Table 0xe.0xd = 0x230,0xfff2 0232 029f 064b | K| Declare_Subprogram INIT_0648,For_Call ; Debug Table 0xe.0xe = 0x232,0xfff1 0234 029f 06ab | | Declare_Subprogram INIT_06a8,For_Call ; Debug Table 0xe.0xf = 0x234,0xfff0 0236 029f 06cb | | Declare_Subprogram INIT_06c8,For_Call ; Debug Table 0xe.0x10 = 0x236,0xffef 0238 BODY_0210: 0238 e402 | | Load 0x2,0x2 ; Debug Table 0xe.0x11 = 0x238,0x1 0239 00e2 | | Load_Encached Integer_Cache 023a 025e | ^ | Execute Discrete,Convert 023b e5fc | | Load 0x2,-0x4 023c 0217 | | Execute Heap_Access,All_Reference 023d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 023e 840d | | Call 0x2,0xd 023f c402 | | Store 0x2,0x2 0240 4800 |H | Short_Literal 0x0 ; Debug Table 0xe.0x12 = 0x240,0x2 0241 e402 | | Load 0x2,0x2 0242 00ea | | Load_Encached Null_String_Cache 0243 e5fc | | Load 0x2,-0x4 0244 0217 | | Execute Heap_Access,All_Reference 0245 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0246 8410 | | Call 0x2,0x10 0247 e404 | | Load 0x2,0x4 ; Debug Table 0xe.0x13 = 0x247,0x3 0248 e403 | | Load 0x2,0x3 0249 e5fc | | Load 0x2,-0x4 024a 0217 | | Execute Heap_Access,All_Reference 024b 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 024c 840e | | Call 0x2,0xe 024d c403 | | Store 0x2,0x3 024e c404 | | Store 0x2,0x4 024f 4800 |H | Short_Literal 0x0 ; Debug Table 0xe.0x14 = 0x24f,0x4 0250 00ea | | Load_Encached Null_String_Cache 0251 e5fc | | Load 0x2,-0x4 0252 0217 | | Execute Heap_Access,All_Reference 0253 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0254 8412 | | Call 0x2,0x12 0255 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0256 0000 0000 | | .XXX[0x2] 0258 ; -------------------------------------------------------------------------------------- 0258 ; SUBPROGRAM 0258 ; -------------------------------------------------------------------------------------- 0258 025b | [ | .CONST 0x025b ; Address of begin 0259 0004 | | .CONST 0x0004 ; Address of exception handler 025a 0001 | | .CONST 0x0001 ; Number of locals 025b BODY_0258: 025b INIT_0258: 025b 4608 |F | Jump_Case 0x9 ; Debug Table 0xf = .DEBUG 0x025b,0x0972,0x0005,0x0000,0x0057,0x3535,0x0000,0x012a 025c 7808 |x | Jump 0x265 ; case 0x0 025d 7839 |x9 | Jump 0x297 ; case 0x1 025e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 025f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 0260 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 0261 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 0262 7841 |xA | Jump 0x2a4 ; case 0x6 0263 7848 |xH | Jump 0x2ac ; case 0x7 0264 7869 |xi | Jump 0x2ce ; case 0x8 0265 00da | | Load_Top At_Offset_2 0266 016c | l | Execute Variant_Record,Is_Constrained 0267 700a |p | Jump_Nonzero 0x272 0268 00cf | | Action Mark_Auxiliary 0269 4801 |H | Short_Literal 0x1 026a 4800 |H | Short_Literal 0x0 026b e5ff | | Load 0x2,-0x1 026c 1c08 | | Execute_Immediate Run_Utility,0x8 026d 00d8 | | Load_Top At_Offset_0 026e 1c00 | | Execute_Immediate Run_Utility,0x0 026f c5ff | | Store 0x2,-0x1 0270 00ce | | Action Pop_Auxiliary 0271 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0272 00da | | Load_Top At_Offset_2 0273 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 0274 4601 |F | Jump_Case 0x2 0275 7812 |x | Jump 0x288 ; case 0x0 0276 7800 |x | Jump 0x277 ; case 0x1 0277 00da | | Load_Top At_Offset_2 0278 2205 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x5 0279 00da | | Load_Top At_Offset_2 027a 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 027b 00d8 | | Load_Top At_Offset_0 027c 2201 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x1 027d 00d8 | | Load_Top At_Offset_0 027e 2401 |$ | Execute Variant_Record,Field_Reference,Fixed,Direct,Field_Number 0x1 027f 1c00 | | Execute_Immediate Run_Utility,0x0 0280 00db | | Load_Top At_Offset_3 0281 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0282 4601 |F | Jump_Case 0x2 0283 7801 |x | Jump 0x285 ; case 0x0 0284 7800 |x | Jump 0x285 ; case 0x1 0285 00db | | Load_Top At_Offset_3 0286 2b05 |+ | Execute Variant_Record,Field_Write,Variant,Indirect,Field_Number 0x5 0287 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0288 00da | | Load_Top At_Offset_2 0289 2206 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x6 028a 00da | | Load_Top At_Offset_2 028b 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 028c 4800 |H | Short_Literal 0x0 028d 00d9 | | Load_Top At_Offset_1 028e 2801 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x1 028f 00db | | Load_Top At_Offset_3 0290 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0291 4601 |F | Jump_Case 0x2 0292 7801 |x | Jump 0x294 ; case 0x0 0293 7800 |x | Jump 0x294 ; case 0x1 0294 00db | | Load_Top At_Offset_3 0295 2b06 |+ | Execute Variant_Record,Field_Write,Variant,Indirect,Field_Number 0x6 0296 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 0297 00da | | Load_Top At_Offset_2 0298 016b | k | Execute Variant_Record,Read_Variant 0299 00d8 | | Load_Top At_Offset_0 029a 0f01 | | Execute_Immediate Equal,0x1 029b 6802 |h | Jump_Zero 0x29e 029c 00db | | Load_Top At_Offset_3 029d 2205 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x5 029e 00d8 | | Load_Top At_Offset_0 029f 0f02 | | Execute_Immediate Equal,0x2 02a0 6802 |h | Jump_Zero 0x2a3 02a1 00db | | Load_Top At_Offset_3 02a2 2206 |" | Execute Variant_Record,Field_Constrain,Field_Number 0x6 02a3 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 02a4 00db | | Load_Top At_Offset_3 02a5 4601 |F | Jump_Case 0x2 02a6 7803 |x | Jump 0x2aa ; case 0x0 02a7 7800 |x | Jump 0x2a8 ; case 0x1 02a8 4801 |H | Short_Literal 0x1 02a9 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 02aa 4802 |H | Short_Literal 0x2 02ab 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 02ac e5fd | | Load 0x2,-0x3 02ad e5fe | | Load 0x2,-0x2 02ae e5fe | | Load 0x2,-0x2 02af 4601 |F | Jump_Case 0x2 02b0 780e |x | Jump 0x2bf ; case 0x0 02b1 7800 |x | Jump 0x2b2 ; case 0x1 02b2 e5fd | | Load 0x2,-0x3 02b3 4601 |F | Jump_Case 0x2 02b4 7801 |x | Jump 0x2b6 ; case 0x0 02b5 7802 |x | Jump 0x2b8 ; case 0x1 02b6 4801 |H | Short_Literal 0x1 02b7 7801 |x | Jump 0x2b9 02b8 48ff |H | Short_Literal 0xff 02b9 e220 | | Load 0x1,0x20 02ba 2305 |# | Execute Variant_Record,Field_Type,Field_Number 0x5 02bb 031b | | Declare_Type Variant_Record,Constrained 02bc 4801 |H | Short_Literal 0x1 02bd 4801 |H | Short_Literal 0x1 02be 780c |x | Jump 0x2cb 02bf e5fd | | Load 0x2,-0x3 02c0 4601 |F | Jump_Case 0x2 02c1 7801 |x | Jump 0x2c3 ; case 0x0 02c2 7802 |x | Jump 0x2c5 ; case 0x1 02c3 4801 |H | Short_Literal 0x1 02c4 7801 |x | Jump 0x2c6 02c5 48ff |H | Short_Literal 0xff 02c6 e220 | | Load 0x1,0x20 02c7 2306 |# | Execute Variant_Record,Field_Type,Field_Number 0x6 02c8 031b | | Declare_Type Variant_Record,Constrained 02c9 4801 |H | Short_Literal 0x1 02ca 4802 |H | Short_Literal 0x2 02cb e5ff | | Load 0x2,-0x1 02cc 031b | | Declare_Type Variant_Record,Constrained 02cd 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 02ce e5fd | | Load 0x2,-0x3 02cf e5fe | | Load 0x2,-0x2 02d0 e5fd | | Load 0x2,-0x3 02d1 e5fe | | Load 0x2,-0x2 02d2 e5ff | | Load 0x2,-0x1 02d3 1c06 | | Execute_Immediate Run_Utility,0x6 02d4 e5ff | | Load 0x2,-0x1 02d5 02fc | | Declare_Variable Variant_Record,With_Constraint 02d6 e5fe | | Load 0x2,-0x2 02d7 4601 |F | Jump_Case 0x2 02d8 7811 |x | Jump 0x2ea ; case 0x0 02d9 7800 |x | Jump 0x2da ; case 0x1 02da e5fd | | Load 0x2,-0x3 02db 4601 |F | Jump_Case 0x2 02dc 7801 |x | Jump 0x2de ; case 0x0 02dd 7802 |x | Jump 0x2e0 ; case 0x1 02de 4801 |H | Short_Literal 0x1 02df 7801 |x | Jump 0x2e1 02e0 48ff |H | Short_Literal 0xff 02e1 e220 | | Load 0x1,0x20 02e2 2305 |# | Execute Variant_Record,Field_Type,Field_Number 0x5 02e3 02fc | | Declare_Variable Variant_Record,With_Constraint 02e4 e5fd | | Load 0x2,-0x3 02e5 4601 |F | Jump_Case 0x2 02e6 7801 |x | Jump 0x2e8 ; case 0x0 02e7 7800 |x | Jump 0x2e8 ; case 0x1 02e8 2f05 |/ | Execute Variant_Record,Field_Append,Variant,Indirect,Field_Number 0x5 02e9 780f |x | Jump 0x2f9 02ea e5fd | | Load 0x2,-0x3 02eb 4601 |F | Jump_Case 0x2 02ec 7801 |x | Jump 0x2ee ; case 0x0 02ed 7802 |x | Jump 0x2f0 ; case 0x1 02ee 4801 |H | Short_Literal 0x1 02ef 7801 |x | Jump 0x2f1 02f0 48ff |H | Short_Literal 0xff 02f1 e220 | | Load 0x1,0x20 02f2 2306 |# | Execute Variant_Record,Field_Type,Field_Number 0x6 02f3 02fc | | Declare_Variable Variant_Record,With_Constraint 02f4 e5fd | | Load 0x2,-0x3 02f5 4601 |F | Jump_Case 0x2 02f6 7801 |x | Jump 0x2f8 ; case 0x0 02f7 7800 |x | Jump 0x2f8 ; case 0x1 02f8 2f06 |/ | Execute Variant_Record,Field_Append,Variant,Indirect,Field_Number 0x6 02f9 016a | j | QQ_execute Variant_Record,XXX 02fa 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3 02fb 0000 0000 | | .BLANK 0000[0x5] 0300 ; -------------------------------------------------------------------------------------- 0300 ; SUBPROGRAM 0300 ; -------------------------------------------------------------------------------------- 0300 0303 | | .CONST 0x0303 ; Address of begin 0301 030a | | .CONST 0x030a ; Address of exception handler 0302 0001 | | .CONST 0x0001 ; Number of locals 0303 BODY_0300: 0303 INIT_0300: 0303 e004 | | Load 0x0,0x4 ; Debug Table 0x10 = .DEBUG 0x0303,0x0974,0x0002,0x0000,0x0057,0x3825,0x0000,0x0074 ; Debug Table 0x10.0x0 = 0x303,0x1 0304 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0305 e005 | | Load 0x0,0x5 0306 1823 | # | Execute Package,Field_Execute,Field_Number 0x23 0307 e006 | | Load 0x0,0x6 0308 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 0309 00ca | | Action Exit_Nullary_Function 030a TRAP_0300: 030a 0007 | | Action Break_Optional 030b 4800 |H | Short_Literal 0x0 ; Debug Table 0x10.0x1 = 0x30b,0x2 030c 00ca | | Action Exit_Nullary_Function 030d 0000 0000 | | .XXX[0x3] 030f 0000 | | 0310 0000 0000 | | .LITERAL {0x00000000, 0x00573825} 0314 0000 0000 | | .BLANK 0000[0x4] 0318 ; -------------------------------------------------------------------------------------- 0318 ; SUBPROGRAM 0318 ; -------------------------------------------------------------------------------------- 0318 0324 | $ | .CONST 0x0324 ; Address of begin 0319 0332 | 2 | .CONST 0x0332 ; Address of exception handler 031a 0002 | | .CONST 0x0002 ; Number of locals 031b INIT_0318: 031b e223 | # | Load 0x1,0x23 ; Debug Table 0x11 = .DEBUG 0x031b,0x097a,0x0002,0x0000,0x0057,0x3825,0x0000,0x010c ; Debug Table 0x11.0x0 = 0x31b,0xffff 031c e5fe | | Load 0x2,-0x2 031d e223 | # | Load 0x1,0x23 031e e5ff | | Load 0x2,-0x1 031f 0217 | | Execute Heap_Access,All_Reference 0320 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0321 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value 0322 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0323 0007 | | Action Break_Optional ; Debug Table 0x11.0x1 = 0x323,0xfffe 0324 BODY_0318: 0324 00db | | Load_Top At_Offset_3 ; Debug Table 0x11.0x2 = 0x324,0x1 0325 0219 | | Execute Heap_Access,All_Read 0326 00d8 | | Load_Top At_Offset_0 0327 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0328 4801 |H | Short_Literal 0x1 0329 e5fd | | Load 0x2,-0x3 032a e5fe | | Load 0x2,-0x2 032b e226 | & | Load 0x1,0x26 032c 1815 | | Execute Package,Field_Execute,Field_Number 0x15 032d 00d9 | | Load_Top At_Offset_1 032e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 032f 00d1 | | Pop_Control Pop_Count_1 0330 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x3 = 0x330,0x2 0331 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0332 TRAP_0318: 0332 e226 | & | Load 0x1,0x26 0333 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21 0334 010f | | Execute Exception,Equal 0335 6802 |h | Jump_Zero 0x338 0336 6285 |b | Indirect_Literal Discrete,0x5bc,{0x00000000, 0x57353501} ; Debug Table 0x11.0x4 = 0x336,0x3 0337 0257 | W | Execute Discrete,Raise 0338 0100 | | Execute Exception,Raise 0339 0000 0000 | | .BLANK 0000[0x7] 0340 ; -------------------------------------------------------------------------------------- 0340 ; SUBPROGRAM 0340 ; -------------------------------------------------------------------------------------- 0340 0345 | E | .CONST 0x0345 ; Address of begin 0341 0004 | | .CONST 0x0004 ; Address of exception handler 0342 0002 | | .CONST 0x0002 ; Number of locals 0343 INIT_0340: 0343 e222 | " | Load 0x1,0x22 ; Debug Table 0x12 = .DEBUG 0x0343,0x0986,0x0001,0x0000,0x0057,0x3825,0x0000,0x0147 ; Debug Table 0x12.0x0 = 0x343,0xffff 0344 0007 | | Action Break_Optional 0345 BODY_0340: 0345 00db | | Load_Top At_Offset_3 ; Debug Table 0x12.0x1 = 0x345,0x1 0346 0217 | | Execute Heap_Access,All_Reference 0347 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 0348 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 0349 7008 |p | Jump_Nonzero 0x352 034a 00db | | Load_Top At_Offset_3 ; Debug Table 0x12.0x2 = 0x34a,0x2 034b 0219 | | Execute Heap_Access,All_Read 034c 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 034d e5fe | | Load 0x2,-0x2 034e 00d9 | | Load_Top At_Offset_1 034f 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3 0350 00d1 | | Pop_Control Pop_Count_1 0351 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0352 00db | | Load_Top At_Offset_3 ; Debug Table 0x12.0x3 = 0x352,0x3 0353 0217 | | Execute Heap_Access,All_Reference 0354 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 0355 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 0356 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0357 00cf | | Action Mark_Auxiliary 0358 7805 |x | Jump 0x35e 0359 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x12.0x4 = 0x359,0x5 035a 0217 | | Execute Heap_Access,All_Reference 035b 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4 035c 0032 | 2 | Store_Top Heap_Access,At_Offset_2 035d 00c9 | | Action Pop_Auxiliary_Loop 035e 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x12.0x5 = 0x35e,0x4 035f 0217 | | Execute Heap_Access,All_Reference 0360 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4 0361 77f7 |w | Jump_Nonzero 0x359 0362 00ce | | Action Pop_Auxiliary 0363 e5fe | | Load 0x2,-0x2 ; Debug Table 0x12.0x6 = 0x363,0x6 0364 00d9 | | Load_Top At_Offset_1 0365 0217 | | Execute Heap_Access,All_Reference 0366 2804 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4 0367 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0368 ; -------------------------------------------------------------------------------------- 0368 ; SUBPROGRAM 0368 ; -------------------------------------------------------------------------------------- 0368 036d | m | .CONST 0x036d ; Address of begin 0369 0004 | | .CONST 0x0004 ; Address of exception handler 036a 0002 | | .CONST 0x0002 ; Number of locals 036b INIT_0368: 036b e222 | " | Load 0x1,0x22 ; Debug Table 0x13 = .DEBUG 0x036b,0x0996,0x0001,0x0000,0x0057,0x3825,0x0000,0x0186 ; Debug Table 0x13.0x0 = 0x36b,0xffff 036c 0007 | | Action Break_Optional 036d BODY_0368: 036d 00db | | Load_Top At_Offset_3 ; Debug Table 0x13.0x1 = 0x36d,0x1 036e 0217 | | Execute Heap_Access,All_Reference 036f 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 0370 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 0371 7008 |p | Jump_Nonzero 0x37a 0372 00db | | Load_Top At_Offset_3 ; Debug Table 0x13.0x2 = 0x372,0x2 0373 0219 | | Execute Heap_Access,All_Read 0374 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 0375 e5fe | | Load 0x2,-0x2 0376 00d9 | | Load_Top At_Offset_1 0377 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3 0378 00d1 | | Pop_Control Pop_Count_1 0379 4503 |E | Exit_Suprogram New_Top_Offset 0x3 037a 00db | | Load_Top At_Offset_3 ; Debug Table 0x13.0x3 = 0x37a,0x3 037b 0217 | | Execute Heap_Access,All_Reference 037c 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 037d 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 037e 0031 | 1 | Store_Top Heap_Access,At_Offset_1 037f 00cf | | Action Mark_Auxiliary 0380 7805 |x | Jump 0x386 0381 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x13.0x4 = 0x381,0x5 0382 0217 | | Execute Heap_Access,All_Reference 0383 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4 0384 0032 | 2 | Store_Top Heap_Access,At_Offset_2 0385 00c9 | | Action Pop_Auxiliary_Loop 0386 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x13.0x5 = 0x386,0x4 0387 0217 | | Execute Heap_Access,All_Reference 0388 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4 0389 77f7 |w | Jump_Nonzero 0x381 038a 00ce | | Action Pop_Auxiliary 038b e5fe | | Load 0x2,-0x2 ; Debug Table 0x13.0x6 = 0x38b,0x6 038c 00d9 | | Load_Top At_Offset_1 038d 0217 | | Execute Heap_Access,All_Reference 038e 2804 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4 038f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0390 ; -------------------------------------------------------------------------------------- 0390 ; SUBPROGRAM 0390 ; -------------------------------------------------------------------------------------- 0390 0396 | | .CONST 0x0396 ; Address of begin 0391 0004 | | .CONST 0x0004 ; Address of exception handler 0392 0003 | | .CONST 0x0003 ; Number of locals 0393 INIT_0390: 0393 e222 | " | Load 0x1,0x22 ; Debug Table 0x14 = .DEBUG 0x0393,0x09a6,0x0002,0x0000,0x0057,0x3825,0x0000,0x01c5 ; Debug Table 0x14.0x0 = 0x393,0xffff 0394 0007 | | Action Break_Optional 0395 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x14.0x1 = 0x395,0xfffe 0396 BODY_0390: 0396 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x14.0x2 = 0x396,0x1 0397 00da | | Load_Top At_Offset_2 0398 e5fe | | Load 0x2,-0x2 0399 e5ff | | Load 0x2,-0x1 039a 0217 | | Execute Heap_Access,All_Reference 039b 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 039c e226 | & | Load 0x1,0x26 039d 1814 | | Execute Package,Field_Execute,Field_Number 0x14 039e 0033 | 3 | Store_Top Heap_Access,At_Offset_3 039f 0059 | Y | Store_Top Discrete,At_Offset_1 03a0 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x14.0x3 = 0x3a0,0x2 03a1 6802 |h | Jump_Zero 0x3a4 03a2 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x14.0x4 = 0x3a2,0x3 03a3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 03a4 6213 |b | Indirect_Literal Discrete,0x5b8,{0x00000000, 0x57353502} ; Debug Table 0x14.0x5 = 0x3a4,0x4 03a5 0257 | W | Execute Discrete,Raise 03a6 0000 0000 | | .XXX[0x2] 03a8 ; -------------------------------------------------------------------------------------- 03a8 ; SUBPROGRAM 03a8 ; -------------------------------------------------------------------------------------- 03a8 03ab | | .CONST 0x03ab ; Address of begin 03a9 0004 | | .CONST 0x0004 ; Address of exception handler 03aa 0001 | | .CONST 0x0001 ; Number of locals 03ab BODY_03a8: 03ab INIT_03a8: 03ab 00db | | Load_Top At_Offset_3 ; Debug Table 0x15 = .DEBUG 0x03ab,0x09b4,0x0002,0x0000,0x0057,0x3825,0x0000,0x0243 ; Debug Table 0x15.0x0 = 0x3ab,0x1 03ac 00db | | Load_Top At_Offset_3 03ad 8231 | 1 | Call 0x1,0x31 03ae e228 | ( | Load 0x1,0x28 03af 0213 | | Execute Heap_Access,Check_In_Type 03b0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 03b1 0000 0000 | | .BLANK 0000[0x7] 03b8 ; -------------------------------------------------------------------------------------- 03b8 ; SUBPROGRAM 03b8 ; -------------------------------------------------------------------------------------- 03b8 03bb | | .CONST 0x03bb ; Address of begin 03b9 03c6 | | .CONST 0x03c6 ; Address of exception handler 03ba 0001 | | .CONST 0x0001 ; Number of locals 03bb BODY_03b8: 03bb INIT_03b8: 03bb e5fe | | Load 0x2,-0x2 ; Debug Table 0x16 = .DEBUG 0x03bb,0x09b8,0x0004,0x0000,0x0057,0x3825,0x0000,0x02c5 ; Debug Table 0x16.0x0 = 0x3bb,0x1 03bc e5ff | | Load 0x2,-0x1 03bd 8219 | | Call 0x1,0x19 03be a402 | | Store_Unchecked 0x2,0x2 03bf e402 | | Load 0x2,0x2 ; Debug Table 0x16.0x1 = 0x3bf,0x2 03c0 0219 | | Execute Heap_Access,All_Read 03c1 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 03c2 4800 |H | Short_Literal 0x0 03c3 00d9 | | Load_Top At_Offset_1 03c4 2801 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x1 03c5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03c6 TRAP_03b8: 03c6 61f1 |a | Indirect_Literal Discrete,0x5b8,{0x00000000, 0x57353502} 03c7 010f | | Execute Exception,Equal 03c8 6826 |h& | Jump_Zero 0x3ef 03c9 e20d | | Load 0x1,0xd ; Debug Table 0x16.0x2 = 0x3c9,0x3 03ca e5ff | | Load 0x2,-0x1 03cb 0217 | | Execute Heap_Access,All_Reference 03cc 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 03cd 039c | | Declare_Variable Heap_Access,By_Allocation 03ce 00d8 | | Load_Top At_Offset_0 03cf 0217 | | Execute Heap_Access,All_Reference 03d0 1c00 | | Execute_Immediate Run_Utility,0x0 03d1 a402 | | Store_Unchecked 0x2,0x2 03d2 0007 | | Action Break_Optional ; Debug Table 0x16.0x3 = 0x3d2,0x4 03d3 e402 | | Load 0x2,0x2 ; Debug Table 0x16.0x4 = 0x3d3,0x5 03d4 e5fe | | Load 0x2,-0x2 03d5 e5ff | | Load 0x2,-0x1 03d6 822e | . | Call 0x1,0x2e 03d7 e402 | | Load 0x2,0x2 03d8 0217 | | Execute Heap_Access,All_Reference 03d9 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 03da e402 | | Load 0x2,0x2 ; Debug Table 0x16.0x5 = 0x3da,0x6 03db 0219 | | Execute Heap_Access,All_Read 03dc 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 03dd e5fc | | Load 0x2,-0x4 03de 00d9 | | Load_Top At_Offset_1 03df 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2 03e0 00d1 | | Pop_Control Pop_Count_1 03e1 e5fd | | Load 0x2,-0x3 ; Debug Table 0x16.0x6 = 0x3e1,0x7 03e2 e20d | | Load 0x1,0xd 03e3 021f | | Execute Heap_Access,Equal 03e4 6806 |h | Jump_Zero 0x3eb 03e5 e402 | | Load 0x2,0x2 ; Debug Table 0x16.0x7 = 0x3e5,0x8 03e6 e5ff | | Load 0x2,-0x1 03e7 0217 | | Execute Heap_Access,All_Reference 03e8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 03e9 822f | / | Call 0x1,0x2f 03ea 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03eb e402 | | Load 0x2,0x2 ; Debug Table 0x16.0x8 = 0x3eb,0x9 03ec e5fd | | Load 0x2,-0x3 03ed 822f | / | Call 0x1,0x2f 03ee 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03ef 0100 | | Execute Exception,Raise 03f0 ; -------------------------------------------------------------------------------------- 03f0 ; SUBPROGRAM 03f0 ; -------------------------------------------------------------------------------------- 03f0 03f3 | | .CONST 0x03f3 ; Address of begin 03f1 03fe | | .CONST 0x03fe ; Address of exception handler 03f2 0001 | | .CONST 0x0001 ; Number of locals 03f3 BODY_03f0: 03f3 INIT_03f0: 03f3 e5fe | | Load 0x2,-0x2 ; Debug Table 0x17 = .DEBUG 0x03f3,0x09cc,0x0004,0x0000,0x0057,0x3825,0x0000,0x032f ; Debug Table 0x17.0x0 = 0x3f3,0x1 03f4 e5ff | | Load 0x2,-0x1 03f5 821b | | Call 0x1,0x1b 03f6 a402 | | Store_Unchecked 0x2,0x2 03f7 e402 | | Load 0x2,0x2 ; Debug Table 0x17.0x1 = 0x3f7,0x2 03f8 0219 | | Execute Heap_Access,All_Read 03f9 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 03fa 4800 |H | Short_Literal 0x0 03fb 00d9 | | Load_Top At_Offset_1 03fc 2801 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x1 03fd 4501 |E | Exit_Suprogram New_Top_Offset 0x1 03fe TRAP_03f0: 03fe 61b9 |a | Indirect_Literal Discrete,0x5b8,{0x00000000, 0x57353502} 03ff 010f | | Execute Exception,Equal 0400 6826 |h& | Jump_Zero 0x427 0401 e20e | | Load 0x1,0xe ; Debug Table 0x17.0x2 = 0x401,0x3 0402 e5ff | | Load 0x2,-0x1 0403 0217 | | Execute Heap_Access,All_Reference 0404 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0405 039c | | Declare_Variable Heap_Access,By_Allocation 0406 00d8 | | Load_Top At_Offset_0 0407 0217 | | Execute Heap_Access,All_Reference 0408 1c00 | | Execute_Immediate Run_Utility,0x0 0409 a402 | | Store_Unchecked 0x2,0x2 040a 0007 | | Action Break_Optional ; Debug Table 0x17.0x3 = 0x40a,0x4 040b e402 | | Load 0x2,0x2 ; Debug Table 0x17.0x4 = 0x40b,0x5 040c e5fe | | Load 0x2,-0x2 040d e5ff | | Load 0x2,-0x1 040e 822e | . | Call 0x1,0x2e 040f e402 | | Load 0x2,0x2 0410 0217 | | Execute Heap_Access,All_Reference 0411 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 0412 e402 | | Load 0x2,0x2 ; Debug Table 0x17.0x5 = 0x412,0x6 0413 0219 | | Execute Heap_Access,All_Read 0414 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 0415 4800 |H | Short_Literal 0x0 0416 00d9 | | Load_Top At_Offset_1 0417 2801 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x1 0418 00d1 | | Pop_Control Pop_Count_1 0419 e5fd | | Load 0x2,-0x3 ; Debug Table 0x17.0x6 = 0x419,0x7 041a e20d | | Load 0x1,0xd 041b 021f | | Execute Heap_Access,Equal 041c 6806 |h | Jump_Zero 0x423 041d e402 | | Load 0x2,0x2 ; Debug Table 0x17.0x7 = 0x41d,0x8 041e e5ff | | Load 0x2,-0x1 041f 0217 | | Execute Heap_Access,All_Reference 0420 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0421 822f | / | Call 0x1,0x2f 0422 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0423 e402 | | Load 0x2,0x2 ; Debug Table 0x17.0x8 = 0x423,0x9 0424 e5fd | | Load 0x2,-0x3 0425 822f | / | Call 0x1,0x2f 0426 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0427 0100 | | Execute Exception,Raise 0428 ; -------------------------------------------------------------------------------------- 0428 ; SUBPROGRAM 0428 ; -------------------------------------------------------------------------------------- 0428 042b | + | .CONST 0x042b ; Address of begin 0429 0430 | 0 | .CONST 0x0430 ; Address of exception handler 042a 0001 | | .CONST 0x0001 ; Number of locals 042b BODY_0428: 042b INIT_0428: 042b e5fe | | Load 0x2,-0x2 ; Debug Table 0x18 = .DEBUG 0x042b,0x09e0,0x0004,0x0000,0x0057,0x3825,0x0000,0x0392 ; Debug Table 0x18.0x0 = 0x42b,0x1 042c e5ff | | Load 0x2,-0x1 042d 821b | | Call 0x1,0x1b 042e a402 | | Store_Unchecked 0x2,0x2 042f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0430 TRAP_0428: 0430 6187 |a | Indirect_Literal Discrete,0x5b8,{0x00000000, 0x57353502} 0431 010f | | Execute Exception,Equal 0432 681f |h | Jump_Zero 0x452 0433 e20e | | Load 0x1,0xe ; Debug Table 0x18.0x1 = 0x433,0x2 0434 e5ff | | Load 0x2,-0x1 0435 0217 | | Execute Heap_Access,All_Reference 0436 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0437 039c | | Declare_Variable Heap_Access,By_Allocation 0438 00d8 | | Load_Top At_Offset_0 0439 0217 | | Execute Heap_Access,All_Reference 043a 1c00 | | Execute_Immediate Run_Utility,0x0 043b a402 | | Store_Unchecked 0x2,0x2 043c 0007 | | Action Break_Optional ; Debug Table 0x18.0x2 = 0x43c,0x3 043d e402 | | Load 0x2,0x2 ; Debug Table 0x18.0x3 = 0x43d,0x4 043e e5fe | | Load 0x2,-0x2 043f e5ff | | Load 0x2,-0x1 0440 822e | . | Call 0x1,0x2e 0441 e402 | | Load 0x2,0x2 0442 0217 | | Execute Heap_Access,All_Reference 0443 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 0444 e5fd | | Load 0x2,-0x3 ; Debug Table 0x18.0x4 = 0x444,0x5 0445 e20d | | Load 0x1,0xd 0446 021f | | Execute Heap_Access,Equal 0447 6806 |h | Jump_Zero 0x44e 0448 e402 | | Load 0x2,0x2 ; Debug Table 0x18.0x5 = 0x448,0x6 0449 e5ff | | Load 0x2,-0x1 044a 0217 | | Execute Heap_Access,All_Reference 044b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 044c 822f | / | Call 0x1,0x2f 044d 4501 |E | Exit_Suprogram New_Top_Offset 0x1 044e e402 | | Load 0x2,0x2 ; Debug Table 0x18.0x6 = 0x44e,0x7 044f e5fd | | Load 0x2,-0x3 0450 822f | / | Call 0x1,0x2f 0451 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0452 0100 | | Execute Exception,Raise 0453 0000 0000 | | .BLANK 0000[0x5] 0458 ; -------------------------------------------------------------------------------------- 0458 ; SUBPROGRAM 0458 ; -------------------------------------------------------------------------------------- 0458 045b | [ | .CONST 0x045b ; Address of begin 0459 0460 | ` | .CONST 0x0460 ; Address of exception handler 045a 0001 | | .CONST 0x0001 ; Number of locals 045b BODY_0458: 045b INIT_0458: 045b e5fe | | Load 0x2,-0x2 ; Debug Table 0x19 = .DEBUG 0x045b,0x09f0,0x0004,0x0000,0x0057,0x3825,0x0000,0x03ff ; Debug Table 0x19.0x0 = 0x45b,0x1 045c e5ff | | Load 0x2,-0x1 045d 821a | | Call 0x1,0x1a 045e a402 | | Store_Unchecked 0x2,0x2 045f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0460 TRAP_0458: 0460 6157 |aW | Indirect_Literal Discrete,0x5b8,{0x00000000, 0x57353502} 0461 010f | | Execute Exception,Equal 0462 6826 |h& | Jump_Zero 0x489 0463 e214 | | Load 0x1,0x14 ; Debug Table 0x19.0x1 = 0x463,0x2 0464 e5ff | | Load 0x2,-0x1 0465 0217 | | Execute Heap_Access,All_Reference 0466 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0467 039c | | Declare_Variable Heap_Access,By_Allocation 0468 00d8 | | Load_Top At_Offset_0 0469 0217 | | Execute Heap_Access,All_Reference 046a 1c00 | | Execute_Immediate Run_Utility,0x0 046b a402 | | Store_Unchecked 0x2,0x2 046c 0007 | | Action Break_Optional ; Debug Table 0x19.0x2 = 0x46c,0x3 046d e402 | | Load 0x2,0x2 ; Debug Table 0x19.0x3 = 0x46d,0x4 046e e5fe | | Load 0x2,-0x2 046f e5ff | | Load 0x2,-0x1 0470 822e | . | Call 0x1,0x2e 0471 e402 | | Load 0x2,0x2 0472 0217 | | Execute Heap_Access,All_Reference 0473 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 0474 e402 | | Load 0x2,0x2 ; Debug Table 0x19.0x4 = 0x474,0x5 0475 0219 | | Execute Heap_Access,All_Read 0476 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 0477 e5fc | | Load 0x2,-0x4 0478 00d9 | | Load_Top At_Offset_1 0479 2a04 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x4 047a 00d1 | | Pop_Control Pop_Count_1 047b e5fd | | Load 0x2,-0x3 ; Debug Table 0x19.0x5 = 0x47b,0x6 047c e214 | | Load 0x1,0x14 047d 021f | | Execute Heap_Access,Equal 047e 6806 |h | Jump_Zero 0x485 047f e402 | | Load 0x2,0x2 ; Debug Table 0x19.0x6 = 0x47f,0x7 0480 e5ff | | Load 0x2,-0x1 0481 0217 | | Execute Heap_Access,All_Reference 0482 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0483 8230 | 0 | Call 0x1,0x30 0484 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0485 e402 | | Load 0x2,0x2 ; Debug Table 0x19.0x7 = 0x485,0x8 0486 e5fd | | Load 0x2,-0x3 0487 8230 | 0 | Call 0x1,0x30 0488 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0489 0100 | | Execute Exception,Raise 048a 0000 0000 | | .BLANK 0000[0x6] 0490 ; -------------------------------------------------------------------------------------- 0490 ; SUBPROGRAM 0490 ; -------------------------------------------------------------------------------------- 0490 0493 | | .CONST 0x0493 ; Address of begin 0491 0498 | | .CONST 0x0498 ; Address of exception handler 0492 0001 | | .CONST 0x0001 ; Number of locals 0493 BODY_0490: 0493 INIT_0490: 0493 e5fe | | Load 0x2,-0x2 ; Debug Table 0x1a = .DEBUG 0x0493,0x0a02,0x0004,0x0000,0x0057,0x3825,0x0000,0x046a ; Debug Table 0x1a.0x0 = 0x493,0x1 0494 e5ff | | Load 0x2,-0x1 0495 8232 | 2 | Call 0x1,0x32 0496 a402 | | Store_Unchecked 0x2,0x2 0497 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0498 TRAP_0490: 0498 611f |a | Indirect_Literal Discrete,0x5b8,{0x00000000, 0x57353502} 0499 010f | | Execute Exception,Equal 049a 681f |h | Jump_Zero 0x4ba 049b e228 | ( | Load 0x1,0x28 ; Debug Table 0x1a.0x1 = 0x49b,0x2 049c e5ff | | Load 0x2,-0x1 049d 0217 | | Execute Heap_Access,All_Reference 049e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 049f 039c | | Declare_Variable Heap_Access,By_Allocation 04a0 00d8 | | Load_Top At_Offset_0 04a1 0217 | | Execute Heap_Access,All_Reference 04a2 1c00 | | Execute_Immediate Run_Utility,0x0 04a3 a402 | | Store_Unchecked 0x2,0x2 04a4 0007 | | Action Break_Optional ; Debug Table 0x1a.0x2 = 0x4a4,0x3 04a5 e402 | | Load 0x2,0x2 ; Debug Table 0x1a.0x3 = 0x4a5,0x4 04a6 e5fe | | Load 0x2,-0x2 04a7 e5ff | | Load 0x2,-0x1 04a8 822e | . | Call 0x1,0x2e 04a9 e402 | | Load 0x2,0x2 04aa 0217 | | Execute Heap_Access,All_Reference 04ab 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 04ac e5fd | | Load 0x2,-0x3 ; Debug Table 0x1a.0x4 = 0x4ac,0x5 04ad e214 | | Load 0x1,0x14 04ae 021f | | Execute Heap_Access,Equal 04af 6806 |h | Jump_Zero 0x4b6 04b0 e402 | | Load 0x2,0x2 ; Debug Table 0x1a.0x5 = 0x4b0,0x6 04b1 e5ff | | Load 0x2,-0x1 04b2 0217 | | Execute Heap_Access,All_Reference 04b3 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 04b4 8230 | 0 | Call 0x1,0x30 04b5 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04b6 e402 | | Load 0x2,0x2 ; Debug Table 0x1a.0x6 = 0x4b6,0x7 04b7 e5fd | | Load 0x2,-0x3 04b8 8230 | 0 | Call 0x1,0x30 04b9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04ba 0100 | | Execute Exception,Raise 04bb 0000 0000 | | .BLANK 0000[0x5] 04c0 ; -------------------------------------------------------------------------------------- 04c0 ; SUBPROGRAM 04c0 ; -------------------------------------------------------------------------------------- 04c0 04c9 | | .CONST 0x04c9 ; Address of begin 04c1 0004 | | .CONST 0x0004 ; Address of exception handler 04c2 0002 | | .CONST 0x0002 ; Number of locals 04c3 INIT_04c0: 04c3 e222 | " | Load 0x1,0x22 ; Debug Table 0x1b = .DEBUG 0x04c3,0x0a12,0x0001,0x0000,0x0057,0x3825,0x0000,0x04b3 ; Debug Table 0x1b.0x0 = 0x4c3,0xffff 04c4 00db | | Load_Top At_Offset_3 04c5 0217 | | Execute Heap_Access,All_Reference 04c6 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 04c7 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 04c8 0031 | 1 | Store_Top Heap_Access,At_Offset_1 04c9 BODY_04c0: 04c9 00cf | | Action Mark_Auxiliary 04ca 7812 |x | Jump 0x4dd 04cb 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1b.0x1 = 0x4cb,0x2 04cc 0219 | | Execute Heap_Access,All_Read 04cd 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 04ce 4800 |H | Short_Literal 0x0 04cf 00d9 | | Load_Top At_Offset_1 04d0 2801 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x1 04d1 00d1 | | Pop_Control Pop_Count_1 04d2 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1b.0x2 = 0x4d2,0x3 04d3 0217 | | Execute Heap_Access,All_Reference 04d4 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 04d5 7002 |p | Jump_Nonzero 0x4d8 04d6 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1b.0x3 = 0x4d6,0x4 04d7 8402 | | Call 0x2,0x2 04d8 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1b.0x4 = 0x4d8,0x5 04d9 0217 | | Execute Heap_Access,All_Reference 04da 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4 04db 0032 | 2 | Store_Top Heap_Access,At_Offset_2 04dc 00c9 | | Action Pop_Auxiliary_Loop 04dd 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1b.0x5 = 0x4dd,0x1 04de 77ec |w | Jump_Nonzero 0x4cb 04df 4502 |E | Exit_Suprogram New_Top_Offset 0x2 04e0 ; -------------------------------------------------------------------------------------- 04e0 ; SUBPROGRAM 04e0 ; -------------------------------------------------------------------------------------- 04e0 04e6 | | .CONST 0x04e6 ; Address of begin 04e1 0004 | | .CONST 0x0004 ; Address of exception handler 04e2 0002 | | .CONST 0x0002 ; Number of locals 04e3 INIT_04e0: 04e3 00da | | Load_Top At_Offset_2 ; Debug Table 0x1c = .DEBUG 0x04e3,0x0a20,0x0802,0x0002,0x0057,0x3825,0x0000,0x0520 ; Debug Table 0x1c.0x0 = 0x4e3,0xffff 04e4 00e0 | | Load_Encached Standard_Cache 04e5 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04e6 BODY_04e0: 04e6 4801 |H | Short_Literal 0x1 ; Debug Table 0x1c.0x1 = 0x4e6,0x1 04e7 e7fe | | Load 0x3,-0x2 04e8 00da | | Load_Top At_Offset_2 04e9 01db | | Execute Vector,Length 04ea 0272 | r | Execute Discrete,Minus 04eb 0248 | H | Execute Discrete,Check_In_Integer 04ec 00e9 | | Load_Encached String_Cache 04ed 035b | [ | Declare_Type Array,Constrained 04ee 0337 | 7 | Declare_Variable Array 04ef 00d8 | | Load_Top At_Offset_0 04f0 01dc | | Execute Vector,Last 04f1 4801 |H | Short_Literal 0x1 04f2 0263 | c | Execute Discrete,Above_Bound 04f3 7005 |p | Jump_Nonzero 0x4f9 04f4 4820 |H | Short_Literal 0x20 04f5 00d9 | | Load_Top At_Offset_1 04f6 e603 | | Load 0x3,0x3 04f7 01d6 | | Execute Vector,Field_Write 04f8 3ffb |? | Loop_Increasing 0x4f4 04f9 00d9 | | Load_Top At_Offset_1 04fa 01cc | | Execute Vector,Catenate 04fb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 04fc 0000 0000 | | .BLANK 0000[0x4] 0500 ; -------------------------------------------------------------------------------------- 0500 ; SUBPROGRAM 0500 ; -------------------------------------------------------------------------------------- 0500 0507 | | .CONST 0x0507 ; Address of begin 0501 0004 | | .CONST 0x0004 ; Address of exception handler 0502 0002 | | .CONST 0x0002 ; Number of locals 0503 INIT_0500: 0503 4801 |H | Short_Literal 0x1 ; Debug Table 0x1d = .DEBUG 0x0503,0x0a26,0x0802,0x0002,0x0057,0x3825,0x0000,0x0550 ; Debug Table 0x1d.0x0 = 0x503,0xffff 0504 480a |H | Short_Literal 0xa 0505 00e9 | | Load_Encached String_Cache 0506 0334 | 4 | Declare_Variable Array,With_Constraint 0507 BODY_0500: 0507 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x1 = 0x507,0x1 0508 e227 | ' | Load 0x1,0x27 0509 1b12 | | Execute Package,Field_Read,Field_Number 0x12 050a 4803 |H | Short_Literal 0x3 050b e7ff | | Load 0x3,-0x1 050c e227 | ' | Load 0x1,0x27 050d 1818 | | Execute Package,Field_Execute,Field_Number 0x18 050e 00d1 | | Pop_Control Pop_Count_1 050f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x2 = 0x50f,0x2 0510 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0511 0000 0000 | | .BLANK 0000[0x7] 0518 ; -------------------------------------------------------------------------------------- 0518 ; SUBPROGRAM 0518 ; -------------------------------------------------------------------------------------- 0518 051e | | .CONST 0x051e ; Address of begin 0519 0004 | | .CONST 0x0004 ; Address of exception handler 051a 0002 | | .CONST 0x0002 ; Number of locals 051b INIT_0518: 051b 00da | | Load_Top At_Offset_2 ; Debug Table 0x1e = .DEBUG 0x051b,0x0a2e,0x0802,0x0002,0x0057,0x3825,0x0000,0x0577 ; Debug Table 0x1e.0x0 = 0x51b,0xffff 051c 00e0 | | Load_Encached Standard_Cache 051d 1818 | | Execute Package,Field_Execute,Field_Number 0x18 051e BODY_0518: 051e 4801 |H | Short_Literal 0x1 ; Debug Table 0x1e.0x1 = 0x51e,0x1 051f e7fe | | Load 0x3,-0x2 0520 00da | | Load_Top At_Offset_2 0521 01db | | Execute Vector,Length 0522 0272 | r | Execute Discrete,Minus 0523 0248 | H | Execute Discrete,Check_In_Integer 0524 00e9 | | Load_Encached String_Cache 0525 035b | [ | Declare_Type Array,Constrained 0526 0337 | 7 | Declare_Variable Array 0527 00d8 | | Load_Top At_Offset_0 0528 01dc | | Execute Vector,Last 0529 4801 |H | Short_Literal 0x1 052a 0263 | c | Execute Discrete,Above_Bound 052b 7005 |p | Jump_Nonzero 0x531 052c 4820 |H | Short_Literal 0x20 052d 00d9 | | Load_Top At_Offset_1 052e e603 | | Load 0x3,0x3 052f 01d6 | | Execute Vector,Field_Write 0530 3ffb |? | Loop_Increasing 0x52c 0531 00d9 | | Load_Top At_Offset_1 0532 01cc | | Execute Vector,Catenate 0533 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0534 0000 0000 | | .BLANK 0000[0x4] 0538 ; -------------------------------------------------------------------------------------- 0538 ; SUBPROGRAM 0538 ; -------------------------------------------------------------------------------------- 0538 053e | > | .CONST 0x053e ; Address of begin 0539 0004 | | .CONST 0x0004 ; Address of exception handler 053a 0002 | | .CONST 0x0002 ; Number of locals 053b INIT_0538: 053b 00da | | Load_Top At_Offset_2 ; Debug Table 0x1f = .DEBUG 0x053b,0x0a34,0x0802,0x0002,0x0057,0x3825,0x0000,0x05a7 ; Debug Table 0x1f.0x0 = 0x53b,0xffff 053c 00e0 | | Load_Encached Standard_Cache 053d 1818 | | Execute Package,Field_Execute,Field_Number 0x18 053e BODY_0538: 053e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1f.0x1 = 0x53e,0x1 053f 01dd | | Execute Vector,First 0540 0a01 | | Execute_Immediate Plus,0x1 0541 0248 | H | Execute Discrete,Check_In_Integer 0542 00d9 | | Load_Top At_Offset_1 0543 01dc | | Execute Vector,Last 0544 00da | | Load_Top At_Offset_2 0545 01cf | | Execute Vector,Slice_Read 0546 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0547 0000 | | .XXX[0x1] 0548 ; -------------------------------------------------------------------------------------- 0548 ; SUBPROGRAM 0548 ; -------------------------------------------------------------------------------------- 0548 054f | O | .CONST 0x054f ; Address of begin 0549 0004 | | .CONST 0x0004 ; Address of exception handler 054a 0002 | | .CONST 0x0002 ; Number of locals 054b INIT_0548: 054b 4800 |H | Short_Literal 0x0 ; Debug Table 0x20 = .DEBUG 0x054b,0x0a3a,0x0802,0x0002,0x0057,0x3825,0x0000,0x05cc ; Debug Table 0x20.0x0 = 0x54b,0xffff 054c 4864 |Hd | Short_Literal 0x64 054d 00e2 | | Load_Encached Integer_Cache 054e 03f8 | | Declare_Type Discrete,Constrained 054f BODY_0548: 054f 00db | | Load_Top At_Offset_3 ; Debug Table 0x20.0x1 = 0x54f,0x1 0550 7002 |p | Jump_Nonzero 0x553 0551 e407 | | Load 0x2,0x7 ; Debug Table 0x20.0x2 = 0x551,0x2 0552 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0553 e7fe | | Load 0x3,-0x2 ; Debug Table 0x20.0x3 = 0x553,0x3 0554 4864 |Hd | Short_Literal 0x64 0555 0271 | q | Execute Discrete,Times 0556 0248 | H | Execute Discrete,Check_In_Integer 0557 0237 | 7 | Execute Float,Convert_From_Discrete 0558 e7ff | | Load 0x3,-0x1 0559 0237 | 7 | Execute Float,Convert_From_Discrete 055a 023a | : | Execute Float,Divide 055b 0235 | 5 | Execute Float,Round_To_Discrete 055c 00e2 | | Load_Encached Integer_Cache 055d 025e | ^ | Execute Discrete,Convert 055e 0059 | Y | Store_Top Discrete,At_Offset_1 055f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x20.0x4 = 0x55f,0x4 0560 0b64 | d | Execute_Immediate Case_Compare,0x64 0561 700e |p | Jump_Nonzero 0x570 0562 00d8 | | Load_Top At_Offset_0 0563 480a |H | Short_Literal 0xa 0564 4863 |Hc | Short_Literal 0x63 0565 0262 | b | Execute Discrete,In_Range 0566 700b |p | Jump_Nonzero 0x572 0567 0092 070a | | Action Push_String_Extended,0x70a ; " (" ; Debug Table 0x20.0x5 = 0x567,0x7 0569 00da | | Load_Top At_Offset_2 056a 840b | | Call 0x2,0xb 056b 01cc | | Execute Vector,Catenate 056c 0092 070b | | Action Push_String_Extended,0x70b ; "%)" 056e 01cc | | Execute Vector,Catenate 056f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0570 e406 | | Load 0x2,0x6 ; Debug Table 0x20.0x6 = 0x570,0x5 0571 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0572 0092 070c | | Action Push_String_Extended,0x70c ; " (" ; Debug Table 0x20.0x7 = 0x572,0x6 0574 00da | | Load_Top At_Offset_2 0575 840b | | Call 0x2,0xb 0576 01cc | | Execute Vector,Catenate 0577 0092 070b | | Action Push_String_Extended,0x70b ; "%)" 0579 01cc | | Execute Vector,Catenate 057a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 057b 0000 0000 | | .BLANK 0000[0x5] 0580 ; -------------------------------------------------------------------------------------- 0580 ; SUBPROGRAM 0580 ; -------------------------------------------------------------------------------------- 0580 0583 | | .CONST 0x0583 ; Address of begin 0581 0004 | | .CONST 0x0004 ; Address of exception handler 0582 0001 | | .CONST 0x0001 ; Number of locals 0583 BODY_0580: 0583 INIT_0580: 0583 00da | | Load_Top At_Offset_2 ; Debug Table 0x21 = .DEBUG 0x0583,0x0a4c,0x0801,0x0002,0x0057,0x3825,0x0000,0x0631 ; Debug Table 0x21.0x0 = 0x583,0x1 0584 0217 | | Execute Heap_Access,All_Reference 0585 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0586 6809 |h | Jump_Zero 0x590 0587 00db | | Load_Top At_Offset_3 ; Debug Table 0x21.0x1 = 0x587,0x2 0588 00db | | Load_Top At_Offset_3 0589 0217 | | Execute Heap_Access,All_Reference 058a 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 058b 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 058c 0273 | s | Execute Discrete,Plus 058d 0248 | H | Execute Discrete,Check_In_Integer 058e a7fe | | Store_Unchecked 0x3,-0x2 058f 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0590 00cf | | Action Mark_Auxiliary ; Debug Table 0x21.0x2 = 0x590,0x3 0591 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x21.0x3 = 0x591,0xfbff 0592 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0593 e222 | " | Load 0x1,0x22 ; Debug Table 0x21.0x4 = 0x593,0xfbfe 0594 e7ff | | Load 0x3,-0x1 0595 0217 | | Execute Heap_Access,All_Reference 0596 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 0597 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 0598 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0599 00cf | | Action Mark_Auxiliary 059a 7809 |x | Jump 0x5a4 059b 00da | | Load_Top At_Offset_2 ; Debug Table 0x21.0x5 = 0x59b,0x402 059c 00da | | Load_Top At_Offset_2 059d 840d | | Call 0x2,0xd 059e 005b | [ | Store_Top Discrete,At_Offset_3 059f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x21.0x6 = 0x59f,0x403 05a0 0217 | | Execute Heap_Access,All_Reference 05a1 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4 05a2 0032 | 2 | Store_Top Heap_Access,At_Offset_2 05a3 00c9 | | Action Pop_Auxiliary_Loop 05a4 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x21.0x7 = 0x5a4,0x401 05a5 77f5 |w | Jump_Nonzero 0x59b 05a6 00ce | | Action Pop_Auxiliary 05a7 e7ff | | Load 0x3,-0x1 ; Debug Table 0x21.0x8 = 0x5a7,0x404 05a8 0219 | | Execute Heap_Access,All_Read 05a9 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 05aa 00da | | Load_Top At_Offset_2 05ab 00d9 | | Load_Top At_Offset_1 05ac 2801 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x1 05ad 00d1 | | Pop_Control Pop_Count_1 05ae e7fe | | Load 0x3,-0x2 ; Debug Table 0x21.0x9 = 0x5ae,0x405 05af 00da | | Load_Top At_Offset_2 05b0 0273 | s | Execute Discrete,Plus 05b1 0248 | H | Execute Discrete,Check_In_Integer 05b2 a7fe | | Store_Unchecked 0x3,-0x2 05b3 00d2 | | Pop_Control Pop_Count_2 05b4 00ce | | Action Pop_Auxiliary 05b5 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05b6 0000 0000 | | .XXX[0x2] 05b8 0000 0000 | | .LITERAL {0x00000000, 0x57353502} 05bc 0000 0000 | | .LITERAL {0x00000000, 0x57353501} 05c0 ; -------------------------------------------------------------------------------------- 05c0 ; SUBPROGRAM 05c0 ; -------------------------------------------------------------------------------------- 05c0 05c6 | | .CONST 0x05c6 ; Address of begin 05c1 0004 | | .CONST 0x0004 ; Address of exception handler 05c2 0002 | | .CONST 0x0002 ; Number of locals 05c3 INIT_05c0: 05c3 e001 | | Load 0x0,0x1 ; Debug Table 0x22 = .DEBUG 0x05c3,0x0a62,0x0801,0x0002,0x0057,0x3825,0x0000,0x0682 ; Debug Table 0x22.0x0 = 0x5c3,0xffff 05c4 191c | | Execute Package,Field_Reference,Field_Number 0x1c 05c5 0007 | | Action Break_Optional 05c6 BODY_05c0: 05c6 00db | | Load_Top At_Offset_3 ; Debug Table 0x22.0x1 = 0x5c6,0x1 05c7 0217 | | Execute Heap_Access,All_Reference 05c8 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 05c9 6823 |h# | Jump_Zero 0x5ed 05ca 00db | | Load_Top At_Offset_3 ; Debug Table 0x22.0x2 = 0x5ca,0x2 05cb 0219 | | Execute Heap_Access,All_Read 05cc 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 05cd e7fe | | Load 0x3,-0x2 05ce e7ff | | Load 0x3,-0x1 05cf 0217 | | Execute Heap_Access,All_Reference 05d0 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 05d1 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 05d2 8602 | | Call 0x3,0x2 05d3 00d9 | | Load_Top At_Offset_1 05d4 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 05d5 00d1 | | Pop_Control Pop_Count_1 05d6 00db | | Load_Top At_Offset_3 ; Debug Table 0x22.0x3 = 0x5d6,0x3 05d7 0219 | | Execute Heap_Access,All_Read 05d8 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 05d9 e7ff | | Load 0x3,-0x1 05da 0217 | | Execute Heap_Access,All_Reference 05db 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 05dc 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3 05dd e7fd | | Load 0x3,-0x3 05de 0272 | r | Execute Discrete,Minus 05df 00d9 | | Load_Top At_Offset_1 05e0 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 05e1 00d1 | | Pop_Control Pop_Count_1 05e2 00db | | Load_Top At_Offset_3 ; Debug Table 0x22.0x4 = 0x5e2,0x4 05e3 0217 | | Execute Heap_Access,All_Reference 05e4 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 05e5 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 05e6 c7fe | | Store 0x3,-0x2 05e7 00db | | Load_Top At_Offset_3 ; Debug Table 0x22.0x5 = 0x5e7,0x5 05e8 0217 | | Execute Heap_Access,All_Reference 05e9 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 05ea 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3 05eb a7fd | | Store_Unchecked 0x3,-0x3 05ec 4502 |E | Exit_Suprogram New_Top_Offset 0x2 05ed 00cf | | Action Mark_Auxiliary ; Debug Table 0x22.0x6 = 0x5ed,0x6 05ee e222 | " | Load 0x1,0x22 ; Debug Table 0x22.0x7 = 0x5ee,0xfbff 05ef e7ff | | Load 0x3,-0x1 05f0 0217 | | Execute Heap_Access,All_Reference 05f1 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 05f2 2e05 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x5 05f3 0031 | 1 | Store_Top Heap_Access,At_Offset_1 05f4 e7ff | | Load 0x3,-0x1 ; Debug Table 0x22.0x8 = 0x5f4,0x401 05f5 0217 | | Execute Heap_Access,All_Reference 05f6 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 05f7 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 05f8 c7fe | | Store 0x3,-0x2 05f9 e7ff | | Load 0x3,-0x1 ; Debug Table 0x22.0x9 = 0x5f9,0x402 05fa 0217 | | Execute Heap_Access,All_Reference 05fb 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 05fc 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3 05fd a7fd | | Store_Unchecked 0x3,-0x3 05fe 00cf | | Action Mark_Auxiliary 05ff 780b |x | Jump 0x60b 0600 e7fd | | Load 0x3,-0x3 ; Debug Table 0x22.0xa = 0x600,0x404 0601 e7fe | | Load 0x3,-0x2 0602 00db | | Load_Top At_Offset_3 0603 840e | | Call 0x2,0xe 0604 c7fe | | Store 0x3,-0x2 0605 c7fd | | Store 0x3,-0x3 0606 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x22.0xb = 0x606,0x405 0607 0217 | | Execute Heap_Access,All_Reference 0608 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4 0609 0032 | 2 | Store_Top Heap_Access,At_Offset_2 060a 00c9 | | Action Pop_Auxiliary_Loop 060b 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x22.0xc = 0x60b,0x403 060c 77f3 |w | Jump_Nonzero 0x600 060d 00ce | | Action Pop_Auxiliary 060e e7ff | | Load 0x3,-0x1 ; Debug Table 0x22.0xd = 0x60e,0x406 060f 0219 | | Execute Heap_Access,All_Read 0610 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 0611 e7ff | | Load 0x3,-0x1 0612 0217 | | Execute Heap_Access,All_Reference 0613 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 0614 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0615 e7fe | | Load 0x3,-0x2 0616 8602 | | Call 0x3,0x2 0617 00d9 | | Load_Top At_Offset_1 0618 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2 0619 00d1 | | Pop_Control Pop_Count_1 061a e7ff | | Load 0x3,-0x1 ; Debug Table 0x22.0xe = 0x61a,0x407 061b 0219 | | Execute Heap_Access,All_Read 061c 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 061d e7fd | | Load 0x3,-0x3 061e e7ff | | Load 0x3,-0x1 061f 0217 | | Execute Heap_Access,All_Reference 0620 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 0621 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3 0622 0272 | r | Execute Discrete,Minus 0623 00d9 | | Load_Top At_Offset_1 0624 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3 0625 00d2 | | Pop_Control Pop_Count_2 0626 00ce | | Action Pop_Auxiliary 0627 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0628 ; -------------------------------------------------------------------------------------- 0628 ; SUBPROGRAM 0628 ; -------------------------------------------------------------------------------------- 0628 062b | + | .CONST 0x062b ; Address of begin 0629 0004 | | .CONST 0x0004 ; Address of exception handler 062a 0001 | | .CONST 0x0001 ; Number of locals 062b BODY_0628: 062b INIT_0628: 062b 00db | | Load_Top At_Offset_3 ; Debug Table 0x23 = .DEBUG 0x062b,0x0a82,0x0801,0x0002,0x0057,0x3825,0x0000,0x070f ; Debug Table 0x23.0x0 = 0x62b,0x1 062c 85fd | | Call 0x2,-0x3 062d 4808 |H | Short_Literal 0x8 ; Debug Table 0x23.0x1 = 0x62d,0x2 062e 00db | | Load_Top At_Offset_3 062f 0217 | | Execute Heap_Access,All_Reference 0630 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 0631 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0632 8408 | | Call 0x2,0x8 0633 85fd | | Call 0x2,-0x3 0634 e7fc | | Load 0x3,-0x4 ; Debug Table 0x23.0x2 = 0x634,0x3 0635 6809 |h | Jump_Zero 0x63f 0636 00da | | Load_Top At_Offset_2 ; Debug Table 0x23.0x3 = 0x636,0x4 0637 0217 | | Execute Heap_Access,All_Reference 0638 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 0639 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 063a e7fd | | Load 0x3,-0x3 063b 00e3 | | Load_Encached Natural_Cache 063c 025b | [ | Execute Discrete,Check_In_Type 063d 840c | | Call 0x2,0xc 063e 85fd | | Call 0x2,-0x3 063f e405 | | Load 0x2,0x5 ; Debug Table 0x23.0x4 = 0x63f,0x5 0640 85fd | | Call 0x2,-0x3 0641 00da | | Load_Top At_Offset_2 ; Debug Table 0x23.0x5 = 0x641,0x6 0642 0217 | | Execute Heap_Access,All_Reference 0643 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3 0644 0217 | | Execute Heap_Access,All_Reference 0645 85fd | | Call 0x2,-0x3 0646 85fe | | Call 0x2,-0x2 ; Debug Table 0x23.0x6 = 0x646,0x7 0647 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0648 ; -------------------------------------------------------------------------------------- 0648 ; SUBPROGRAM 0648 ; -------------------------------------------------------------------------------------- 0648 065b | [ | .CONST 0x065b ; Address of begin 0649 0004 | | .CONST 0x0004 ; Address of exception handler 064a 0004 | | .CONST 0x0004 ; Number of locals 064b INIT_0648: 064b 00db | | Load_Top At_Offset_3 ; Debug Table 0x24 = .DEBUG 0x064b,0x0a92,0x0801,0x0002,0x0057,0x3825,0x0000,0x0750 ; Debug Table 0x24.0x0 = 0x64b,0xffff 064c 0092 070d | | Action Push_String_Extended,0x70d ; " " 064e 01cc | | Execute Vector,Catenate 064f 0007 | | Action Break_Optional 0650 e222 | " | Load 0x1,0x22 ; Debug Table 0x24.0x1 = 0x650,0xfffe 0651 e7ff | | Load 0x3,-0x1 0652 0217 | | Execute Heap_Access,All_Reference 0653 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 0654 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 0655 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0656 e7fe | | Load 0x3,-0x2 ; Debug Table 0x24.0x2 = 0x656,0xfffd 0657 01db | | Execute Vector,Length 0658 0f00 | | Execute_Immediate Equal,0x0 0659 00e1 | | Load_Encached Boolean_Cache 065a 03f1 | | Declare_Variable Discrete,With_Value 065b BODY_0648: 065b 00cf | | Action Mark_Auxiliary 065c 7825 |x% | Jump 0x682 065d 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x24.0x3 = 0x65d,0x2 065e 6801 |h | Jump_Zero 0x660 065f 85fe | | Call 0x2,-0x2 ; Debug Table 0x24.0x4 = 0x65f,0x3 0660 00da | | Load_Top At_Offset_2 ; Debug Table 0x24.0x5 = 0x660,0x4 0661 0217 | | Execute Heap_Access,All_Reference 0662 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0663 4601 |F | Jump_Case 0x2 0664 7801 |x | Jump 0x666 ; case 0x0 0665 780c |x | Jump 0x672 ; case 0x1 0666 e7ff | | Load 0x3,-0x1 ; Debug Table 0x24.0x6 = 0x666,0x5 0667 0217 | | Execute Heap_Access,All_Reference 0668 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 0669 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 066a e7ff | | Load 0x3,-0x1 066b 0217 | | Execute Heap_Access,All_Reference 066c 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 066d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 066e e602 | | Load 0x3,0x2 066f e603 | | Load 0x3,0x3 0670 8410 | | Call 0x2,0x10 0671 780b |x | Jump 0x67d 0672 e7ff | | Load 0x3,-0x1 ; Debug Table 0x24.0x7 = 0x672,0x6 0673 0217 | | Execute Heap_Access,All_Reference 0674 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 0675 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2 0676 e7ff | | Load 0x3,-0x1 0677 0217 | | Execute Heap_Access,All_Reference 0678 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 0679 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 067a e602 | | Load 0x3,0x2 067b e603 | | Load 0x3,0x3 067c 840f | | Call 0x2,0xf 067d 00da | | Load_Top At_Offset_2 ; Debug Table 0x24.0x8 = 0x67d,0x7 067e 0217 | | Execute Heap_Access,All_Reference 067f 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4 0680 0033 | 3 | Store_Top Heap_Access,At_Offset_3 0681 00c9 | | Action Pop_Auxiliary_Loop 0682 00da | | Load_Top At_Offset_2 ; Debug Table 0x24.0x9 = 0x682,0x1 0683 77d9 |w | Jump_Nonzero 0x65d 0684 00ce | | Action Pop_Auxiliary 0685 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x24.0xa = 0x685,0x8 0686 701c |p | Jump_Nonzero 0x6a3 0687 e7fe | | Load 0x3,-0x2 ; Debug Table 0x24.0xb = 0x687,0x9 0688 85fd | | Call 0x2,-0x3 0689 4808 |H | Short_Literal 0x8 ; Debug Table 0x24.0xc = 0x689,0xa 068a e7ff | | Load 0x3,-0x1 068b 0217 | | Execute Heap_Access,All_Reference 068c 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 068d 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 068e 8408 | | Call 0x2,0x8 068f 85fd | | Call 0x2,-0x3 0690 e7fc | | Load 0x3,-0x4 ; Debug Table 0x24.0xd = 0x690,0xb 0691 6809 |h | Jump_Zero 0x69b 0692 e7ff | | Load 0x3,-0x1 ; Debug Table 0x24.0xe = 0x692,0xc 0693 0217 | | Execute Heap_Access,All_Reference 0694 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 0695 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0696 e7fd | | Load 0x3,-0x3 0697 00e3 | | Load_Encached Natural_Cache 0698 025b | [ | Execute Discrete,Check_In_Type 0699 840c | | Call 0x2,0xc 069a 85fd | | Call 0x2,-0x3 069b e405 | | Load 0x2,0x5 ; Debug Table 0x24.0xf = 0x69b,0xd 069c 85fd | | Call 0x2,-0x3 069d e7ff | | Load 0x3,-0x1 ; Debug Table 0x24.0x10 = 0x69d,0xe 069e 0217 | | Execute Heap_Access,All_Reference 069f 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3 06a0 0217 | | Execute Heap_Access,All_Reference 06a1 85fd | | Call 0x2,-0x3 06a2 85fe | | Call 0x2,-0x2 ; Debug Table 0x24.0x11 = 0x6a2,0xf 06a3 4505 |E | Exit_Suprogram New_Top_Offset 0x5 06a4 0000 0000 | | .BLANK 0000[0x4] 06a8 ; -------------------------------------------------------------------------------------- 06a8 ; SUBPROGRAM 06a8 ; -------------------------------------------------------------------------------------- 06a8 06ab | | .CONST 0x06ab ; Address of begin 06a9 0004 | | .CONST 0x0004 ; Address of exception handler 06aa 0001 | | .CONST 0x0001 ; Number of locals 06ab BODY_06a8: 06ab INIT_06a8: 06ab 00db | | Load_Top At_Offset_3 ; Debug Table 0x25 = .DEBUG 0x06ab,0x0ab8,0x0801,0x0002,0x0057,0x3825,0x0000,0x07eb ; Debug Table 0x25.0x0 = 0x6ab,0x1 06ac 85fd | | Call 0x2,-0x3 06ad 4808 |H | Short_Literal 0x8 ; Debug Table 0x25.0x1 = 0x6ad,0x2 06ae 00db | | Load_Top At_Offset_3 06af 0217 | | Execute Heap_Access,All_Reference 06b0 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 06b1 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2 06b2 8409 | | Call 0x2,0x9 06b3 85fd | | Call 0x2,-0x3 06b4 0092 070e | | Action Push_String_Extended,0x70e ; " " ; Debug Table 0x25.0x2 = 0x6b4,0x3 06b6 85fd | | Call 0x2,-0x3 06b7 4808 |H | Short_Literal 0x8 ; Debug Table 0x25.0x3 = 0x6b7,0x4 06b8 00db | | Load_Top At_Offset_3 06b9 0217 | | Execute Heap_Access,All_Reference 06ba 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 06bb 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3 06bc 840a | | Call 0x2,0xa 06bd 85fd | | Call 0x2,-0x3 06be e405 | | Load 0x2,0x5 ; Debug Table 0x25.0x4 = 0x6be,0x5 06bf 85fd | | Call 0x2,-0x3 06c0 00da | | Load_Top At_Offset_2 ; Debug Table 0x25.0x5 = 0x6c0,0x6 06c1 0217 | | Execute Heap_Access,All_Reference 06c2 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3 06c3 0217 | | Execute Heap_Access,All_Reference 06c4 85fd | | Call 0x2,-0x3 06c5 85fe | | Call 0x2,-0x2 ; Debug Table 0x25.0x6 = 0x6c5,0x7 06c6 4504 |E | Exit_Suprogram New_Top_Offset 0x4 06c7 0000 | | .XXX[0x1] 06c8 ; -------------------------------------------------------------------------------------- 06c8 ; SUBPROGRAM 06c8 ; -------------------------------------------------------------------------------------- 06c8 06db | | .CONST 0x06db ; Address of begin 06c9 0004 | | .CONST 0x0004 ; Address of exception handler 06ca 0004 | | .CONST 0x0004 ; Number of locals 06cb INIT_06c8: 06cb 00db | | Load_Top At_Offset_3 ; Debug Table 0x26 = .DEBUG 0x06cb,0x0ac8,0x0801,0x0002,0x0057,0x3825,0x0000,0x0827 ; Debug Table 0x26.0x0 = 0x6cb,0xffff 06cc 0092 070d | | Action Push_String_Extended,0x70d ; " " 06ce 01cc | | Execute Vector,Catenate 06cf 0007 | | Action Break_Optional 06d0 e222 | " | Load 0x1,0x22 ; Debug Table 0x26.0x1 = 0x6d0,0xfffe 06d1 e7ff | | Load 0x3,-0x1 06d2 0217 | | Execute Heap_Access,All_Reference 06d3 2706 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x6 06d4 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3 06d5 0031 | 1 | Store_Top Heap_Access,At_Offset_1 06d6 e7fe | | Load 0x3,-0x2 ; Debug Table 0x26.0x2 = 0x6d6,0xfffd 06d7 01db | | Execute Vector,Length 06d8 0f00 | | Execute_Immediate Equal,0x0 06d9 00e1 | | Load_Encached Boolean_Cache 06da 03f1 | | Declare_Variable Discrete,With_Value 06db BODY_06c8: 06db 00cf | | Action Mark_Auxiliary 06dc 781d |x | Jump 0x6fa 06dd 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x26.0x3 = 0x6dd,0x2 06de 6801 |h | Jump_Zero 0x6e0 06df 85fe | | Call 0x2,-0x2 ; Debug Table 0x26.0x4 = 0x6df,0x3 06e0 00da | | Load_Top At_Offset_2 ; Debug Table 0x26.0x5 = 0x6e0,0x4 06e1 0217 | | Execute Heap_Access,All_Reference 06e2 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 06e3 4601 |F | Jump_Case 0x2 06e4 7801 |x | Jump 0x6e6 ; case 0x0 06e5 7808 |x | Jump 0x6ee ; case 0x1 06e6 e7ff | | Load 0x3,-0x1 ; Debug Table 0x26.0x6 = 0x6e6,0x5 06e7 0217 | | Execute Heap_Access,All_Reference 06e8 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 06e9 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 06ea e602 | | Load 0x3,0x2 06eb e603 | | Load 0x3,0x3 06ec 8412 | | Call 0x2,0x12 06ed 7807 |x | Jump 0x6f5 06ee e7ff | | Load 0x3,-0x1 ; Debug Table 0x26.0x7 = 0x6ee,0x6 06ef 0217 | | Execute Heap_Access,All_Reference 06f0 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 06f1 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 06f2 e602 | | Load 0x3,0x2 06f3 e603 | | Load 0x3,0x3 06f4 8411 | | Call 0x2,0x11 06f5 00da | | Load_Top At_Offset_2 ; Debug Table 0x26.0x8 = 0x6f5,0x7 06f6 0217 | | Execute Heap_Access,All_Reference 06f7 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4 06f8 0033 | 3 | Store_Top Heap_Access,At_Offset_3 06f9 00c9 | | Action Pop_Auxiliary_Loop 06fa 00da | | Load_Top At_Offset_2 ; Debug Table 0x26.0x9 = 0x6fa,0x1 06fb 77e1 |w | Jump_Nonzero 0x6dd 06fc 00ce | | Action Pop_Auxiliary 06fd 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x26.0xa = 0x6fd,0x8 06fe 7007 |p | Jump_Nonzero 0x706 06ff e7ff | | Load 0x3,-0x1 ; Debug Table 0x26.0xb = 0x6ff,0x9 0700 0217 | | Execute Heap_Access,All_Reference 0701 2705 |' | Execute Variant_Record,Field_Reference,Variant,Indirect,Field_Number 0x5 0702 2e04 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x4 0703 e7fe | | Load 0x3,-0x2 0704 e7ff | | Load 0x3,-0x1 0705 8411 | | Call 0x2,0x11 0706 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0707 ; -------------------------------------------------------------------------------------- 0707 ; STRING TABLE 0707 ; -------------------------------------------------------------------------------------- 0707 0012 | | .STRTAB 0x0012->0x0710 ; " " 0708 0011 | | .STRTAB 0x0011->0x0710 ; " (100%)" 0709 0016 | | .STRTAB 0x0016->0x0714 ; " (0%)" 070a 001b | | .STRTAB 0x001b->0x0717 ; " (" 070b 001d | | .STRTAB 0x001d->0x0719 ; "%)" 070c 001d | | .STRTAB 0x001d->0x071a ; " (" 070d 001e | | .STRTAB 0x001e->0x071c ; " " 070e 0022 | " | .STRTAB 0x0022->0x071f ; " " 070f 0023 | # | .STREND 0x0023->0x0720 0710 2020 2831 | (1| .STRTAB_STRINGS 0721 0000 0000 | | .BLANK 0000[0x7] 0728 ; -------------------------------------------------------------------------------------- 0728 ; Debug Table 0728 ; -------------------------------------------------------------------------------------- 0728 0003 0027 | '| .CONST 0x0003,0x0027 072a 000b 0862 | b| .DEBUG 0x000b,0x0862,0x8000,0x0000,0x0057,0x3535,0x0000,0x0007 0732 0091 08b4 | | .DEBUG 0x0091,0x08b4,0x8000,0x0000,0x0057,0x3825,0x0000,0x000b 073a 00eb 08ec | | .DEBUG 0x00eb,0x08ec,0x0002,0x0000,0x0057,0x3535,0x0000,0x0018 0742 00fb 08f4 | | .DEBUG 0x00fb,0x08f4,0x0002,0x0000,0x0057,0x3535,0x0000,0x002f 074a 010b 08fc | | .DEBUG 0x010b,0x08fc,0x0001,0x0000,0x0057,0x3535,0x0000,0x0041 0752 011b 0904 | | .DEBUG 0x011b,0x0904,0x0002,0x0000,0x0057,0x3535,0x0000,0x005e 075a 0133 0910 | 3 | .DEBUG 0x0133,0x0910,0x0001,0x0000,0x0057,0x3535,0x0000,0x0075 0762 014b 091a | K | .DEBUG 0x014b,0x091a,0x0002,0x0000,0x0057,0x3535,0x0000,0x0086 076a 01b3 092c | ,| .DEBUG 0x01b3,0x092c,0x0002,0x0000,0x0057,0x3535,0x0000,0x0094 0772 01c3 0930 | 0| .DEBUG 0x01c3,0x0930,0x0002,0x0000,0x0057,0x3535,0x0000,0x00a1 077a 01d3 0934 | 4| .DEBUG 0x01d3,0x0934,0x0002,0x0000,0x0057,0x3535,0x0000,0x00ae 0782 01e3 0938 | 8| .DEBUG 0x01e3,0x0938,0x0001,0x0000,0x0057,0x3535,0x0000,0x00be 078a 01f3 093c | <| .DEBUG 0x01f3,0x093c,0x0001,0x0000,0x0057,0x3535,0x0000,0x00ca 0792 0203 0940 | @| .DEBUG 0x0203,0x0940,0x0001,0x0000,0x0057,0x3535,0x0000,0x00d7 079a 0213 0946 | F| .DEBUG 0x0213,0x0946,0x2801,0x0002,0x0057,0x3535,0x0000,0x00df 07a2 025b 0972 | [ r| .DEBUG 0x025b,0x0972,0x0005,0x0000,0x0057,0x3535,0x0000,0x012a 07aa 0303 0974 | t| .DEBUG 0x0303,0x0974,0x0002,0x0000,0x0057,0x3825,0x0000,0x0074 07b2 031b 097a | z| .DEBUG 0x031b,0x097a,0x0002,0x0000,0x0057,0x3825,0x0000,0x010c 07ba 0343 0986 | C | .DEBUG 0x0343,0x0986,0x0001,0x0000,0x0057,0x3825,0x0000,0x0147 07c2 036b 0996 | k | .DEBUG 0x036b,0x0996,0x0001,0x0000,0x0057,0x3825,0x0000,0x0186 07ca 0393 09a6 | | .DEBUG 0x0393,0x09a6,0x0002,0x0000,0x0057,0x3825,0x0000,0x01c5 07d2 03ab 09b4 | | .DEBUG 0x03ab,0x09b4,0x0002,0x0000,0x0057,0x3825,0x0000,0x0243 07da 03bb 09b8 | | .DEBUG 0x03bb,0x09b8,0x0004,0x0000,0x0057,0x3825,0x0000,0x02c5 07e2 03f3 09cc | | .DEBUG 0x03f3,0x09cc,0x0004,0x0000,0x0057,0x3825,0x0000,0x032f 07ea 042b 09e0 | + | .DEBUG 0x042b,0x09e0,0x0004,0x0000,0x0057,0x3825,0x0000,0x0392 07f2 045b 09f0 | [ | .DEBUG 0x045b,0x09f0,0x0004,0x0000,0x0057,0x3825,0x0000,0x03ff 07fa 0493 0a02 | | .DEBUG 0x0493,0x0a02,0x0004,0x0000,0x0057,0x3825,0x0000,0x046a 0802 04c3 0a12 | | .DEBUG 0x04c3,0x0a12,0x0001,0x0000,0x0057,0x3825,0x0000,0x04b3 080a 04e3 0a20 | | .DEBUG 0x04e3,0x0a20,0x0802,0x0002,0x0057,0x3825,0x0000,0x0520 0812 0503 0a26 | &| .DEBUG 0x0503,0x0a26,0x0802,0x0002,0x0057,0x3825,0x0000,0x0550 081a 051b 0a2e | .| .DEBUG 0x051b,0x0a2e,0x0802,0x0002,0x0057,0x3825,0x0000,0x0577 0822 053b 0a34 | ; 4| .DEBUG 0x053b,0x0a34,0x0802,0x0002,0x0057,0x3825,0x0000,0x05a7 082a 054b 0a3a | K :| .DEBUG 0x054b,0x0a3a,0x0802,0x0002,0x0057,0x3825,0x0000,0x05cc 0832 0583 0a4c | L| .DEBUG 0x0583,0x0a4c,0x0801,0x0002,0x0057,0x3825,0x0000,0x0631 083a 05c3 0a62 | b| .DEBUG 0x05c3,0x0a62,0x0801,0x0002,0x0057,0x3825,0x0000,0x0682 0842 062b 0a82 | + | .DEBUG 0x062b,0x0a82,0x0801,0x0002,0x0057,0x3825,0x0000,0x070f 084a 064b 0a92 | K | .DEBUG 0x064b,0x0a92,0x0801,0x0002,0x0057,0x3825,0x0000,0x0750 0852 06ab 0ab8 | | .DEBUG 0x06ab,0x0ab8,0x0801,0x0002,0x0057,0x3825,0x0000,0x07eb 085a 06cb 0ac8 | | .DEBUG 0x06cb,0x0ac8,0x0801,0x0002,0x0057,0x3825,0x0000,0x0827 0862 ; -------------------------------------------------------------------------------------- 0862 ; Debug3 Subtable 0x0 0862 ; -------------------------------------------------------------------------------------- 0862 0028 0000 | ( | .DBG3TAB 0x0028,0x0000 0864 000b ffff | | .CONST 0x000b,0xffff 0866 000c fffe | | .CONST 0x000c,0xfffe 0868 000d fffd | | .CONST 0x000d,0xfffd 086a 000e fffc | | .CONST 0x000e,0xfffc 086c 000f fffb | | .CONST 0x000f,0xfffb 086e 0011 fffa | | .CONST 0x0011,0xfffa 0870 0013 fff9 | | .CONST 0x0013,0xfff9 0872 0015 fff8 | | .CONST 0x0015,0xfff8 0874 0016 fff7 | | .CONST 0x0016,0xfff7 0876 0017 fff6 | | .CONST 0x0017,0xfff6 0878 0019 fff5 | | .CONST 0x0019,0xfff5 087a 001b fff4 | | .CONST 0x001b,0xfff4 087c 001d fff3 | | .CONST 0x001d,0xfff3 087e 001e fff2 | | .CONST 0x001e,0xfff2 0880 0020 fff1 | | .CONST 0x0020,0xfff1 0882 0022 fff0 | " | .CONST 0x0022,0xfff0 0884 0024 ffef | $ | .CONST 0x0024,0xffef 0886 0025 ffee | % | .CONST 0x0025,0xffee 0888 0027 ffed | ' | .CONST 0x0027,0xffed 088a 0029 ffec | ) | .CONST 0x0029,0xffec 088c 002b ffeb | + | .CONST 0x002b,0xffeb 088e 002d ffea | - | .CONST 0x002d,0xffea 0890 0034 ffe9 | 4 | .CONST 0x0034,0xffe9 0892 0037 ffe8 | 7 | .CONST 0x0037,0xffe8 0894 003b ffe7 | ; | .CONST 0x003b,0xffe7 0896 0040 ffe6 | @ | .CONST 0x0040,0xffe6 0898 0041 ffe5 | A | .CONST 0x0041,0xffe5 089a 0042 ffe4 | B | .CONST 0x0042,0xffe4 089c 0043 ffe3 | C | .CONST 0x0043,0xffe3 089e 0044 ffe2 | D | .CONST 0x0044,0xffe2 08a0 0045 ffe1 | E | .CONST 0x0045,0xffe1 08a2 006b ffe0 | k | .CONST 0x006b,0xffe0 08a4 0073 ffdf | s | .CONST 0x0073,0xffdf 08a6 007b ffde | { | .CONST 0x007b,0xffde 08a8 0083 ffdd | | .CONST 0x0083,0xffdd 08aa 0086 ffdc | | .CONST 0x0086,0xffdc 08ac 0089 ffdb | | .CONST 0x0089,0xffdb 08ae 008b ffda | | .CONST 0x008b,0xffda 08b0 008f ffd9 | | .CONST 0x008f,0xffd9 08b2 0090 ffd8 | | .CONST 0x0090,0xffd8 08b4 ; -------------------------------------------------------------------------------------- 08b4 ; Debug3 Subtable 0x1 08b4 ; -------------------------------------------------------------------------------------- 08b4 001b 0000 | | .DBG3TAB 0x001b,0x0000 08b6 0091 ffff | | .CONST 0x0091,0xffff 08b8 0099 fffe | | .CONST 0x0099,0xfffe 08ba 00a1 fffd | | .CONST 0x00a1,0xfffd 08bc 00a8 fffc | | .CONST 0x00a8,0xfffc 08be 00ac fffb | | .CONST 0x00ac,0xfffb 08c0 00b0 fffa | | .CONST 0x00b0,0xfffa 08c2 00b4 fff9 | | .CONST 0x00b4,0xfff9 08c4 00b8 fff8 | | .CONST 0x00b8,0xfff8 08c6 00bf fff7 | | .CONST 0x00bf,0xfff7 08c8 00c1 fff6 | | .CONST 0x00c1,0xfff6 08ca 00c3 fff5 | | .CONST 0x00c3,0xfff5 08cc 00c5 fff4 | | .CONST 0x00c5,0xfff4 08ce 00c7 fff3 | | .CONST 0x00c7,0xfff3 08d0 00c9 fff2 | | .CONST 0x00c9,0xfff2 08d2 00cb fff1 | | .CONST 0x00cb,0xfff1 08d4 00cd fff0 | | .CONST 0x00cd,0xfff0 08d6 00cf ffef | | .CONST 0x00cf,0xffef 08d8 00d1 ffee | | .CONST 0x00d1,0xffee 08da 00d3 ffed | | .CONST 0x00d3,0xffed 08dc 00d5 ffec | | .CONST 0x00d5,0xffec 08de 00d7 ffeb | | .CONST 0x00d7,0xffeb 08e0 00d9 ffea | | .CONST 0x00d9,0xffea 08e2 00db ffe9 | | .CONST 0x00db,0xffe9 08e4 00dd ffe8 | | .CONST 0x00dd,0xffe8 08e6 00df ffe7 | | .CONST 0x00df,0xffe7 08e8 00e1 ffe6 | | .CONST 0x00e1,0xffe6 08ea 00e3 ffe5 | | .CONST 0x00e3,0xffe5 08ec ; -------------------------------------------------------------------------------------- 08ec ; Debug3 Subtable 0x2 08ec ; -------------------------------------------------------------------------------------- 08ec 0001 0002 | | .DBG3TAB 0x0001,0x0002 08ee 00eb ffff | | .CONST 0x00eb,0xffff 08f0 00ee 0001 | | .CONST 0x00ee,0x0001 08f2 00ef 0002 | | .CONST 0x00ef,0x0002 08f4 ; -------------------------------------------------------------------------------------- 08f4 ; Debug3 Subtable 0x3 08f4 ; -------------------------------------------------------------------------------------- 08f4 0001 0002 | | .DBG3TAB 0x0001,0x0002 08f6 00fb ffff | | .CONST 0x00fb,0xffff 08f8 00fe 0001 | | .CONST 0x00fe,0x0001 08fa 00ff 0002 | | .CONST 0x00ff,0x0002 08fc ; -------------------------------------------------------------------------------------- 08fc ; Debug3 Subtable 0x4 08fc ; -------------------------------------------------------------------------------------- 08fc 0001 0002 | | .DBG3TAB 0x0001,0x0002 08fe 010b ffff | | .CONST 0x010b,0xffff 0900 010e 0001 | | .CONST 0x010e,0x0001 0902 010f 0002 | | .CONST 0x010f,0x0002 0904 ; -------------------------------------------------------------------------------------- 0904 ; Debug3 Subtable 0x5 0904 ; -------------------------------------------------------------------------------------- 0904 0001 0004 | | .DBG3TAB 0x0001,0x0004 0906 011b ffff | | .CONST 0x011b,0xffff 0908 011e 0001 | | .CONST 0x011e,0x0001 090a 011f 0002 | | .CONST 0x011f,0x0002 090c 0127 0003 | ' | .CONST 0x0127,0x0003 090e 012e 0004 | . | .CONST 0x012e,0x0004 0910 ; -------------------------------------------------------------------------------------- 0910 ; Debug3 Subtable 0x6 0910 ; -------------------------------------------------------------------------------------- 0910 0001 0003 | | .DBG3TAB 0x0001,0x0003 0912 0133 ffff | 3 | .CONST 0x0133,0xffff 0914 0136 0001 | 6 | .CONST 0x0136,0x0001 0916 0137 0002 | 7 | .CONST 0x0137,0x0002 0918 013f 0003 | ? | .CONST 0x013f,0x0003 091a ; -------------------------------------------------------------------------------------- 091a ; Debug3 Subtable 0x7 091a ; -------------------------------------------------------------------------------------- 091a 0002 0006 | | .DBG3TAB 0x0002,0x0006 091c 014b ffff | K | .CONST 0x014b,0xffff 091e 0150 fffe | P | .CONST 0x0150,0xfffe 0920 0151 0001 | Q | .CONST 0x0151,0x0001 0922 0171 0002 | q | .CONST 0x0171,0x0002 0924 0172 0003 | r | .CONST 0x0172,0x0003 0926 019e 0004 | | .CONST 0x019e,0x0004 0928 019f 0005 | | .CONST 0x019f,0x0005 092a 01aa 0006 | | .CONST 0x01aa,0x0006 092c ; -------------------------------------------------------------------------------------- 092c ; Debug3 Subtable 0x8 092c ; -------------------------------------------------------------------------------------- 092c 0000 0001 | | .DBG3TAB 0x0000,0x0001 092e 01b3 0001 | | .CONST 0x01b3,0x0001 0930 ; -------------------------------------------------------------------------------------- 0930 ; Debug3 Subtable 0x9 0930 ; -------------------------------------------------------------------------------------- 0930 0000 0001 | | .DBG3TAB 0x0000,0x0001 0932 01c3 0001 | | .CONST 0x01c3,0x0001 0934 ; -------------------------------------------------------------------------------------- 0934 ; Debug3 Subtable 0xa 0934 ; -------------------------------------------------------------------------------------- 0934 0000 0001 | | .DBG3TAB 0x0000,0x0001 0936 01d3 0001 | | .CONST 0x01d3,0x0001 0938 ; -------------------------------------------------------------------------------------- 0938 ; Debug3 Subtable 0xb 0938 ; -------------------------------------------------------------------------------------- 0938 0000 0001 | | .DBG3TAB 0x0000,0x0001 093a 01e3 0001 | | .CONST 0x01e3,0x0001 093c ; -------------------------------------------------------------------------------------- 093c ; Debug3 Subtable 0xc 093c ; -------------------------------------------------------------------------------------- 093c 0000 0001 | | .DBG3TAB 0x0000,0x0001 093e 01f3 0001 | | .CONST 0x01f3,0x0001 0940 ; -------------------------------------------------------------------------------------- 0940 ; Debug3 Subtable 0xd 0940 ; -------------------------------------------------------------------------------------- 0940 0001 0001 | | .DBG3TAB 0x0001,0x0001 0942 0203 ffff | | .CONST 0x0203,0xffff 0944 0205 0001 | | .CONST 0x0205,0x0001 0946 ; -------------------------------------------------------------------------------------- 0946 ; Debug3 Subtable 0xe 0946 ; -------------------------------------------------------------------------------------- 0946 0011 0004 | | .DBG3TAB 0x0011,0x0004 0948 0213 ffff | | .CONST 0x0213,0xffff 094a 0215 fffe | | .CONST 0x0215,0xfffe 094c 021a fffd | | .CONST 0x021a,0xfffd 094e 021c fffc | | .CONST 0x021c,0xfffc 0950 021e fffb | | .CONST 0x021e,0xfffb 0952 0220 fffa | | .CONST 0x0220,0xfffa 0954 0222 fff9 | " | .CONST 0x0222,0xfff9 0956 0224 fff8 | $ | .CONST 0x0224,0xfff8 0958 0226 fff7 | & | .CONST 0x0226,0xfff7 095a 0228 fff6 | ( | .CONST 0x0228,0xfff6 095c 022a fff5 | * | .CONST 0x022a,0xfff5 095e 022c fff4 | , | .CONST 0x022c,0xfff4 0960 022e fff3 | . | .CONST 0x022e,0xfff3 0962 0230 fff2 | 0 | .CONST 0x0230,0xfff2 0964 0232 fff1 | 2 | .CONST 0x0232,0xfff1 0966 0234 fff0 | 4 | .CONST 0x0234,0xfff0 0968 0236 ffef | 6 | .CONST 0x0236,0xffef 096a 0238 0001 | 8 | .CONST 0x0238,0x0001 096c 0240 0002 | @ | .CONST 0x0240,0x0002 096e 0247 0003 | G | .CONST 0x0247,0x0003 0970 024f 0004 | O | .CONST 0x024f,0x0004 0972 ; -------------------------------------------------------------------------------------- 0972 ; Debug3 Subtable 0xf 0972 ; -------------------------------------------------------------------------------------- 0972 0000 0000 | | .DBG3TAB 0x0000,0x0000 0974 ; -------------------------------------------------------------------------------------- 0974 ; Debug3 Subtable 0x10 0974 ; -------------------------------------------------------------------------------------- 0974 0000 0002 | | .DBG3TAB 0x0000,0x0002 0976 0303 0001 | | .CONST 0x0303,0x0001 0978 030b 0002 | | .CONST 0x030b,0x0002 097a ; -------------------------------------------------------------------------------------- 097a ; Debug3 Subtable 0x11 097a ; -------------------------------------------------------------------------------------- 097a 0002 0003 | | .DBG3TAB 0x0002,0x0003 097c 031b ffff | | .CONST 0x031b,0xffff 097e 0323 fffe | # | .CONST 0x0323,0xfffe 0980 0324 0001 | $ | .CONST 0x0324,0x0001 0982 0330 0002 | 0 | .CONST 0x0330,0x0002 0984 0336 0003 | 6 | .CONST 0x0336,0x0003 0986 ; -------------------------------------------------------------------------------------- 0986 ; Debug3 Subtable 0x12 0986 ; -------------------------------------------------------------------------------------- 0986 0001 0006 | | .DBG3TAB 0x0001,0x0006 0988 0343 ffff | C | .CONST 0x0343,0xffff 098a 0345 0001 | E | .CONST 0x0345,0x0001 098c 034a 0002 | J | .CONST 0x034a,0x0002 098e 0352 0003 | R | .CONST 0x0352,0x0003 0990 0359 0005 | Y | .CONST 0x0359,0x0005 0992 035e 0004 | ^ | .CONST 0x035e,0x0004 0994 0363 0006 | c | .CONST 0x0363,0x0006 0996 ; -------------------------------------------------------------------------------------- 0996 ; Debug3 Subtable 0x13 0996 ; -------------------------------------------------------------------------------------- 0996 0001 0006 | | .DBG3TAB 0x0001,0x0006 0998 036b ffff | k | .CONST 0x036b,0xffff 099a 036d 0001 | m | .CONST 0x036d,0x0001 099c 0372 0002 | r | .CONST 0x0372,0x0002 099e 037a 0003 | z | .CONST 0x037a,0x0003 09a0 0381 0005 | | .CONST 0x0381,0x0005 09a2 0386 0004 | | .CONST 0x0386,0x0004 09a4 038b 0006 | | .CONST 0x038b,0x0006 09a6 ; -------------------------------------------------------------------------------------- 09a6 ; Debug3 Subtable 0x14 09a6 ; -------------------------------------------------------------------------------------- 09a6 0002 0004 | | .DBG3TAB 0x0002,0x0004 09a8 0393 ffff | | .CONST 0x0393,0xffff 09aa 0395 fffe | | .CONST 0x0395,0xfffe 09ac 0396 0001 | | .CONST 0x0396,0x0001 09ae 03a0 0002 | | .CONST 0x03a0,0x0002 09b0 03a2 0003 | | .CONST 0x03a2,0x0003 09b2 03a4 0004 | | .CONST 0x03a4,0x0004 09b4 ; -------------------------------------------------------------------------------------- 09b4 ; Debug3 Subtable 0x15 09b4 ; -------------------------------------------------------------------------------------- 09b4 0000 0001 | | .DBG3TAB 0x0000,0x0001 09b6 03ab 0001 | | .CONST 0x03ab,0x0001 09b8 ; -------------------------------------------------------------------------------------- 09b8 ; Debug3 Subtable 0x16 09b8 ; -------------------------------------------------------------------------------------- 09b8 0000 0009 | | .DBG3TAB 0x0000,0x0009 09ba 03bb 0001 | | .CONST 0x03bb,0x0001 09bc 03bf 0002 | | .CONST 0x03bf,0x0002 09be 03c9 0003 | | .CONST 0x03c9,0x0003 09c0 03d2 0004 | | .CONST 0x03d2,0x0004 09c2 03d3 0005 | | .CONST 0x03d3,0x0005 09c4 03da 0006 | | .CONST 0x03da,0x0006 09c6 03e1 0007 | | .CONST 0x03e1,0x0007 09c8 03e5 0008 | | .CONST 0x03e5,0x0008 09ca 03eb 0009 | | .CONST 0x03eb,0x0009 09cc ; -------------------------------------------------------------------------------------- 09cc ; Debug3 Subtable 0x17 09cc ; -------------------------------------------------------------------------------------- 09cc 0000 0009 | | .DBG3TAB 0x0000,0x0009 09ce 03f3 0001 | | .CONST 0x03f3,0x0001 09d0 03f7 0002 | | .CONST 0x03f7,0x0002 09d2 0401 0003 | | .CONST 0x0401,0x0003 09d4 040a 0004 | | .CONST 0x040a,0x0004 09d6 040b 0005 | | .CONST 0x040b,0x0005 09d8 0412 0006 | | .CONST 0x0412,0x0006 09da 0419 0007 | | .CONST 0x0419,0x0007 09dc 041d 0008 | | .CONST 0x041d,0x0008 09de 0423 0009 | # | .CONST 0x0423,0x0009 09e0 ; -------------------------------------------------------------------------------------- 09e0 ; Debug3 Subtable 0x18 09e0 ; -------------------------------------------------------------------------------------- 09e0 0000 0007 | | .DBG3TAB 0x0000,0x0007 09e2 042b 0001 | + | .CONST 0x042b,0x0001 09e4 0433 0002 | 3 | .CONST 0x0433,0x0002 09e6 043c 0003 | < | .CONST 0x043c,0x0003 09e8 043d 0004 | = | .CONST 0x043d,0x0004 09ea 0444 0005 | D | .CONST 0x0444,0x0005 09ec 0448 0006 | H | .CONST 0x0448,0x0006 09ee 044e 0007 | N | .CONST 0x044e,0x0007 09f0 ; -------------------------------------------------------------------------------------- 09f0 ; Debug3 Subtable 0x19 09f0 ; -------------------------------------------------------------------------------------- 09f0 0000 0008 | | .DBG3TAB 0x0000,0x0008 09f2 045b 0001 | [ | .CONST 0x045b,0x0001 09f4 0463 0002 | c | .CONST 0x0463,0x0002 09f6 046c 0003 | l | .CONST 0x046c,0x0003 09f8 046d 0004 | m | .CONST 0x046d,0x0004 09fa 0474 0005 | t | .CONST 0x0474,0x0005 09fc 047b 0006 | { | .CONST 0x047b,0x0006 09fe 047f 0007 | | .CONST 0x047f,0x0007 0a00 0485 0008 | | .CONST 0x0485,0x0008 0a02 ; -------------------------------------------------------------------------------------- 0a02 ; Debug3 Subtable 0x1a 0a02 ; -------------------------------------------------------------------------------------- 0a02 0000 0007 | | .DBG3TAB 0x0000,0x0007 0a04 0493 0001 | | .CONST 0x0493,0x0001 0a06 049b 0002 | | .CONST 0x049b,0x0002 0a08 04a4 0003 | | .CONST 0x04a4,0x0003 0a0a 04a5 0004 | | .CONST 0x04a5,0x0004 0a0c 04ac 0005 | | .CONST 0x04ac,0x0005 0a0e 04b0 0006 | | .CONST 0x04b0,0x0006 0a10 04b6 0007 | | .CONST 0x04b6,0x0007 0a12 ; -------------------------------------------------------------------------------------- 0a12 ; Debug3 Subtable 0x1b 0a12 ; -------------------------------------------------------------------------------------- 0a12 0001 0005 | | .DBG3TAB 0x0001,0x0005 0a14 04c3 ffff | | .CONST 0x04c3,0xffff 0a16 04cb 0002 | | .CONST 0x04cb,0x0002 0a18 04d2 0003 | | .CONST 0x04d2,0x0003 0a1a 04d6 0004 | | .CONST 0x04d6,0x0004 0a1c 04d8 0005 | | .CONST 0x04d8,0x0005 0a1e 04dd 0001 | | .CONST 0x04dd,0x0001 0a20 ; -------------------------------------------------------------------------------------- 0a20 ; Debug3 Subtable 0x1c 0a20 ; -------------------------------------------------------------------------------------- 0a20 0001 0001 | | .DBG3TAB 0x0001,0x0001 0a22 04e3 ffff | | .CONST 0x04e3,0xffff 0a24 04e6 0001 | | .CONST 0x04e6,0x0001 0a26 ; -------------------------------------------------------------------------------------- 0a26 ; Debug3 Subtable 0x1d 0a26 ; -------------------------------------------------------------------------------------- 0a26 0001 0002 | | .DBG3TAB 0x0001,0x0002 0a28 0503 ffff | | .CONST 0x0503,0xffff 0a2a 0507 0001 | | .CONST 0x0507,0x0001 0a2c 050f 0002 | | .CONST 0x050f,0x0002 0a2e ; -------------------------------------------------------------------------------------- 0a2e ; Debug3 Subtable 0x1e 0a2e ; -------------------------------------------------------------------------------------- 0a2e 0001 0001 | | .DBG3TAB 0x0001,0x0001 0a30 051b ffff | | .CONST 0x051b,0xffff 0a32 051e 0001 | | .CONST 0x051e,0x0001 0a34 ; -------------------------------------------------------------------------------------- 0a34 ; Debug3 Subtable 0x1f 0a34 ; -------------------------------------------------------------------------------------- 0a34 0001 0001 | | .DBG3TAB 0x0001,0x0001 0a36 053b ffff | ; | .CONST 0x053b,0xffff 0a38 053e 0001 | > | .CONST 0x053e,0x0001 0a3a ; -------------------------------------------------------------------------------------- 0a3a ; Debug3 Subtable 0x20 0a3a ; -------------------------------------------------------------------------------------- 0a3a 0001 0007 | | .DBG3TAB 0x0001,0x0007 0a3c 054b ffff | K | .CONST 0x054b,0xffff 0a3e 054f 0001 | O | .CONST 0x054f,0x0001 0a40 0551 0002 | Q | .CONST 0x0551,0x0002 0a42 0553 0003 | S | .CONST 0x0553,0x0003 0a44 055f 0004 | _ | .CONST 0x055f,0x0004 0a46 0567 0007 | g | .CONST 0x0567,0x0007 0a48 0570 0005 | p | .CONST 0x0570,0x0005 0a4a 0572 0006 | r | .CONST 0x0572,0x0006 0a4c ; -------------------------------------------------------------------------------------- 0a4c ; Debug3 Subtable 0x21 0a4c ; -------------------------------------------------------------------------------------- 0a4c 0002 0008 | | .DBG3TAB 0x0002,0x0008 0a4e 0583 0001 | | .CONST 0x0583,0x0001 0a50 0587 0002 | | .CONST 0x0587,0x0002 0a52 0590 0003 | | .CONST 0x0590,0x0003 0a54 0591 fbff | | .CONST 0x0591,0xfbff 0a56 0593 fbfe | | .CONST 0x0593,0xfbfe 0a58 059b 0402 | | .CONST 0x059b,0x0402 0a5a 059f 0403 | | .CONST 0x059f,0x0403 0a5c 05a4 0401 | | .CONST 0x05a4,0x0401 0a5e 05a7 0404 | | .CONST 0x05a7,0x0404 0a60 05ae 0405 | | .CONST 0x05ae,0x0405 0a62 ; -------------------------------------------------------------------------------------- 0a62 ; Debug3 Subtable 0x22 0a62 ; -------------------------------------------------------------------------------------- 0a62 0002 000d | | .DBG3TAB 0x0002,0x000d 0a64 05c3 ffff | | .CONST 0x05c3,0xffff 0a66 05c6 0001 | | .CONST 0x05c6,0x0001 0a68 05ca 0002 | | .CONST 0x05ca,0x0002 0a6a 05d6 0003 | | .CONST 0x05d6,0x0003 0a6c 05e2 0004 | | .CONST 0x05e2,0x0004 0a6e 05e7 0005 | | .CONST 0x05e7,0x0005 0a70 05ed 0006 | | .CONST 0x05ed,0x0006 0a72 05ee fbff | | .CONST 0x05ee,0xfbff 0a74 05f4 0401 | | .CONST 0x05f4,0x0401 0a76 05f9 0402 | | .CONST 0x05f9,0x0402 0a78 0600 0404 | | .CONST 0x0600,0x0404 0a7a 0606 0405 | | .CONST 0x0606,0x0405 0a7c 060b 0403 | | .CONST 0x060b,0x0403 0a7e 060e 0406 | | .CONST 0x060e,0x0406 0a80 061a 0407 | | .CONST 0x061a,0x0407 0a82 ; -------------------------------------------------------------------------------------- 0a82 ; Debug3 Subtable 0x23 0a82 ; -------------------------------------------------------------------------------------- 0a82 0000 0007 | | .DBG3TAB 0x0000,0x0007 0a84 062b 0001 | + | .CONST 0x062b,0x0001 0a86 062d 0002 | - | .CONST 0x062d,0x0002 0a88 0634 0003 | 4 | .CONST 0x0634,0x0003 0a8a 0636 0004 | 6 | .CONST 0x0636,0x0004 0a8c 063f 0005 | ? | .CONST 0x063f,0x0005 0a8e 0641 0006 | A | .CONST 0x0641,0x0006 0a90 0646 0007 | F | .CONST 0x0646,0x0007 0a92 ; -------------------------------------------------------------------------------------- 0a92 ; Debug3 Subtable 0x24 0a92 ; -------------------------------------------------------------------------------------- 0a92 0003 000f | | .DBG3TAB 0x0003,0x000f 0a94 064b ffff | K | .CONST 0x064b,0xffff 0a96 0650 fffe | P | .CONST 0x0650,0xfffe 0a98 0656 fffd | V | .CONST 0x0656,0xfffd 0a9a 065d 0002 | ] | .CONST 0x065d,0x0002 0a9c 065f 0003 | _ | .CONST 0x065f,0x0003 0a9e 0660 0004 | ` | .CONST 0x0660,0x0004 0aa0 0666 0005 | f | .CONST 0x0666,0x0005 0aa2 0672 0006 | r | .CONST 0x0672,0x0006 0aa4 067d 0007 | } | .CONST 0x067d,0x0007 0aa6 0682 0001 | | .CONST 0x0682,0x0001 0aa8 0685 0008 | | .CONST 0x0685,0x0008 0aaa 0687 0009 | | .CONST 0x0687,0x0009 0aac 0689 000a | | .CONST 0x0689,0x000a 0aae 0690 000b | | .CONST 0x0690,0x000b 0ab0 0692 000c | | .CONST 0x0692,0x000c 0ab2 069b 000d | | .CONST 0x069b,0x000d 0ab4 069d 000e | | .CONST 0x069d,0x000e 0ab6 06a2 000f | | .CONST 0x06a2,0x000f 0ab8 ; -------------------------------------------------------------------------------------- 0ab8 ; Debug3 Subtable 0x25 0ab8 ; -------------------------------------------------------------------------------------- 0ab8 0000 0007 | | .DBG3TAB 0x0000,0x0007 0aba 06ab 0001 | | .CONST 0x06ab,0x0001 0abc 06ad 0002 | | .CONST 0x06ad,0x0002 0abe 06b4 0003 | | .CONST 0x06b4,0x0003 0ac0 06b7 0004 | | .CONST 0x06b7,0x0004 0ac2 06be 0005 | | .CONST 0x06be,0x0005 0ac4 06c0 0006 | | .CONST 0x06c0,0x0006 0ac6 06c5 0007 | | .CONST 0x06c5,0x0007 0ac8 ; -------------------------------------------------------------------------------------- 0ac8 ; Debug3 Subtable 0x26 0ac8 ; -------------------------------------------------------------------------------------- 0ac8 0003 0009 | | .DBG3TAB 0x0003,0x0009 0aca 06cb ffff | | .CONST 0x06cb,0xffff 0acc 06d0 fffe | | .CONST 0x06d0,0xfffe 0ace 06d6 fffd | | .CONST 0x06d6,0xfffd 0ad0 06dd 0002 | | .CONST 0x06dd,0x0002 0ad2 06df 0003 | | .CONST 0x06df,0x0003 0ad4 06e0 0004 | | .CONST 0x06e0,0x0004 0ad6 06e6 0005 | | .CONST 0x06e6,0x0005 0ad8 06ee 0006 | | .CONST 0x06ee,0x0006 0ada 06f5 0007 | | .CONST 0x06f5,0x0007 0adc 06fa 0001 | | .CONST 0x06fa,0x0001 0ade 06fd 0008 | | .CONST 0x06fd,0x0008 0ae0 06ff 0009 | | .CONST 0x06ff,0x0009 0ae2 0000 0000 | | .BLANK 0000[0x11e]