|
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: 5120 (0x1400) 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 0668 | h | .CONST 0x0668 ; 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 0004 | | .CONST 0x0004 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 008e | | .CONST 0x008e ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 001e | | .CONST 0x001e ; Number of locals 000b INIT_0008: 000b 4802 |H | Short_Literal 0x2 ; Debug Table 0x0 = .DEBUG 0x000b,0x0792,0x8000,0x0000,0x0058,0x78d5,0x0000,0x000c ; Debug Table 0x0.0x0 = 0xb,0xffff ; Debug Table 0x0.0x1 = 0xb,0xfffe ; Debug Table 0x0.0x2 = 0xb,0xfffd ; Debug Table 0x0.0x3 = 0xb,0xfffc 000c 032b | + | Declare_Type Record,Incomplete,Visible 000d 00c4 | | Action Make_Default ; Debug Table 0x0.0x4 = 0xd,0xfffb 000e 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0xe,0xfffa 0010 029a 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x10,0xfff9 0012 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x0.0x7 = 0x12,0xfff8 0013 00e3 | | Load_Encached Natural_Cache 0014 02a0 | | Declare_Subprogram Null_Subprogram 0015 4802 |H | Short_Literal 0x2 0016 032e | . | Declare_Type Record,Defined,Visible 0017 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x8 = 0x17,0xfff7 0018 0322 | " | Declare_Variable Record 0019 4800 |H | Short_Literal 0x0 001a 00d9 | | Load_Top At_Offset_1 001b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 001c 4800 |H | Short_Literal 0x0 001d 00d9 | | Load_Top At_Offset_1 001e 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 001f 0129 | ) | Execute Any,Make_Visible 0020 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x0.0x9 = 0x20,0xfff6 0021 0322 | " | Declare_Variable Record 0022 4801 |H | Short_Literal 0x1 0023 00d9 | | Load_Top At_Offset_1 0024 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0025 4801 |H | Short_Literal 0x1 0026 00d9 | | Load_Top At_Offset_1 0027 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0028 0129 | ) | Execute Any,Make_Visible 0029 60ee |` | Indirect_Literal Discrete,0x118,{0x00000000, 0x5878d501} ; Debug Table 0x0.0xa = 0x29,0xfff5 002a 0129 | ) | Execute Any,Make_Visible 002b 60e8 |` | Indirect_Literal Discrete,0x114,{0x00000000, 0x5878d502} ; Debug Table 0x0.0xb = 0x2b,0xfff4 002c 0129 | ) | Execute Any,Make_Visible 002d 60e2 |` | Indirect_Literal Discrete,0x110,{0x00000000, 0x5878d503} ; Debug Table 0x0.0xc = 0x2d,0xfff3 002e 0129 | ) | Execute Any,Make_Visible 002f 60dc |` | Indirect_Literal Discrete,0x10c,{0x00000000, 0x5878d504} ; Debug Table 0x0.0xd = 0x2f,0xfff2 0030 0129 | ) | Execute Any,Make_Visible 0031 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0xe = 0x31,0xfff1 0032 60d5 |` | Indirect_Literal Discrete,0x108,{0x0056a80e, 0x00003430} 0033 02a0 | | Declare_Subprogram Null_Subprogram 0034 038f | | Declare_Type Package,Defined,Visible 0035 0386 | | Declare_Variable Package,Visible 0036 e211 | | Load 0x1,0x11 ; Debug Table 0x0.0xf = 0x36,0xfff0 0037 00e3 | | Load_Encached Natural_Cache 0038 00e5 | | Load_Encached Long_Integer_Cache 0039 02a0 | | Declare_Subprogram Null_Subprogram 003a 4803 |H | Short_Literal 0x3 003b 032e | . | Declare_Type Record,Defined,Visible 003c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x10 = 0x3c,0xffef 003d 0322 | " | Declare_Variable Record 003e e212 | | Load 0x1,0x12 003f 00d9 | | Load_Top At_Offset_1 0040 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0041 4800 |H | Short_Literal 0x0 0042 00d9 | | Load_Top At_Offset_1 0043 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0044 4800 |H | Short_Literal 0x0 0045 00d9 | | Load_Top At_Offset_1 0046 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0047 0129 | ) | Execute Any,Make_Visible 0048 4803 |H | Short_Literal 0x3 ; Debug Table 0x0.0x11 = 0x48,0xffee 0049 60ba |` | Indirect_Literal Discrete,0x104,{0x0056a80e, 0x00001230} 004a 02a0 | | Declare_Subprogram Null_Subprogram 004b 038d | | Declare_Type Package,Defined,Visible,Not_Elaborated 004c e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x12 = 0x4c,0xffed 004d 1b14 | | Execute Package,Field_Read,Field_Number 0x14 004e e002 | | Load 0x0,0x2 004f 1b66 | f | Execute Package,Field_Read,Field_Number 0x66 0050 029f 00b3 | | Declare_Subprogram INIT_00b0,For_Call 0052 e20d | | Load 0x1,0xd 0053 0326 | & | Complete_Type Record,By_Defining 0054 e20d | | Load 0x1,0xd ; Debug Table 0x0.0x13 = 0x54,0xffec 0055 0322 | " | Declare_Variable Record 0056 e001 | | Load 0x0,0x1 0057 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0058 00d9 | | Load_Top At_Offset_1 0059 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 005a e002 | | Load 0x0,0x2 005b 1b67 | g | Execute Package,Field_Read,Field_Number 0x67 005c 180f | | Execute Package,Field_Execute,Field_Number 0xf 005d e002 | | Load 0x0,0x2 005e 1b66 | f | Execute Package,Field_Read,Field_Number 0x66 005f 0119 | | Execute Any,Check_In_Formal_Type 0060 00d9 | | Load_Top At_Offset_1 0061 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0062 0129 | ) | Execute Any,Make_Visible 0063 c20e | | Store 0x1,0xe 0064 00bf | | Action Accept_Activation 0065 029d 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call ; Debug Table 0x1 = .DEBUG 0x0065,0x07bc,0x8000,0x0000,0x0058,0x78f5,0x0000,0x0019 ; Debug Table 0x1.0x0 = 0x65,0xffff ; Debug Table 0x1.0x1 = 0x65,0xfffe 0067 029d 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call ; Debug Table 0x1.0x2 = 0x67,0xfffd 0069 029d 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call ; Debug Table 0x1.0x3 = 0x69,0xfffc 006b 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x4 = 0x6b,0xfffb 006c 00c7 | | Action Elaborate_Subprogram 006d 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x5 = 0x6d,0xfffa 006e 00c7 | | Action Elaborate_Subprogram 006f e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x6 = 0x6f,0xfff9 0070 e003 | | Load 0x0,0x3 0071 e002 | | Load 0x0,0x2 0072 e004 | | Load 0x0,0x4 0073 00b6 | | Action Make_Scope 0074 e005 | | Load 0x0,0x5 0075 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 0076 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 0077 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 0078 e006 | | Load 0x0,0x6 0079 e007 | | Load 0x0,0x7 007a e008 | | Load 0x0,0x8 007b 480c |H | Short_Literal 0xc 007c e218 | | Load 0x1,0x18 007d 020e | | Execute Module,Augment_Imports 007e e218 | | Load 0x1,0x18 007f 020f | | Execute Module,Activate 0080 e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x7 = 0x80,0xfff8 0081 e009 | | Load 0x0,0x9 0082 e001 | | Load 0x0,0x1 0083 e004 | | Load 0x0,0x4 0084 1d1e | | Execute_Immediate Reference_Lex_1,0x1e 0085 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 0086 e00a | | Load 0x0,0xa 0087 00b6 | | Action Make_Scope 0088 e003 | | Load 0x0,0x3 0089 4809 |H | Short_Literal 0x9 008a e21b | | Load 0x1,0x1b 008b 020e | | Execute Module,Augment_Imports 008c 00db | | Load_Top At_Offset_3 008d 020d | | Execute Module,Elaborate 008e BODY_0008: 008e 00bc | | Action Signal_Activated 008f 00bb | | Action Signal_Completion 0090 ; -------------------------------------------------------------------------------------- 0090 ; SUBPROGRAM 0090 ; -------------------------------------------------------------------------------------- 0090 0093 | | .CONST 0x0093 ; Address of begin 0091 0004 | | .CONST 0x0004 ; Address of exception handler 0092 0001 | | .CONST 0x0001 ; Number of locals 0093 BODY_0090: 0093 INIT_0090: 0093 00da | | Load_Top At_Offset_2 ; Debug Table 0x2 = .DEBUG 0x0093,0x07ce,0x0002,0x0000,0x0058,0x78d5,0x0000,0x0026 ; Debug Table 0x2.0x0 = 0x93,0x1 0094 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0095 e001 | | Load 0x0,0x1 0096 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0097 e002 | | Load 0x0,0x2 0098 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32 0099 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 009a 0000 0000 | | .BLANK 0000[0x6] 00a0 ; -------------------------------------------------------------------------------------- 00a0 ; SUBPROGRAM 00a0 ; -------------------------------------------------------------------------------------- 00a0 00a3 | | .CONST 0x00a3 ; Address of begin 00a1 0004 | | .CONST 0x0004 ; Address of exception handler 00a2 0001 | | .CONST 0x0001 ; Number of locals 00a3 BODY_00a0: 00a3 INIT_00a0: 00a3 00da | | Load_Top At_Offset_2 ; Debug Table 0x3 = .DEBUG 0x00a3,0x07d2,0x0002,0x0000,0x0058,0x78d5,0x0000,0x002f ; Debug Table 0x3.0x0 = 0xa3,0x1 00a4 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00a5 e002 | | Load 0x0,0x2 00a6 1b67 | g | Execute Package,Field_Read,Field_Number 0x67 00a7 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 00a8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00a9 0000 0000 | | .BLANK 0000[0x7] 00b0 ; -------------------------------------------------------------------------------------- 00b0 ; SUBPROGRAM 00b0 ; -------------------------------------------------------------------------------------- 00b0 00b3 | | .CONST 0x00b3 ; Address of begin 00b1 0004 | | .CONST 0x0004 ; Address of exception handler 00b2 0001 | | .CONST 0x0001 ; Number of locals 00b3 BODY_00b0: 00b3 INIT_00b0: 00b3 4608 |F | Jump_Case 0x9 ; Debug Table 0x4 = .DEBUG 0x00b3,0x07d6,0x0005,0x0000,0x0058,0x78d5,0x0000,0x01a6 00b4 7808 |x | Jump 0xbd ; case 0x0 00b5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 00b6 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 00b7 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 00b8 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 00b9 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 00ba 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6 00bb 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x7 00bc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x8 00bd 00da | | Load_Top At_Offset_2 00be 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 00bf 1c00 | | Execute_Immediate Run_Utility,0x0 00c0 00da | | Load_Top At_Offset_2 00c1 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 00c2 0125 | % | Execute Any,Set_Constraint 00c3 00da | | Load_Top At_Offset_2 00c4 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 00c5 1c00 | | Execute_Immediate Run_Utility,0x0 00c6 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 00c7 0000 | | .XXX[0x1] 00c8 ; -------------------------------------------------------------------------------------- 00c8 ; SUBPROGRAM 00c8 ; -------------------------------------------------------------------------------------- 00c8 00cb | | .CONST 0x00cb ; Address of begin 00c9 0004 | | .CONST 0x0004 ; Address of exception handler 00ca 0001 | | .CONST 0x0001 ; Number of locals 00cb BODY_00c8: 00cb INIT_00c8: 00cb e211 | | Load 0x1,0x11 ; Debug Table 0x5 = .DEBUG 0x00cb,0x07d8,0x0002,0x0000,0x0058,0x78f5,0x0000,0x001d ; Debug Table 0x5.0x0 = 0xcb,0x1 00cc 0322 | " | Declare_Variable Record 00cd 00db | | Load_Top At_Offset_3 00ce 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00cf 00d9 | | Load_Top At_Offset_1 00d0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00d1 00db | | Load_Top At_Offset_3 00d2 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00d3 00d9 | | Load_Top At_Offset_1 00d4 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00d5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00d6 0000 0000 | | .XXX[0x2] 00d8 ; -------------------------------------------------------------------------------------- 00d8 ; SUBPROGRAM 00d8 ; -------------------------------------------------------------------------------------- 00d8 00db | | .CONST 0x00db ; Address of begin 00d9 0004 | | .CONST 0x0004 ; Address of exception handler 00da 0001 | | .CONST 0x0001 ; Number of locals 00db BODY_00d8: 00db INIT_00d8: 00db e00a | | Load 0x0,0xa ; Debug Table 0x6 = .DEBUG 0x00db,0x07dc,0x0002,0x0000,0x0058,0x78f5,0x0000,0x0034 ; Debug Table 0x6.0x0 = 0xdb,0x1 00dc 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00dd 0322 | " | Declare_Variable Record 00de 00db | | Load_Top At_Offset_3 00df 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00e0 00d9 | | Load_Top At_Offset_1 00e1 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00e2 00db | | Load_Top At_Offset_3 00e3 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 00e4 00d9 | | Load_Top At_Offset_1 00e5 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00e6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00e7 0000 | | .XXX[0x1] 00e8 ; -------------------------------------------------------------------------------------- 00e8 ; SUBPROGRAM 00e8 ; -------------------------------------------------------------------------------------- 00e8 00eb | | .CONST 0x00eb ; Address of begin 00e9 0004 | | .CONST 0x0004 ; Address of exception handler 00ea 0001 | | .CONST 0x0001 ; Number of locals 00eb BODY_00e8: 00eb INIT_00e8: 00eb 00da | | Load_Top At_Offset_2 ; Debug Table 0x7 = .DEBUG 0x00eb,0x07e0,0x0001,0x0000,0x0058,0x78f5,0x0000,0x004b ; Debug Table 0x7.0x0 = 0xeb,0x1 00ec 460d |F | Jump_Case 0xe 00ed 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x0 00ee 7812 |x | Jump 0x101 ; case 0x1 00ef 7811 |x | Jump 0x101 ; case 0x2 00f0 7810 |x | Jump 0x101 ; case 0x3 00f1 780f |x | Jump 0x101 ; case 0x4 00f2 780e |x | Jump 0x101 ; case 0x5 00f3 780d |x | Jump 0x101 ; case 0x6 00f4 7806 |x | Jump 0xfb ; case 0x7 00f5 7807 |x | Jump 0xfd ; case 0x8 00f6 7808 |x | Jump 0xff ; case 0x9 00f7 7805 |x | Jump 0xfd ; case 0xa 00f8 7808 |x | Jump 0x101 ; case 0xb 00f9 7807 |x | Jump 0x101 ; case 0xc 00fa 7806 |x | Jump 0x101 ; case 0xd 00fb e217 | | Load 0x1,0x17 ; Debug Table 0x7.0x1 = 0xfb,0x3 00fc 0257 | W | Execute Discrete,Raise 00fd e216 | | Load 0x1,0x16 ; Debug Table 0x7.0x2 = 0xfd,0x4 00fe 0257 | W | Execute Discrete,Raise 00ff e214 | | Load 0x1,0x14 ; Debug Table 0x7.0x3 = 0xff,0x5 0100 0257 | W | Execute Discrete,Raise 0101 e215 | | Load 0x1,0x15 ; Debug Table 0x7.0x4 = 0x101,0x6 0102 0257 | W | Execute Discrete,Raise 0103 0000 | | .XXX[0x1] 0104 0056 a80e | V | .LITERAL {0x0056a80e, 0x00001230} 0108 0056 a80e | V | .LITERAL {0x0056a80e, 0x00003430} 010c 0000 0000 | | .LITERAL {0x00000000, 0x5878d504} 0110 0000 0000 | | .LITERAL {0x00000000, 0x5878d503} 0114 0000 0000 | | .LITERAL {0x00000000, 0x5878d502} 0118 0000 0000 | | .LITERAL {0x00000000, 0x5878d501} 011c 0000 0000 | | .BLANK 0000[0x4] 0120 0140 0004 | @ | .XXX[0x3] 0122 0016 | | 0123 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x8 = .DEBUG 0x0123,0x07ec,0x4000,0x0000,0x0058,0x78d5,0x0000,0x013f ; Debug Table 0x8.0x0 = 0x123,0xffff 0125 029a 01a3 | | Declare_Subprogram INIT_01a0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x8.0x1 = 0x125,0xfffe 0127 029a 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x8.0x2 = 0x127,0xfffd 0129 029a 020b | | Declare_Subprogram INIT_0208,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x8.0x3 = 0x129,0xfffc 012b 00bf | | Action Accept_Activation 012c 029d 0263 | c| Declare_Subprogram INIT_0260,For_Outer_Call ; Debug Table 0x9 = .DEBUG 0x012c,0x07f6,0x4000,0x0000,0x0058,0x78f5,0x0000,0x049c ; Debug Table 0x9.0x0 = 0x12c,0xffff 012e 029d 02b3 | | Declare_Subprogram INIT_02b0,For_Outer_Call ; Debug Table 0x9.0x1 = 0x12e,0xfffe 0130 6207 |b | Indirect_Literal Discrete,0x338,{0x00000000, 0x005878f5} ; Debug Table 0x9.0x2 = 0x130,0xfffd 0131 6202 |b | Indirect_Literal Discrete,0x334,{0x00000000, 0x0000057e} 0132 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0133 e001 | | Load 0x0,0x1 0134 1b60 | ` | Execute Package,Field_Read,Field_Number 0x60 0135 0387 | | Declare_Variable Package 0136 00d8 | | Load_Top At_Offset_0 0137 020f | | Execute Module,Activate 0138 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x9.0x3 = 0x138,0xfffc 0139 00c7 | | Action Elaborate_Subprogram 013a 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x9.0x4 = 0x13a,0xfffb 013b 00c7 | | Action Elaborate_Subprogram 013c 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x9.0x5 = 0x13c,0xfffa 013d 00c7 | | Action Elaborate_Subprogram 013e 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x9.0x6 = 0x13e,0xfff9 013f 00c7 | | Action Elaborate_Subprogram 0140 00bc | | Action Signal_Activated 0141 00bb | | Action Signal_Completion 0142 0000 0000 | | .BLANK 0000[0x6] 0148 ; -------------------------------------------------------------------------------------- 0148 ; SUBPROGRAM 0148 ; -------------------------------------------------------------------------------------- 0148 0157 | W | .CONST 0x0157 ; Address of begin 0149 0004 | | .CONST 0x0004 ; Address of exception handler 014a 0005 | | .CONST 0x0005 ; Number of locals 014b INIT_0148: 014b e002 | | Load 0x0,0x2 ; Debug Table 0xa = .DEBUG 0x014b,0x0806,0x1001,0x0000,0x0058,0x78d5,0x0000,0x014e ; Debug Table 0xa.0x0 = 0x14b,0xffff 014c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 014d 02c7 | | Declare_Variable Any 014e 00d8 | | Load_Top At_Offset_0 014f 1c00 | | Execute_Immediate Run_Utility,0x0 0150 e003 | | Load 0x0,0x3 ; Debug Table 0xa.0x1 = 0x150,0xfffe 0151 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0152 e004 | | Load 0x0,0x4 ; Debug Table 0xa.0x2 = 0x152,0xfffd 0153 1b46 | F | Execute Package,Field_Read,Field_Number 0x46 0154 0322 | " | Declare_Variable Record 0155 e004 | | Load 0x0,0x4 ; Debug Table 0xa.0x3 = 0x155,0xfffc 0156 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0157 BODY_0148: 0157 e003 | | Load 0x0,0x3 ; Debug Table 0xa.0x4 = 0x157,0x1 0158 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0159 e004 | | Load 0x0,0x4 015a 1b12 | | Execute Package,Field_Read,Field_Number 0x12 015b e402 | | Load 0x2,0x2 015c 0120 | | Execute Any,Is_Value 015d 6803 |h | Jump_Zero 0x161 015e e002 | | Load 0x0,0x2 015f 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0160 7801 |x | Jump 0x162 0161 e402 | | Load 0x2,0x2 0162 4800 |H | Short_Literal 0x0 0163 e5ff | | Load 0x2,-0x1 0164 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0165 e003 | | Load 0x0,0x3 0166 184d | M | Execute Package,Field_Execute,Field_Number 0x4d 0167 c402 | | Store 0x2,0x2 0168 005a | Z | Store_Top Discrete,At_Offset_2 0169 005b | [ | Store_Top Discrete,At_Offset_3 016a 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x5 = 0x16a,0x2 016b 8005 | | Call 0x0,0x5 016c e5fe | | Load 0x2,-0x2 ; Debug Table 0xa.0x6 = 0x16c,0x3 016d 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 016e e216 | | Load 0x1,0x16 016f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0170 e5fe | | Load 0x2,-0x2 0171 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0172 00e4 | | Load_Encached Positive_Cache 0173 025b | [ | Execute Discrete,Check_In_Type 0174 e5fe | | Load 0x2,-0x2 0175 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0176 8006 | | Call 0x0,0x6 0177 e402 | | Load 0x2,0x2 0178 e001 | | Load 0x0,0x1 0179 1887 | | Execute Package,Field_Execute,Field_Number 0x87 017a e5fe | | Load 0x2,-0x2 ; Debug Table 0xa.0x7 = 0x17a,0x4 017b 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 017c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 017d 0aff | | Execute_Immediate Plus,-0x1 017e 00da | | Load_Top At_Offset_2 017f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0180 4801 |H | Short_Literal 0x1 ; Debug Table 0xa.0x8 = 0x180,0x5 0181 00da | | Load_Top At_Offset_2 0182 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0183 4801 |H | Short_Literal 0x1 ; Debug Table 0xa.0x9 = 0x183,0x6 0184 00da | | Load_Top At_Offset_2 0185 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0186 e003 | | Load 0x0,0x3 ; Debug Table 0xa.0xa = 0x186,0x7 0187 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0188 00da | | Load_Top At_Offset_2 0189 e5ff | | Load 0x2,-0x1 018a 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 018b e003 | | Load 0x0,0x3 018c 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40 018d 005b | [ | Store_Top Discrete,At_Offset_3 018e 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0xb = 0x18e,0x8 018f 8005 | | Call 0x0,0x5 0190 e003 | | Load 0x0,0x3 ; Debug Table 0xa.0xc = 0x190,0x9 0191 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0192 00d9 | | Load_Top At_Offset_1 0193 e5ff | | Load 0x2,-0x1 0194 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0195 e003 | | Load 0x0,0x3 0196 1841 | A | Execute Package,Field_Execute,Field_Number 0x41 0197 005b | [ | Store_Top Discrete,At_Offset_3 0198 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0xd = 0x198,0xa 0199 8005 | | Call 0x0,0x5 019a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 019b 0000 0000 | | .BLANK 0000[0x5] 01a0 ; -------------------------------------------------------------------------------------- 01a0 ; SUBPROGRAM 01a0 ; -------------------------------------------------------------------------------------- 01a0 01b2 | | .CONST 0x01b2 ; Address of begin 01a1 0004 | | .CONST 0x0004 ; Address of exception handler 01a2 0004 | | .CONST 0x0004 ; Number of locals 01a3 INIT_01a0: 01a3 e001 | | Load 0x0,0x1 ; Debug Table 0xb = .DEBUG 0x01a3,0x0824,0x1001,0x0000,0x0058,0x78d5,0x0000,0x015a ; Debug Table 0xb.0x0 = 0x1a3,0xffff 01a4 1b12 | | Execute Package,Field_Read,Field_Number 0x12 01a5 02c7 | | Declare_Variable Any 01a6 00d8 | | Load_Top At_Offset_0 01a7 1c00 | | Execute_Immediate Run_Utility,0x0 01a8 e001 | | Load 0x0,0x1 ; Debug Table 0xb.0x1 = 0x1a8,0xfffe 01a9 1b14 | | Execute Package,Field_Read,Field_Number 0x14 01aa 0322 | " | Declare_Variable Record 01ab 00d8 | | Load_Top At_Offset_0 01ac 1c00 | | Execute_Immediate Run_Utility,0x0 01ad e001 | | Load 0x0,0x1 ; Debug Table 0xb.0x2 = 0x1ad,0xfffd 01ae 1b14 | | Execute Package,Field_Read,Field_Number 0x14 01af 0322 | " | Declare_Variable Record 01b0 00d8 | | Load_Top At_Offset_0 01b1 1c00 | | Execute_Immediate Run_Utility,0x0 01b2 BODY_01a0: 01b2 e5ff | | Load 0x2,-0x1 ; Debug Table 0xb.0x3 = 0x1b2,0x1 01b3 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 01b4 e003 | | Load 0x0,0x3 01b5 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 01b6 c402 | | Store 0x2,0x2 01b7 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x4 = 0x1b7,0x2 01b8 00da | | Load_Top At_Offset_2 01b9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 01ba e007 | | Load 0x0,0x7 ; Debug Table 0xb.0x5 = 0x1ba,0x3 01bb 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01bc 0322 | " | Declare_Variable Record 01bd e5fe | | Load 0x2,-0x2 01be 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 01bf 00d9 | | Load_Top At_Offset_1 01c0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 01c1 e5fe | | Load 0x2,-0x2 01c2 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01c3 00d9 | | Load_Top At_Offset_1 01c4 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 01c5 00da | | Load_Top At_Offset_2 01c6 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 01c7 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x6 = 0x1c7,0x4 01c8 00d9 | | Load_Top At_Offset_1 01c9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 01ca e007 | | Load 0x0,0x7 ; Debug Table 0xb.0x7 = 0x1ca,0x5 01cb 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01cc 0322 | " | Declare_Variable Record 01cd e5fd | | Load 0x2,-0x3 01ce 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 01cf 00d9 | | Load_Top At_Offset_1 01d0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 01d1 e5fd | | Load 0x2,-0x3 01d2 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01d3 00d9 | | Load_Top At_Offset_1 01d4 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 01d5 00d9 | | Load_Top At_Offset_1 01d6 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 01d7 e216 | | Load 0x1,0x16 ; Debug Table 0xb.0x8 = 0x1d7,0x6 01d8 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01d9 00d9 | | Load_Top At_Offset_1 01da 00db | | Load_Top At_Offset_3 01db e001 | | Load 0x0,0x1 01dc 1b62 | b | Execute Package,Field_Read,Field_Number 0x62 01dd 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 01de 4504 |E | Exit_Suprogram New_Top_Offset 0x4 01df 0000 | | .XXX[0x1] 01e0 ; -------------------------------------------------------------------------------------- 01e0 ; SUBPROGRAM 01e0 ; -------------------------------------------------------------------------------------- 01e0 01f7 | | .CONST 0x01f7 ; Address of begin 01e1 0004 | | .CONST 0x0004 ; Address of exception handler 01e2 0009 | | .CONST 0x0009 ; Number of locals 01e3 INIT_01e0: 01e3 e008 | | Load 0x0,0x8 ; Debug Table 0xc = .DEBUG 0x01e3,0x0838,0x1002,0x0000,0x0058,0x78d5,0x0000,0x016a ; Debug Table 0xc.0x0 = 0x1e3,0xffff 01e4 1b11 | | Execute Package,Field_Read,Field_Number 0x11 01e5 0322 | " | Declare_Variable Record 01e6 e008 | | Load 0x0,0x8 01e7 1b12 | | Execute Package,Field_Read,Field_Number 0x12 01e8 00d9 | | Load_Top At_Offset_1 01e9 017d | } | Execute Record,Structure_Write 01ea 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xc.0x1 = 0x1ea,0xfffe 01eb 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 01ec 029f 02e3 | | Declare_Subprogram INIT_02e0,For_Call ; Debug Table 0xc.0x2 = 0x1ec,0xfffd 01ee 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0xc.0x3 = 0x1ee,0xfffc 01ef 00c6 | | Action Check_Subprogram_Elaborated 01f0 00e3 | | Load_Encached Natural_Cache 01f1 4804 |H | Short_Literal 0x4 01f2 4802 |H | Short_Literal 0x2 01f3 0099 | | Action Reference_Dynamic 01f4 6143 |aC | Indirect_Literal Discrete,0x338,{0x00000000, 0x005878f5} 01f5 613a |a: | Indirect_Literal Discrete,0x330,{0x00000000, 0x00000702} 01f6 4809 |H | Short_Literal 0x9 01f7 BODY_01e0: 01f7 e403 | | Load 0x2,0x3 ; Debug Table 0xc.0x4 = 0x1f7,0x1 01f8 4801 |H | Short_Literal 0x1 01f9 e008 | | Load 0x0,0x8 01fa 1b13 | | Execute Package,Field_Read,Field_Number 0x13 01fb e5ff | | Load 0x2,-0x1 01fc e405 | | Load 0x2,0x5 01fd 4806 |H | Short_Literal 0x6 01fe 4802 |H | Short_Literal 0x2 01ff 0099 | | Action Reference_Dynamic 0200 4807 |H | Short_Literal 0x7 0201 4802 |H | Short_Literal 0x2 0202 0099 | | Action Reference_Dynamic 0203 8213 | | Call 0x1,0x13 0204 c403 | | Store 0x2,0x3 0205 e402 | | Load 0x2,0x2 ; Debug Table 0xc.0x5 = 0x205,0x2 0206 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0207 0000 | | .XXX[0x1] 0208 ; -------------------------------------------------------------------------------------- 0208 ; SUBPROGRAM 0208 ; -------------------------------------------------------------------------------------- 0208 021f | | .CONST 0x021f ; Address of begin 0209 024f | O | .CONST 0x024f ; Address of exception handler 020a 0009 | | .CONST 0x0009 ; Number of locals 020b INIT_0208: 020b e002 | | Load 0x0,0x2 ; Debug Table 0xd = .DEBUG 0x020b,0x0846,0x3801,0x0002,0x0058,0x78d5,0x0000,0x0177 ; Debug Table 0xd.0x0 = 0x20b,0xffff 020c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 020d 02c7 | | Declare_Variable Any 020e 00d8 | | Load_Top At_Offset_0 020f 1c00 | | Execute_Immediate Run_Utility,0x0 0210 e003 | | Load 0x0,0x3 ; Debug Table 0xd.0x1 = 0x210,0xfffe 0211 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0212 e004 | | Load 0x0,0x4 ; Debug Table 0xd.0x2 = 0x212,0xfffd 0213 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0214 029f 030b | | Declare_Subprogram INIT_0308,For_Call ; Debug Table 0xd.0x3 = 0x214,0xfffc ; Debug Table 0xd.0x4 = 0x214,0xfffb 0216 e001 | | Load 0x0,0x1 ; Debug Table 0xd.0x5 = 0x216,0xfffa 0217 198c | | Execute Package,Field_Reference,Field_Number 0x8c 0218 00c6 | | Action Check_Subprogram_Elaborated 0219 4805 |H | Short_Literal 0x5 021a 4802 |H | Short_Literal 0x2 021b 0099 | | Action Reference_Dynamic 021c 611b |a | Indirect_Literal Discrete,0x338,{0x00000000, 0x005878f5} 021d 610e |a | Indirect_Literal Discrete,0x32c,{0x00000000, 0x0000078e} 021e 4809 |H | Short_Literal 0x9 021f BODY_0208: 021f e003 | | Load 0x0,0x3 ; Debug Table 0xd.0x6 = 0x21f,0x1 0220 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0221 e004 | | Load 0x0,0x4 0222 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0223 e402 | | Load 0x2,0x2 0224 0120 | | Execute Any,Is_Value 0225 6803 |h | Jump_Zero 0x229 0226 e002 | | Load 0x0,0x2 0227 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0228 7801 |x | Jump 0x22a 0229 e402 | | Load 0x2,0x2 022a 4800 |H | Short_Literal 0x0 022b e5fc | | Load 0x2,-0x4 022c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 022d e003 | | Load 0x0,0x3 022e 184d | M | Execute Package,Field_Execute,Field_Number 0x4d 022f c402 | | Store 0x2,0x2 0230 c404 | | Store 0x2,0x4 0231 c403 | | Store 0x2,0x3 0232 e403 | | Load 0x2,0x3 ; Debug Table 0xd.0x7 = 0x232,0x2 0233 8005 | | Call 0x0,0x5 0234 e216 | | Load 0x1,0x16 ; Debug Table 0xd.0x8 = 0x234,0x3 0235 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0236 e5fa | | Load 0x2,-0x6 0237 e5fb | | Load 0x2,-0x5 0238 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0239 e5fb | | Load 0x2,-0x5 023a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 023b e402 | | Load 0x2,0x2 023c 4806 |H | Short_Literal 0x6 023d 4802 |H | Short_Literal 0x2 023e 0099 | | Action Reference_Dynamic 023f 4807 |H | Short_Literal 0x7 0240 4802 |H | Short_Literal 0x2 0241 0099 | | Action Reference_Dynamic 0242 e001 | | Load 0x0,0x1 0243 188c | | Execute Package,Field_Execute,Field_Number 0x8c 0244 e003 | | Load 0x0,0x3 ; Debug Table 0xd.0x9 = 0x244,0x4 0245 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0246 e404 | | Load 0x2,0x4 0247 e5fc | | Load 0x2,-0x4 0248 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0249 e003 | | Load 0x0,0x3 024a 1841 | A | Execute Package,Field_Execute,Field_Number 0x41 024b c403 | | Store 0x2,0x3 024c e403 | | Load 0x2,0x3 ; Debug Table 0xd.0xa = 0x24c,0x5 024d 8005 | | Call 0x0,0x5 024e 4507 |E | Exit_Suprogram New_Top_Offset 0x7 024f TRAP_0208: 024f 60d8 |` | Indirect_Literal Discrete,0x328,{0x00000000, 0x5878f502} 0250 010f | | Execute Exception,Equal 0251 680b |h | Jump_Zero 0x25d 0252 e003 | | Load 0x0,0x3 ; Debug Table 0xd.0xb = 0x252,0x6 0253 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0254 e404 | | Load 0x2,0x4 0255 e5fc | | Load 0x2,-0x4 0256 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0257 e003 | | Load 0x0,0x3 0258 1841 | A | Execute Package,Field_Execute,Field_Number 0x41 0259 c403 | | Store 0x2,0x3 025a e403 | | Load 0x2,0x3 ; Debug Table 0xd.0xc = 0x25a,0x7 025b 8005 | | Call 0x0,0x5 025c 4507 |E | Exit_Suprogram New_Top_Offset 0x7 025d 0100 | | Execute Exception,Raise 025e 0000 0000 | | .XXX[0x2] 0260 ; -------------------------------------------------------------------------------------- 0260 ; SUBPROGRAM 0260 ; -------------------------------------------------------------------------------------- 0260 0279 | y | .CONST 0x0279 ; Address of begin 0261 0004 | | .CONST 0x0004 ; Address of exception handler 0262 0004 | | .CONST 0x0004 ; Number of locals 0263 INIT_0260: 0263 e001 | | Load 0x0,0x1 ; Debug Table 0xe = .DEBUG 0x0263,0x0862,0x1002,0x0000,0x0058,0x78f5,0x0000,0x049d ; Debug Table 0xe.0x0 = 0x263,0xffff 0264 1b69 | i | Execute Package,Field_Read,Field_Number 0x69 0265 02c7 | | Declare_Variable Any 0266 00d8 | | Load_Top At_Offset_0 0267 1c00 | | Execute_Immediate Run_Utility,0x0 0268 e004 | | Load 0x0,0x4 ; Debug Table 0xe.0x1 = 0x268,0xfffe 0269 1b0f | | Execute Package,Field_Read,Field_Number 0xf 026a 0322 | " | Declare_Variable Record 026b e5ff | | Load 0x2,-0x1 026c e001 | | Load 0x0,0x1 026d 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b 026e 00d9 | | Load_Top At_Offset_1 026f 017d | } | Execute Record,Structure_Write 0270 e009 | | Load 0x0,0x9 ; Debug Table 0xe.0x2 = 0x270,0xfffd 0271 180e | | Execute Package,Field_Execute,Field_Number 0xe 0272 e009 | | Load 0x0,0x9 0273 180f | | Execute Package,Field_Execute,Field_Number 0xf 0274 e003 | | Load 0x0,0x3 0275 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0276 180f | | Execute Package,Field_Execute,Field_Number 0xf 0277 e003 | | Load 0x0,0x3 0278 1849 | I | Execute Package,Field_Execute,Field_Number 0x49 0279 BODY_0260: 0279 00be | | Action Activate_Tasks 027a 00cf | | Action Mark_Auxiliary 027b 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xe.0x3 = 0x27b,0x1 027c 01d9 | | Execute Vector,Reverse_Bounds 027d 0263 | c | Execute Discrete,Above_Bound 027e 702b |p+ | Jump_Nonzero 0x2aa 027f e403 | | Load 0x2,0x3 ; Debug Table 0xe.0x4 = 0x27f,0x2 0280 00d9 | | Load_Top At_Offset_1 0281 e404 | | Load 0x2,0x4 0282 01d5 | | Execute Vector,Field_Reference 0283 e003 | | Load 0x0,0x3 0284 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0285 017f | | Execute Record,Equal 0286 6821 |h! | Jump_Zero 0x2a8 0287 e402 | | Load 0x2,0x2 ; Debug Table 0xe.0x5 = 0x287,0x3 0288 00d9 | | Load_Top At_Offset_1 0289 e404 | | Load 0x2,0x4 028a 01d5 | | Execute Vector,Field_Reference 028b e003 | | Load 0x0,0x3 028c 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 028d e001 | | Load 0x0,0x1 028e 186a | j | Execute Package,Field_Execute,Field_Number 0x6a 028f c402 | | Store 0x2,0x2 0290 e402 | | Load 0x2,0x2 ; Debug Table 0xe.0x6 = 0x290,0x4 0291 e001 | | Load 0x0,0x1 0292 186c | l | Execute Package,Field_Execute,Field_Number 0x6c 0293 6803 |h | Jump_Zero 0x297 0294 e008 | | Load 0x0,0x8 ; Debug Table 0xe.0x7 = 0x294,0x5 0295 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0296 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0297 e008 | | Load 0x0,0x8 ; Debug Table 0xe.0x8 = 0x297,0x6 0298 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0299 0322 | " | Declare_Variable Record 029a 00d9 | | Load_Top At_Offset_1 029b e404 | | Load 0x2,0x4 029c 01d5 | | Execute Vector,Field_Reference 029d 00d9 | | Load_Top At_Offset_1 029e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 029f e402 | | Load 0x2,0x2 02a0 e001 | | Load 0x0,0x1 02a1 186d | m | Execute Package,Field_Execute,Field_Number 0x6d 02a2 e001 | | Load 0x0,0x1 02a3 1b66 | f | Execute Package,Field_Read,Field_Number 0x66 02a4 0119 | | Execute Any,Check_In_Formal_Type 02a5 00d9 | | Load_Top At_Offset_1 02a6 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 02a7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02a8 00c8 | | Action Pop_Auxiliary_Range 02a9 3fd5 |? | Loop_Increasing 0x27f 02aa 00ce | | Action Pop_Auxiliary 02ab e008 | | Load 0x0,0x8 ; Debug Table 0xe.0x9 = 0x2ab,0x7 02ac 1b0e | | Execute Package,Field_Read,Field_Number 0xe 02ad 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02ae 0000 0000 | | .XXX[0x2] 02b0 ; -------------------------------------------------------------------------------------- 02b0 ; SUBPROGRAM 02b0 ; -------------------------------------------------------------------------------------- 02b0 02ba | | .CONST 0x02ba ; Address of begin 02b1 0004 | | .CONST 0x0004 ; Address of exception handler 02b2 0003 | | .CONST 0x0003 ; Number of locals 02b3 INIT_02b0: 02b3 e008 | | Load 0x0,0x8 ; Debug Table 0xf = .DEBUG 0x02b3,0x0878,0x1001,0x0000,0x0058,0x78f5,0x0000,0x0521 ; Debug Table 0xf.0x0 = 0x2b3,0xffff 02b4 1b0d | | Execute Package,Field_Read,Field_Number 0xd 02b5 0322 | " | Declare_Variable Record 02b6 00d8 | | Load_Top At_Offset_0 02b7 1c00 | | Execute_Immediate Run_Utility,0x0 02b8 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xf.0x1 = 0x2b8,0xfffe 02b9 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 02ba BODY_02b0: 02ba 00cf | | Action Mark_Auxiliary 02bb e5fe | | Load 0x2,-0x2 ; Debug Table 0xf.0x2 = 0x2bb,0x1 02bc 01d9 | | Execute Vector,Reverse_Bounds 02bd 0263 | c | Execute Discrete,Above_Bound 02be 701d |p | Jump_Nonzero 0x2dc 02bf 00db | | Load_Top At_Offset_3 ; Debug Table 0xf.0x3 = 0x2bf,0x2 02c0 7004 |p | Jump_Nonzero 0x2c5 02c1 e5ff | | Load 0x2,-0x1 ; Debug Table 0xf.0x4 = 0x2c1,0x3 02c2 8214 | | Call 0x1,0x14 02c3 e402 | | Load 0x2,0x2 02c4 017d | } | Execute Record,Structure_Write 02c5 e008 | | Load 0x0,0x8 ; Debug Table 0xf.0x5 = 0x2c5,0x4 02c6 1b19 | | Execute Package,Field_Read,Field_Number 0x19 02c7 0322 | " | Declare_Variable Record 02c8 00d8 | | Load_Top At_Offset_0 02c9 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 02ca e5fd | | Load 0x2,-0x3 02cb 00d9 | | Load_Top At_Offset_1 02cc 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 02cd e5fc | | Load 0x2,-0x4 02ce 00d0 | | Action Swap_Control 02cf 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 02d0 e5fb | | Load 0x2,-0x5 02d1 00d9 | | Load_Top At_Offset_1 02d2 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 02d3 00d9 | | Load_Top At_Offset_1 02d4 e5fe | | Load 0x2,-0x2 02d5 01d7 | | Execute Vector,Field_Read 02d6 00d9 | | Load_Top At_Offset_1 02d7 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 02d8 e402 | | Load 0x2,0x2 02d9 820f | | Call 0x1,0xf 02da 00c8 | | Action Pop_Auxiliary_Range 02db 3fe3 |? | Loop_Increasing 0x2bf 02dc 4506 |E | Exit_Suprogram New_Top_Offset 0x6 02dd 0000 0000 | | .XXX[0x3] 02df 0000 | | 02e0 ; -------------------------------------------------------------------------------------- 02e0 ; SUBPROGRAM 02e0 ; -------------------------------------------------------------------------------------- 02e0 02e3 | | .CONST 0x02e3 ; Address of begin 02e1 0004 | | .CONST 0x0004 ; Address of exception handler 02e2 0001 | | .CONST 0x0001 ; Number of locals 02e3 BODY_02e0: 02e3 INIT_02e0: 02e3 4800 |H | Short_Literal 0x0 ; Debug Table 0x10 = .DEBUG 0x02e3,0x0886,0x1001,0x0000,0x0058,0x78f5,0x0000,0x06af ; Debug Table 0x10.0x0 = 0x2e3,0x1 02e4 a7fd | | Store_Unchecked 0x3,-0x3 02e5 00da | | Load_Top At_Offset_2 ; Debug Table 0x10.0x1 = 0x2e5,0x2 02e6 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 02e7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02e8 e5fe | | Load 0x2,-0x2 02e9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 02ea 027c | | | Execute Discrete,Less 02eb 6801 |h | Jump_Zero 0x2ed 02ec 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x10.0x2 = 0x2ec,0x3 02ed 00da | | Load_Top At_Offset_2 ; Debug Table 0x10.0x3 = 0x2ed,0x4 02ee 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 02ef 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02f0 e5fe | | Load 0x2,-0x2 02f1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02f2 027a | z | Execute Discrete,Less_Equal 02f3 6811 |h | Jump_Zero 0x305 02f4 00da | | Load_Top At_Offset_2 02f5 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 02f6 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02f7 00db | | Load_Top At_Offset_3 02f8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02f9 0273 | s | Execute Discrete,Plus 02fa e5fe | | Load 0x2,-0x2 02fb 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 02fc 027b | { | Execute Discrete,Greater_Equal 02fd 6807 |h | Jump_Zero 0x305 02fe 00da | | Load_Top At_Offset_2 ; Debug Table 0x10.0x4 = 0x2fe,0x5 02ff 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0300 e402 | | Load 0x2,0x2 0301 017d | } | Execute Record,Structure_Write 0302 4801 |H | Short_Literal 0x1 ; Debug Table 0x10.0x5 = 0x302,0x6 0303 a7fd | | Store_Unchecked 0x3,-0x3 0304 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0305 4801 |H | Short_Literal 0x1 ; Debug Table 0x10.0x6 = 0x305,0x7 0306 a7fd | | Store_Unchecked 0x3,-0x3 0307 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0308 ; -------------------------------------------------------------------------------------- 0308 ; SUBPROGRAM 0308 ; -------------------------------------------------------------------------------------- 0308 0314 | | .CONST 0x0314 ; Address of begin 0309 0004 | | .CONST 0x0004 ; Address of exception handler 030a 0002 | | .CONST 0x0002 ; Number of locals 030b INIT_0308: 030b e008 | | Load 0x0,0x8 ; Debug Table 0x11 = .DEBUG 0x030b,0x0896,0x1801,0x0002,0x0058,0x78f5,0x0000,0x0750 ; Debug Table 0x11.0x0 = 0x30b,0xffff 030c 1b11 | | Execute Package,Field_Read,Field_Number 0x11 030d 0322 | " | Declare_Variable Record 030e 00db | | Load_Top At_Offset_3 030f 00d9 | | Load_Top At_Offset_1 0310 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0311 e7fe | | Load 0x3,-0x2 0312 00d9 | | Load_Top At_Offset_1 0313 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0314 BODY_0308: 0314 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x11.0x1 = 0x314,0x1 0315 e5f9 | | Load 0x2,-0x7 0316 e008 | | Load 0x0,0x8 0317 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0318 0322 | " | Declare_Variable Record 0319 00db | | Load_Top At_Offset_3 031a 00d9 | | Load_Top At_Offset_1 031b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 031c e7fd | | Load 0x3,-0x3 031d 00d9 | | Load_Top At_Offset_1 031e 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 031f e7fc | | Load 0x3,-0x4 0320 00d9 | | Load_Top At_Offset_1 0321 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0322 85fe | | Call 0x2,-0x2 0323 c5f9 | | Store 0x2,-0x7 0324 c7fb | | Store 0x3,-0x5 0325 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0326 0000 0000 | | .XXX[0x2] 0328 0000 0000 | | .LITERAL {0x00000000, 0x5878f502} 032c 0000 0000 | | .LITERAL {0x00000000, 0x0000078e} 0330 0000 0000 | | .LITERAL {0x00000000, 0x00000702} 0334 0000 0000 | | .LITERAL {0x00000000, 0x0000057e} 0338 0000 0000 | | .LITERAL {0x00000000, 0x005878f5} 033c 0000 0000 | | .BLANK 0000[0x4] 0340 038d 0004 | | .XXX[0x3] 0342 001e | | 0343 029a 0393 | | Declare_Subprogram INIT_0390,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x12 = .DEBUG 0x0343,0x089c,0x0000,0x0000,0x0058,0x78d5,0x0000,0x0072 ; Debug Table 0x12.0x0 = 0x343,0xffff 0345 029a 03db | | Declare_Subprogram INIT_03d8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x12.0x1 = 0x345,0xfffe 0347 029a 03eb | | Declare_Subprogram INIT_03e8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x12.0x2 = 0x347,0xfffd 0349 029a 03fb | | Declare_Subprogram INIT_03f8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x12.0x3 = 0x349,0xfffc 034b 029a 041b | | Declare_Subprogram INIT_0418,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x12.0x4 = 0x34b,0xfffb 034d 029a 045b | [| Declare_Subprogram INIT_0458,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x12.0x5 = 0x34d,0xfffa 034f 029a 046b | k| Declare_Subprogram INIT_0468,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x12.0x6 = 0x34f,0xfff9 0351 4800 |H | Short_Literal 0x0 ; Debug Table 0x12.0x7 = 0x351,0xfff8 0352 4802 |H | Short_Literal 0x2 0353 029f 0483 | | Declare_Subprogram INIT_0480,For_Call 0355 03fe | | Declare_Type Discrete,Defined,Visible 0356 00e4 | | Load_Encached Positive_Cache ; Debug Table 0x12.0x8 = 0x356,0xfff7 0357 0266 | f | Execute Discrete,Bounds 0358 00da | | Load_Top At_Offset_2 0359 02a0 | | Declare_Subprogram Null_Subprogram 035a 4801 |H | Short_Literal 0x1 035b 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object 035c 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x12.0x9 = 0x35c,0xfff6 035d 00d9 | | Load_Top At_Offset_1 035e 00e9 | | Load_Encached String_Cache 035f 029f 049b | | Declare_Subprogram INIT_0498,For_Call 0361 4800 |H | Short_Literal 0x0 0362 4802 |H | Short_Literal 0x2 0363 4800 |H | Short_Literal 0x0 0364 4800 |H | Short_Literal 0x0 0365 4802 |H | Short_Literal 0x2 0366 4801 |H | Short_Literal 0x1 0367 031e | | Declare_Type Variant_Record,Defined,Visible 0368 029a 04cb | | Declare_Subprogram INIT_04c8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x12.0xa = 0x368,0xfff5 036a 029a 0553 | S| Declare_Subprogram INIT_0550,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x12.0xb = 0x36a,0xfff4 036c 029a 0573 | s| Declare_Subprogram INIT_0570,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x12.0xc = 0x36c,0xfff3 036e 00bf | | Action Accept_Activation 036f 029d 05e3 | | Declare_Subprogram INIT_05e0,For_Outer_Call ; Debug Table 0x13 = .DEBUG 0x036f,0x08b8,0x0000,0x0000,0x0058,0x78f5,0x0000,0x00b7 ; Debug Table 0x13.0x0 = 0x36f,0xffff 0371 029d 05f3 | | Declare_Subprogram INIT_05f0,For_Outer_Call ; Debug Table 0x13.0x1 = 0x371,0xfffe 0373 029d 0603 | | Declare_Subprogram INIT_0600,For_Outer_Call ; Debug Table 0x13.0x2 = 0x373,0xfffd 0375 029d 0613 | | Declare_Subprogram INIT_0610,For_Outer_Call ; Debug Table 0x13.0x3 = 0x375,0xfffc 0377 029d 0633 | 3| Declare_Subprogram INIT_0630,For_Outer_Call ; Debug Table 0x13.0x4 = 0x377,0xfffb 0379 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x13.0x5 = 0x379,0xfffa 037a 00c7 | | Action Elaborate_Subprogram 037b 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x13.0x6 = 0x37b,0xfff9 037c 00c7 | | Action Elaborate_Subprogram 037d 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x13.0x7 = 0x37d,0xfff8 037e 00c7 | | Action Elaborate_Subprogram 037f 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x13.0x8 = 0x37f,0xfff7 0380 00c7 | | Action Elaborate_Subprogram 0381 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x13.0x9 = 0x381,0xfff6 0382 00c7 | | Action Elaborate_Subprogram 0383 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x13.0xa = 0x383,0xfff5 0384 00c7 | | Action Elaborate_Subprogram 0385 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x13.0xb = 0x385,0xfff4 0386 00c7 | | Action Elaborate_Subprogram 0387 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x13.0xc = 0x387,0xfff3 0388 00c7 | | Action Elaborate_Subprogram 0389 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x13.0xd = 0x389,0xfff2 038a 00c7 | | Action Elaborate_Subprogram 038b 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x13.0xe = 0x38b,0xfff1 038c 00c7 | | Action Elaborate_Subprogram 038d 00bc | | Action Signal_Activated 038e 00bb | | Action Signal_Completion 038f 0000 | | .XXX[0x1] 0390 ; -------------------------------------------------------------------------------------- 0390 ; SUBPROGRAM 0390 ; -------------------------------------------------------------------------------------- 0390 039c | | .CONST 0x039c ; Address of begin 0391 0004 | | .CONST 0x0004 ; Address of exception handler 0392 0002 | | .CONST 0x0002 ; Number of locals 0393 INIT_0390: 0393 e001 | | Load 0x0,0x1 ; Debug Table 0x14 = .DEBUG 0x0393,0x08d8,0x0002,0x0000,0x0058,0x78d5,0x0000,0x0073 ; Debug Table 0x14.0x0 = 0x393,0xffff 0394 1b19 | | Execute Package,Field_Read,Field_Number 0x19 0395 0322 | " | Declare_Variable Record 0396 e002 | | Load 0x0,0x2 0397 180e | | Execute Package,Field_Execute,Field_Number 0xe 0398 e001 | | Load 0x0,0x1 0399 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 039a 00d9 | | Load_Top At_Offset_1 039b 017d | } | Execute Record,Structure_Write 039c BODY_0390: 039c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x14.0x1 = 0x39c,0x1 039d e001 | | Load 0x0,0x1 ; Debug Table 0x14.0x2 = 0x39d,0x401 039e 1b19 | | Execute Package,Field_Read,Field_Number 0x19 039f 0322 | " | Declare_Variable Record 03a0 e001 | | Load 0x0,0x1 03a1 1b18 | | Execute Package,Field_Read,Field_Number 0x18 03a2 e003 | | Load 0x0,0x3 03a3 1b66 | f | Execute Package,Field_Read,Field_Number 0x66 03a4 0119 | | Execute Any,Check_In_Formal_Type 03a5 00d9 | | Load_Top At_Offset_1 03a6 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 03a7 e001 | | Load 0x0,0x1 03a8 1815 | | Execute Package,Field_Execute,Field_Number 0x15 03a9 00d9 | | Load_Top At_Offset_1 03aa 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 03ab 4800 |H | Short_Literal 0x0 03ac 00d9 | | Load_Top At_Offset_1 03ad 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 03ae 4800 |H | Short_Literal 0x0 03af 00d9 | | Load_Top At_Offset_1 03b0 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 03b1 e004 | | Load 0x0,0x4 03b2 1b14 | | Execute Package,Field_Read,Field_Number 0x14 03b3 00d9 | | Load_Top At_Offset_1 03b4 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 03b5 e001 | | Load 0x0,0x1 03b6 1815 | | Execute Package,Field_Execute,Field_Number 0x15 03b7 00d9 | | Load_Top At_Offset_1 03b8 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 03b9 4800 |H | Short_Literal 0x0 03ba 00d9 | | Load_Top At_Offset_1 03bb 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 03bc 4800 |H | Short_Literal 0x0 03bd 00d9 | | Load_Top At_Offset_1 03be 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 03bf e004 | | Load 0x0,0x4 03c0 1b19 | | Execute Package,Field_Read,Field_Number 0x19 03c1 00d9 | | Load_Top At_Offset_1 03c2 3808 |8 | Execute Record,Field_Write,Field_Number 0x8 03c3 017f | | Execute Record,Equal ; Debug Table 0x14.0x3 = 0x3c3,0x1 03c4 6803 |h | Jump_Zero 0x3c8 03c5 e005 | | Load 0x0,0x5 ; Debug Table 0x14.0x4 = 0x3c5,0x2 03c6 1b14 | | Execute Package,Field_Read,Field_Number 0x14 03c7 0257 | W | Execute Discrete,Raise 03c8 e005 | | Load 0x0,0x5 ; Debug Table 0x14.0x5 = 0x3c8,0x3 03c9 1b0d | | Execute Package,Field_Read,Field_Number 0xd 03ca 0322 | " | Declare_Variable Record 03cb 00d9 | | Load_Top At_Offset_1 03cc 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 03cd 00d9 | | Load_Top At_Offset_1 03ce 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 03cf 00d9 | | Load_Top At_Offset_1 03d0 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03d1 e003 | | Load 0x0,0x3 03d2 1b66 | f | Execute Package,Field_Read,Field_Number 0x66 03d3 0119 | | Execute Any,Check_In_Formal_Type 03d4 00d9 | | Load_Top At_Offset_1 03d5 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 03d6 00ca | | Action Exit_Nullary_Function 03d7 0000 | | .XXX[0x1] 03d8 ; -------------------------------------------------------------------------------------- 03d8 ; SUBPROGRAM 03d8 ; -------------------------------------------------------------------------------------- 03d8 03db | | .CONST 0x03db ; Address of begin 03d9 0004 | | .CONST 0x0004 ; Address of exception handler 03da 0001 | | .CONST 0x0001 ; Number of locals 03db BODY_03d8: 03db INIT_03d8: 03db 00da | | Load_Top At_Offset_2 ; Debug Table 0x15 = .DEBUG 0x03db,0x08e6,0x0002,0x0000,0x0058,0x78d5,0x0000,0x0078 ; Debug Table 0x15.0x0 = 0x3db,0x1 03dc 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 03dd e001 | | Load 0x0,0x1 03de 181e | | Execute Package,Field_Execute,Field_Number 0x1e 03df 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 03e0 e006 | | Load 0x0,0x6 03e1 180d | | Execute Package,Field_Execute,Field_Number 0xd 03e2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03e3 0000 0000 | | .BLANK 0000[0x5] 03e8 ; -------------------------------------------------------------------------------------- 03e8 ; SUBPROGRAM 03e8 ; -------------------------------------------------------------------------------------- 03e8 03eb | | .CONST 0x03eb ; Address of begin 03e9 0004 | | .CONST 0x0004 ; Address of exception handler 03ea 0001 | | .CONST 0x0001 ; Number of locals 03eb BODY_03e8: 03eb INIT_03e8: 03eb 00da | | Load_Top At_Offset_2 ; Debug Table 0x16 = .DEBUG 0x03eb,0x08ea,0x0002,0x0000,0x0058,0x78d5,0x0000,0x0081 ; Debug Table 0x16.0x0 = 0x3eb,0x1 03ec e005 | | Load 0x0,0x5 03ed 180f | | Execute Package,Field_Execute,Field_Number 0xf 03ee 6805 |h | Jump_Zero 0x3f4 03ef 00da | | Load_Top At_Offset_2 ; Debug Table 0x16.0x1 = 0x3ef,0x2 03f0 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 03f1 e001 | | Load 0x0,0x1 03f2 1820 | | Execute Package,Field_Execute,Field_Number 0x20 03f3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03f4 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x16.0x2 = 0x3f4,0x3 03f5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03f6 0000 0000 | | .XXX[0x2] 03f8 ; -------------------------------------------------------------------------------------- 03f8 ; SUBPROGRAM 03f8 ; -------------------------------------------------------------------------------------- 03f8 0404 | | .CONST 0x0404 ; Address of begin 03f9 0004 | | .CONST 0x0004 ; Address of exception handler 03fa 0002 | | .CONST 0x0002 ; Number of locals 03fb INIT_03f8: 03fb e001 | | Load 0x0,0x1 ; Debug Table 0x17 = .DEBUG 0x03fb,0x08f2,0x0002,0x0000,0x0058,0x78d5,0x0000,0x008a ; Debug Table 0x17.0x0 = 0x3fb,0xffff 03fc 1b19 | | Execute Package,Field_Read,Field_Number 0x19 03fd 0322 | " | Declare_Variable Record 03fe e002 | | Load 0x0,0x2 03ff 180e | | Execute Package,Field_Execute,Field_Number 0xe 0400 e001 | | Load 0x0,0x1 0401 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0402 00d9 | | Load_Top At_Offset_1 0403 017d | } | Execute Record,Structure_Write 0404 BODY_03f8: 0404 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0x1 = 0x404,0x1 0405 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0406 e5ff | | Load 0x2,-0x1 0407 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0408 012f | / | Execute Any,Equal 0409 6804 |h | Jump_Zero 0x40e 040a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0x2 = 0x40a,0x2 040b 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4 040c 8007 | | Call 0x0,0x7 040d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 040e 00db | | Load_Top At_Offset_3 ; Debug Table 0x17.0x3 = 0x40e,0x3 040f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0410 e003 | | Load 0x0,0x3 0411 1b67 | g | Execute Package,Field_Read,Field_Number 0x67 0412 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0413 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0414 8007 | | Call 0x0,0x7 0415 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0416 0000 0000 | | .XXX[0x2] 0418 ; -------------------------------------------------------------------------------------- 0418 ; SUBPROGRAM 0418 ; -------------------------------------------------------------------------------------- 0418 042d | - | .CONST 0x042d ; Address of begin 0419 0004 | | .CONST 0x0004 ; Address of exception handler 041a 0005 | | .CONST 0x0005 ; Number of locals 041b INIT_0418: 041b e004 | | Load 0x0,0x4 ; Debug Table 0x18 = .DEBUG 0x041b,0x08fc,0x0001,0x0000,0x0058,0x78d5,0x0000,0x0093 ; Debug Table 0x18.0x0 = 0x41b,0xffff 041c 1b13 | | Execute Package,Field_Read,Field_Number 0x13 041d 0322 | " | Declare_Variable Record 041e e004 | | Load 0x0,0x4 041f 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0420 0322 | " | Declare_Variable Record 0421 e5ff | | Load 0x2,-0x1 ; Debug Table 0x18.0x1 = 0x421,0xfffe 0422 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0423 e001 | | Load 0x0,0x1 0424 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0425 e003 | | Load 0x0,0x3 0426 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0427 011e | | Execute Any,Convert 0428 e003 | | Load 0x0,0x3 ; Debug Table 0x18.0x2 = 0x428,0xfffd 0429 1b12 | | Execute Package,Field_Read,Field_Number 0x12 042a 02c7 | | Declare_Variable Any 042b 00d8 | | Load_Top At_Offset_0 042c 1c00 | | Execute_Immediate Run_Utility,0x0 042d BODY_0418: 042d 00da | | Load_Top At_Offset_2 ; Debug Table 0x18.0x3 = 0x42d,0x1 042e e402 | | Load 0x2,0x2 042f 00da | | Load_Top At_Offset_2 0430 0120 | | Execute Any,Is_Value 0431 6803 |h | Jump_Zero 0x435 0432 e003 | | Load 0x0,0x3 0433 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0434 7801 |x | Jump 0x436 0435 00da | | Load_Top At_Offset_2 0436 e404 | | Load 0x2,0x4 0437 e003 | | Load 0x0,0x3 0438 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31 0439 e003 | | Load 0x0,0x3 043a 188a | | Execute Package,Field_Execute,Field_Number 0x8a 043b c405 | | Store 0x2,0x5 043c 00d2 | | Pop_Control Pop_Count_2 043d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x4 = 0x43d,0x2 043e 00da | | Load_Top At_Offset_2 043f 012f | / | Execute Any,Equal 0440 6809 |h | Jump_Zero 0x44a 0441 00db | | Load_Top At_Offset_3 ; Debug Table 0x18.0x5 = 0x441,0x3 0442 8007 | | Call 0x0,0x7 0443 e5fe | | Load 0x2,-0x2 0444 017d | } | Execute Record,Structure_Write 0445 00da | | Load_Top At_Offset_2 ; Debug Table 0x18.0x6 = 0x445,0x4 0446 8007 | | Call 0x0,0x7 0447 e5fd | | Load 0x2,-0x3 0448 017d | } | Execute Record,Structure_Write 0449 4502 |E | Exit_Suprogram New_Top_Offset 0x2 044a e005 | | Load 0x0,0x5 ; Debug Table 0x18.0x7 = 0x44a,0x5 044b 1b12 | | Execute Package,Field_Read,Field_Number 0x12 044c e5fe | | Load 0x2,-0x2 044d 017d | } | Execute Record,Structure_Write 044e e005 | | Load 0x0,0x5 ; Debug Table 0x18.0x8 = 0x44e,0x6 044f 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0450 e5fd | | Load 0x2,-0x3 0451 017d | } | Execute Record,Structure_Write 0452 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0453 0000 0000 | | .BLANK 0000[0x5] 0458 ; -------------------------------------------------------------------------------------- 0458 ; SUBPROGRAM 0458 ; -------------------------------------------------------------------------------------- 0458 045b | [ | .CONST 0x045b ; Address of begin 0459 0004 | | .CONST 0x0004 ; Address of exception handler 045a 0001 | | .CONST 0x0001 ; Number of locals 045b BODY_0458: 045b INIT_0458: 045b 00da | | Load_Top At_Offset_2 ; Debug Table 0x19 = .DEBUG 0x045b,0x0910,0x0002,0x0000,0x0058,0x78d5,0x0000,0x00a0 ; Debug Table 0x19.0x0 = 0x45b,0x1 045c 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 045d e001 | | Load 0x0,0x1 045e 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 045f e003 | | Load 0x0,0x3 0460 1848 | H | Execute Package,Field_Execute,Field_Number 0x48 0461 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 0462 8007 | | Call 0x0,0x7 0463 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0464 0000 0000 | | .BLANK 0000[0x4] 0468 ; -------------------------------------------------------------------------------------- 0468 ; SUBPROGRAM 0468 ; -------------------------------------------------------------------------------------- 0468 046d | m | .CONST 0x046d ; Address of begin 0469 0004 | | .CONST 0x0004 ; Address of exception handler 046a 0002 | | .CONST 0x0002 ; Number of locals 046b INIT_0468: 046b e004 | | Load 0x0,0x4 ; Debug Table 0x1a = .DEBUG 0x046b,0x0914,0x0001,0x0000,0x0058,0x78d5,0x0000,0x00a9 ; Debug Table 0x1a.0x0 = 0x46b,0xffff 046c 1b11 | | Execute Package,Field_Read,Field_Number 0x11 046d BODY_0468: 046d e001 | | Load 0x0,0x1 ; Debug Table 0x1a.0x1 = 0x46d,0x1 046e 1b12 | | Execute Package,Field_Read,Field_Number 0x12 046f 821b | | Call 0x1,0x1b 0470 4800 |H | Short_Literal 0x0 0471 4800 |H | Short_Literal 0x0 0472 4801 |H | Short_Literal 0x1 0473 e5fe | | Load 0x2,-0x2 0474 8008 | | Call 0x0,0x8 0475 e5ff | | Load 0x2,-0x1 0476 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0477 e001 | | Load 0x0,0x1 0478 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 0479 0059 | Y | Store_Top Discrete,At_Offset_1 047a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1a.0x2 = 0x47a,0x2 047b 8009 | | Call 0x0,0x9 047c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 047d 0000 0000 | | .XXX[0x3] 047f 0000 | | 0480 ; -------------------------------------------------------------------------------------- 0480 ; SUBPROGRAM 0480 ; -------------------------------------------------------------------------------------- 0480 0483 | | .CONST 0x0483 ; Address of begin 0481 0004 | | .CONST 0x0004 ; Address of exception handler 0482 0001 | | .CONST 0x0001 ; Number of locals 0483 BODY_0480: 0483 INIT_0480: 0483 4603 |F | Jump_Case 0x4 ; Debug Table 0x1b = .DEBUG 0x0483,0x091c,0x0005,0x0000,0x0058,0x78d5,0x0000,0x00b5 0484 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0485 7802 |x | Jump 0x488 ; case 0x1 0486 7805 |x | Jump 0x48c ; case 0x2 0487 7809 |x | Jump 0x491 ; case 0x3 0488 00da | | Load_Top At_Offset_2 0489 0091 0653 | S| Action Push_String_Extended_Indexed,0x653 ; "TEXT" 048b 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 048c 00db | | Load_Top At_Offset_3 048d 00db | | Load_Top At_Offset_3 048e 00e0 | | Load_Encached Standard_Cache 048f 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0490 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0491 00da | | Load_Top At_Offset_2 0492 00e0 | | Load_Encached Standard_Cache 0493 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0494 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0495 0000 0000 | | .XXX[0x3] 0497 0000 | | 0498 ; -------------------------------------------------------------------------------------- 0498 ; SUBPROGRAM 0498 ; -------------------------------------------------------------------------------------- 0498 049b | | .CONST 0x049b ; Address of begin 0499 0004 | | .CONST 0x0004 ; Address of exception handler 049a 0001 | | .CONST 0x0001 ; Number of locals 049b BODY_0498: 049b INIT_0498: 049b 4608 |F | Jump_Case 0x9 ; Debug Table 0x1c = .DEBUG 0x049b,0x091e,0x0005,0x0000,0x0058,0x78d5,0x0000,0x00c5 049c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 049d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 049e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 049f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 04a0 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 04a1 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 04a2 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6 04a3 7801 |x | Jump 0x4a5 ; case 0x7 04a4 780d |x | Jump 0x4b2 ; case 0x8 04a5 00db | | Load_Top At_Offset_3 04a6 4801 |H | Short_Literal 0x1 04a7 e5fe | | Load 0x2,-0x2 04a8 e215 | | Load 0x1,0x15 04a9 035b | [ | Declare_Type Array,Constrained 04aa 4801 |H | Short_Literal 0x1 04ab e5fe | | Load 0x2,-0x2 04ac 00e9 | | Load_Encached String_Cache 04ad 035b | [ | Declare_Type Array,Constrained 04ae 4802 |H | Short_Literal 0x2 04af e5ff | | Load 0x2,-0x1 04b0 031b | | Declare_Type Variant_Record,Constrained 04b1 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 04b2 00db | | Load_Top At_Offset_3 04b3 00db | | Load_Top At_Offset_3 04b4 02fc | | Declare_Variable Variant_Record,With_Constraint 04b5 4801 |H | Short_Literal 0x1 04b6 e5fe | | Load 0x2,-0x2 04b7 e215 | | Load 0x1,0x15 04b8 0334 | 4 | Declare_Variable Array,With_Constraint 04b9 2d02 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x2 04ba 4801 |H | Short_Literal 0x1 04bb e5fe | | Load 0x2,-0x2 04bc 00e9 | | Load_Encached String_Cache 04bd 0334 | 4 | Declare_Variable Array,With_Constraint 04be 2d03 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x3 04bf 016a | j | QQ_execute Variant_Record,XXX 04c0 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 04c1 0000 0000 | | .BLANK 0000[0x7] 04c8 ; -------------------------------------------------------------------------------------- 04c8 ; SUBPROGRAM 04c8 ; -------------------------------------------------------------------------------------- 04c8 04cb | | .CONST 0x04cb ; Address of begin 04c9 053c | < | .CONST 0x053c ; Address of exception handler 04ca 0001 | | .CONST 0x0001 ; Number of locals 04cb BODY_04c8: 04cb INIT_04c8: 04cb 00da | | Load_Top At_Offset_2 ; Debug Table 0x1d = .DEBUG 0x04cb,0x0920,0x0002,0x0000,0x0058,0x78d5,0x0000,0x00df ; Debug Table 0x1d.0x0 = 0x4cb,0x1 04cc 821e | | Call 0x1,0x1e 04cd 00db | | Load_Top At_Offset_3 ; Debug Table 0x1d.0x1 = 0x4cd,0x2 04ce 00db | | Load_Top At_Offset_3 04cf 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 04d0 e001 | | Load 0x0,0x1 04d1 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 04d2 e003 | | Load 0x0,0x3 04d3 1848 | H | Execute Package,Field_Execute,Field_Number 0x48 04d4 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 04d5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 04d6 027d | } | Execute Discrete,Greater 04d7 6834 |h4 | Jump_Zero 0x50c 04d8 4800 |H | Short_Literal 0x0 ; Debug Table 0x1d.0x2 = 0x4d8,0x3 04d9 e216 | | Load 0x1,0x16 04da 1c08 | | Execute_Immediate Run_Utility,0x8 04db 4801 |H | Short_Literal 0x1 04dc 4800 |H | Short_Literal 0x0 04dd e215 | | Load 0x1,0x15 04de 035b | [ | Declare_Type Array,Constrained 04df 0337 | 7 | Declare_Variable Array 04e0 00d9 | | Load_Top At_Offset_1 04e1 00d8 | | Load_Top At_Offset_0 04e2 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2 04e3 00da | | Load_Top At_Offset_2 04e4 01da | | Execute Vector,Bounds 04e5 00da | | Load_Top At_Offset_2 04e6 01da | | Execute Vector,Bounds 04e7 00da | | Load_Top At_Offset_2 04e8 027f | | Execute Discrete,Equal 04e9 7002 |p | Jump_Nonzero 0x4ec 04ea 48e0 |H | Short_Literal 0xe0 04eb 0257 | W | Execute Discrete,Raise 04ec 00d0 | | Action Swap_Control 04ed 00d1 | | Pop_Control Pop_Count_1 04ee 027f | | Execute Discrete,Equal 04ef 7002 |p | Jump_Nonzero 0x4f2 04f0 48e0 |H | Short_Literal 0xe0 04f1 0257 | W | Execute Discrete,Raise 04f2 00d2 | | Pop_Control Pop_Count_2 04f3 00d9 | | Load_Top At_Offset_1 04f4 2902 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x2 04f5 00ea | | Load_Encached Null_String_Cache 04f6 00d9 | | Load_Top At_Offset_1 04f7 00d8 | | Load_Top At_Offset_0 04f8 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 04f9 00da | | Load_Top At_Offset_2 04fa 01da | | Execute Vector,Bounds 04fb 00da | | Load_Top At_Offset_2 04fc 01da | | Execute Vector,Bounds 04fd 00da | | Load_Top At_Offset_2 04fe 027f | | Execute Discrete,Equal 04ff 7002 |p | Jump_Nonzero 0x502 0500 48e0 |H | Short_Literal 0xe0 0501 0257 | W | Execute Discrete,Raise 0502 00d0 | | Action Swap_Control 0503 00d1 | | Pop_Control Pop_Count_1 0504 027f | | Execute Discrete,Equal 0505 7002 |p | Jump_Nonzero 0x508 0506 48e0 |H | Short_Literal 0xe0 0507 0257 | W | Execute Discrete,Raise 0508 00d2 | | Pop_Control Pop_Count_2 0509 00d9 | | Load_Top At_Offset_1 050a 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3 050b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 050c 00cf | | Action Mark_Auxiliary ; Debug Table 0x1d.0x3 = 0x50c,0x4 050d e003 | | Load 0x0,0x3 ; Debug Table 0x1d.0x4 = 0x50d,0xfbff 050e 1b14 | | Execute Package,Field_Read,Field_Number 0x14 050f 0322 | " | Declare_Variable Record 0510 e5ff | | Load 0x2,-0x1 0511 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0512 e001 | | Load 0x0,0x1 0513 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0514 e003 | | Load 0x0,0x3 0515 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0516 0119 | | Execute Any,Check_In_Formal_Type 0517 00d9 | | Load_Top At_Offset_1 0518 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0519 00d8 | | Load_Top At_Offset_0 051a 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 051b e5fe | | Load 0x2,-0x2 051c 00d9 | | Load_Top At_Offset_1 051d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 051e 4801 |H | Short_Literal 0x1 051f 00d0 | | Action Swap_Control 0520 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0521 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x5 = 0x521,0xfbfe 0522 e003 | | Load 0x0,0x3 0523 184d | M | Execute Package,Field_Execute,Field_Number 0x4d 0524 00e3 | | Load_Encached Natural_Cache 0525 03f1 | | Declare_Variable Discrete,With_Value 0526 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0x6 = 0x526,0xfbfd 0527 e216 | | Load 0x1,0x16 0528 1c08 | | Execute_Immediate Run_Utility,0x8 0529 e5ff | | Load 0x2,-0x1 ; Debug Table 0x1d.0x7 = 0x529,0x401 052a 821e | | Call 0x1,0x1e 052b 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1d.0x8 = 0x52b,0x402 052c 00db | | Load_Top At_Offset_3 052d e003 | | Load 0x0,0x3 052e 184f | O | Execute Package,Field_Execute,Field_Number 0x4f 052f 00d9 | | Load_Top At_Offset_1 0530 2903 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x3 0531 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1d.0x9 = 0x531,0x403 0532 00db | | Load_Top At_Offset_3 0533 e003 | | Load 0x0,0x3 0534 1850 | P | Execute Package,Field_Execute,Field_Number 0x50 0535 821d | | Call 0x1,0x1d 0536 00d9 | | Load_Top At_Offset_1 0537 2902 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x2 0538 e5ff | | Load 0x2,-0x1 ; Debug Table 0x1d.0xa = 0x538,0x404 0539 821e | | Call 0x1,0x1e 053a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1d.0xb = 0x53a,0x405 053b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 053c TRAP_04c8: 053c 010e | | Execute Exception,Is_Constraint_Error 053d 6803 |h | Jump_Zero 0x541 053e e005 | | Load 0x0,0x5 ; Debug Table 0x1d.0xc = 0x53e,0x5 053f 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0540 0257 | W | Execute Discrete,Raise 0541 e003 | | Load 0x0,0x3 0542 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 0543 010f | | Execute Exception,Equal 0544 6803 |h | Jump_Zero 0x548 0545 e005 | | Load 0x0,0x5 ; Debug Table 0x1d.0xd = 0x545,0x6 0546 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0547 0257 | W | Execute Discrete,Raise 0548 e005 | | Load 0x0,0x5 ; Debug Table 0x1d.0xe = 0x548,0x7 0549 1b15 | | Execute Package,Field_Read,Field_Number 0x15 054a 0257 | W | Execute Discrete,Raise 054b 0000 0000 | | .BLANK 0000[0x5] 0550 ; -------------------------------------------------------------------------------------- 0550 ; SUBPROGRAM 0550 ; -------------------------------------------------------------------------------------- 0550 055c | \ | .CONST 0x055c ; Address of begin 0551 0004 | | .CONST 0x0004 ; Address of exception handler 0552 0003 | | .CONST 0x0003 ; Number of locals 0553 INIT_0550: 0553 e004 | | Load 0x0,0x4 ; Debug Table 0x1e = .DEBUG 0x0553,0x0940,0x0001,0x0000,0x0058,0x78d5,0x0000,0x00ec ; Debug Table 0x1e.0x0 = 0x553,0xffff 0554 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0555 0322 | " | Declare_Variable Record 0556 e5fc | | Load 0x2,-0x4 0557 8008 | | Call 0x0,0x8 0558 00d9 | | Load_Top At_Offset_1 0559 017d | } | Execute Record,Structure_Write 055a e004 | | Load 0x0,0x4 ; Debug Table 0x1e.0x1 = 0x55a,0xfffe 055b 1b11 | | Execute Package,Field_Read,Field_Number 0x11 055c BODY_0550: 055c e001 | | Load 0x0,0x1 ; Debug Table 0x1e.0x2 = 0x55c,0x1 055d 1b12 | | Execute Package,Field_Read,Field_Number 0x12 055e 00da | | Load_Top At_Offset_2 055f 821b | | Call 0x1,0x1b 0560 e5fd | | Load 0x2,-0x3 0561 e5fe | | Load 0x2,-0x2 0562 e5ff | | Load 0x2,-0x1 0563 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0564 e001 | | Load 0x0,0x1 0565 1856 | V | Execute Package,Field_Execute,Field_Number 0x56 0566 00d1 | | Pop_Control Pop_Count_1 0567 0059 | Y | Store_Top Discrete,At_Offset_1 0568 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1e.0x3 = 0x568,0x2 0569 8009 | | Call 0x0,0x9 056a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1e.0x4 = 0x56a,0x3 056b 8007 | | Call 0x0,0x7 056c e5fc | | Load 0x2,-0x4 056d 017d | } | Execute Record,Structure_Write 056e 4504 |E | Exit_Suprogram New_Top_Offset 0x4 056f 0000 | | .XXX[0x1] 0570 ; -------------------------------------------------------------------------------------- 0570 ; SUBPROGRAM 0570 ; -------------------------------------------------------------------------------------- 0570 05a6 | | .CONST 0x05a6 ; Address of begin 0571 0004 | | .CONST 0x0004 ; Address of exception handler 0572 0006 | | .CONST 0x0006 ; Number of locals 0573 INIT_0570: 0573 e004 | | Load 0x0,0x4 ; Debug Table 0x1f = .DEBUG 0x0573,0x094c,0x0001,0x0000,0x0058,0x78d5,0x0000,0x0100 ; Debug Table 0x1f.0x0 = 0x573,0xffff 0574 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0575 0322 | " | Declare_Variable Record 0576 e5fc | | Load 0x2,-0x4 0577 8008 | | Call 0x0,0x8 0578 00d9 | | Load_Top At_Offset_1 0579 017d | } | Execute Record,Structure_Write 057a e004 | | Load 0x0,0x4 ; Debug Table 0x1f.0x1 = 0x57a,0xfffe 057b 1b11 | | Execute Package,Field_Read,Field_Number 0x11 057c 4801 |H | Short_Literal 0x1 ; Debug Table 0x1f.0x2 = 0x57c,0xfffd 057d e5fd | | Load 0x2,-0x3 057e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 057f 00e9 | | Load_Encached String_Cache 0580 0334 | 4 | Declare_Variable Array,With_Constraint 0581 e5fd | | Load 0x2,-0x3 0582 2503 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x3 0583 00d9 | | Load_Top At_Offset_1 0584 01d4 | | Execute Vector,Structure_Write 0585 4801 |H | Short_Literal 0x1 ; Debug Table 0x1f.0x3 = 0x585,0xfffc 0586 e5fd | | Load 0x2,-0x3 0587 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0588 e003 | | Load 0x0,0x3 0589 1b4a | J | Execute Package,Field_Read,Field_Number 0x4a 058a 0334 | 4 | Declare_Variable Array,With_Constraint 058b e00a | | Load 0x0,0xa ; Debug Table 0x1f.0x4 = 0x58b,0xfffb 058c 1b11 | | Execute Package,Field_Read,Field_Number 0x11 058d 0322 | " | Declare_Variable Record 058e 4800 |H | Short_Literal 0x0 058f 00d9 | | Load_Top At_Offset_1 0590 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0591 4802 |H | Short_Literal 0x2 0592 00d9 | | Load_Top At_Offset_1 0593 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0594 4800 |H | Short_Literal 0x0 0595 00d9 | | Load_Top At_Offset_1 0596 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0597 e00a | | Load 0x0,0xa 0598 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0599 0337 | 7 | Declare_Variable Array 059a 4803 |H | Short_Literal 0x3 059b 4800 |H | Short_Literal 0x0 059c 4800 |H | Short_Literal 0x0 059d 00d9 | | Load_Top At_Offset_1 059e e407 | | Load 0x2,0x7 059f 01d6 | | Execute Vector,Field_Write 05a0 3ffb |? | Loop_Increasing 0x59c 05a1 e00a | | Load 0x0,0xa 05a2 1b0f | | Execute Package,Field_Read,Field_Number 0xf 05a3 0119 | | Execute Any,Check_In_Formal_Type 05a4 00d9 | | Load_Top At_Offset_1 05a5 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 05a6 BODY_0570: 05a6 00cf | | Action Mark_Auxiliary 05a7 e5fd | | Load 0x2,-0x3 ; Debug Table 0x1f.0x5 = 0x5a7,0x1 05a8 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 05a9 4801 |H | Short_Literal 0x1 05aa 0263 | c | Execute Discrete,Above_Bound 05ab 701a |p | Jump_Nonzero 0x5c6 05ac 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1f.0x6 = 0x5ac,0x2 05ad e5fd | | Load 0x2,-0x3 05ae 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2 05af 01d7 | | Execute Vector,Field_Read 05b0 4602 |F | Jump_Case 0x3 05b1 7802 |x | Jump 0x5b4 ; case 0x0 05b2 7807 |x | Jump 0x5ba ; case 0x1 05b3 780c |x | Jump 0x5c0 ; case 0x2 05b4 e00a | | Load 0x0,0xa ; Debug Table 0x1f.0x7 = 0x5b4,0x3 05b5 1b12 | | Execute Package,Field_Read,Field_Number 0x12 05b6 00d9 | | Load_Top At_Offset_1 05b7 e405 | | Load 0x2,0x5 05b8 01d6 | | Execute Vector,Field_Write 05b9 780a |x | Jump 0x5c4 05ba e00a | | Load 0x0,0xa ; Debug Table 0x1f.0x8 = 0x5ba,0x4 05bb 1b15 | | Execute Package,Field_Read,Field_Number 0x15 05bc 00d9 | | Load_Top At_Offset_1 05bd e405 | | Load 0x2,0x5 05be 01d6 | | Execute Vector,Field_Write 05bf 7804 |x | Jump 0x5c4 05c0 00db | | Load_Top At_Offset_3 ; Debug Table 0x1f.0x9 = 0x5c0,0x5 05c1 00d9 | | Load_Top At_Offset_1 05c2 e405 | | Load 0x2,0x5 05c3 01d6 | | Execute Vector,Field_Write 05c4 00c8 | | Action Pop_Auxiliary_Range 05c5 3fe6 |? | Loop_Increasing 0x5ac 05c6 00ce | | Action Pop_Auxiliary 05c7 e001 | | Load 0x0,0x1 ; Debug Table 0x1f.0xa = 0x5c7,0x6 05c8 1b12 | | Execute Package,Field_Read,Field_Number 0x12 05c9 e402 | | Load 0x2,0x2 05ca 821b | | Call 0x1,0x1b 05cb e405 | | Load 0x2,0x5 05cc e404 | | Load 0x2,0x4 05cd e5fe | | Load 0x2,-0x2 05ce e5ff | | Load 0x2,-0x1 05cf 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 05d0 e001 | | Load 0x0,0x1 05d1 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59 05d2 00d1 | | Pop_Control Pop_Count_1 05d3 c403 | | Store 0x2,0x3 05d4 00db | | Load_Top At_Offset_3 ; Debug Table 0x1f.0xb = 0x5d4,0x7 05d5 8009 | | Call 0x0,0x9 05d6 e402 | | Load 0x2,0x2 ; Debug Table 0x1f.0xc = 0x5d6,0x8 05d7 8007 | | Call 0x0,0x7 05d8 e5fc | | Load 0x2,-0x4 05d9 017d | } | Execute Record,Structure_Write 05da 4504 |E | Exit_Suprogram New_Top_Offset 0x4 05db 0000 0000 | | .BLANK 0000[0x5] 05e0 ; -------------------------------------------------------------------------------------- 05e0 ; SUBPROGRAM 05e0 ; -------------------------------------------------------------------------------------- 05e0 05e3 | | .CONST 0x05e3 ; Address of begin 05e1 05e8 | | .CONST 0x05e8 ; Address of exception handler 05e2 0001 | | .CONST 0x0001 ; Number of locals 05e3 BODY_05e0: 05e3 INIT_05e0: 05e3 e00b | | Load 0x0,0xb ; Debug Table 0x20 = .DEBUG 0x05e3,0x0968,0x0002,0x0000,0x0058,0x78f5,0x0000,0x00b8 ; Debug Table 0x20.0x0 = 0x5e3,0x1 05e4 1860 | ` | Execute Package,Field_Execute,Field_Number 0x60 05e5 e00c | | Load 0x0,0xc 05e6 1816 | | Execute Package,Field_Execute,Field_Number 0x16 05e7 00ca | | Action Exit_Nullary_Function 05e8 TRAP_05e0: 05e8 e00b | | Load 0x0,0xb 05e9 1b64 | d | Execute Package,Field_Read,Field_Number 0x64 05ea 010f | | Execute Exception,Equal 05eb 6802 |h | Jump_Zero 0x5ee 05ec 4800 |H | Short_Literal 0x0 ; Debug Table 0x20.0x1 = 0x5ec,0x2 05ed 00ca | | Action Exit_Nullary_Function 05ee 0100 | | Execute Exception,Raise 05ef 0000 | | .XXX[0x1] 05f0 ; -------------------------------------------------------------------------------------- 05f0 ; SUBPROGRAM 05f0 ; -------------------------------------------------------------------------------------- 05f0 05f7 | | .CONST 0x05f7 ; Address of begin 05f1 0004 | | .CONST 0x0004 ; Address of exception handler 05f2 0002 | | .CONST 0x0002 ; Number of locals 05f3 INIT_05f0: 05f3 821a | | Call 0x1,0x1a ; Debug Table 0x21 = .DEBUG 0x05f3,0x096e,0x0002,0x0000,0x0058,0x78f5,0x0000,0x00da ; Debug Table 0x21.0x0 = 0x5f3,0xffff 05f4 e00c | | Load 0x0,0xc 05f5 1b15 | | Execute Package,Field_Read,Field_Number 0x15 05f6 03f1 | | Declare_Variable Discrete,With_Value 05f7 BODY_05f0: 05f7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x21.0x1 = 0x5f7,0x1 05f8 7003 |p | Jump_Nonzero 0x5fc 05f9 e002 | | Load 0x0,0x2 ; Debug Table 0x21.0x2 = 0x5f9,0x2 05fa 180e | | Execute Package,Field_Execute,Field_Number 0xe 05fb 00ca | | Action Exit_Nullary_Function 05fc 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x21.0x3 = 0x5fc,0x3 05fd 00ca | | Action Exit_Nullary_Function 05fe 0000 0000 | | .XXX[0x2] 0600 ; -------------------------------------------------------------------------------------- 0600 ; SUBPROGRAM 0600 ; -------------------------------------------------------------------------------------- 0600 0603 | | .CONST 0x0603 ; Address of begin 0601 0004 | | .CONST 0x0004 ; Address of exception handler 0602 0001 | | .CONST 0x0001 ; Number of locals 0603 BODY_0600: 0603 INIT_0600: 0603 00da | | Load_Top At_Offset_2 ; Debug Table 0x22 = .DEBUG 0x0603,0x0978,0x0002,0x0000,0x0058,0x78f5,0x0000,0x0101 ; Debug Table 0x22.0x0 = 0x603,0x1 0604 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0605 4602 |F | Jump_Case 0x3 0606 7802 |x | Jump 0x609 ; case 0x0 0607 7803 |x | Jump 0x60b ; case 0x1 0608 7804 |x | Jump 0x60d ; case 0x2 0609 4800 |H | Short_Literal 0x0 ; Debug Table 0x22.0x1 = 0x609,0x2 060a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 060b 4801 |H | Short_Literal 0x1 ; Debug Table 0x22.0x2 = 0x60b,0x3 060c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 060d 4802 |H | Short_Literal 0x2 ; Debug Table 0x22.0x3 = 0x60d,0x4 060e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 060f 0000 | | .XXX[0x1] 0610 ; -------------------------------------------------------------------------------------- 0610 ; SUBPROGRAM 0610 ; -------------------------------------------------------------------------------------- 0610 0618 | | .CONST 0x0618 ; Address of begin 0611 0004 | | .CONST 0x0004 ; Address of exception handler 0612 0002 | | .CONST 0x0002 ; Number of locals 0613 INIT_0610: 0613 00da | | Load_Top At_Offset_2 ; Debug Table 0x23 = .DEBUG 0x0613,0x0982,0x0002,0x0000,0x0058,0x78f5,0x0000,0x012d ; Debug Table 0x23.0x0 = 0x613,0xffff 0614 01da | | Execute Vector,Bounds 0615 e215 | | Load 0x1,0x15 0616 035b | [ | Declare_Type Array,Constrained 0617 0337 | 7 | Declare_Variable Array 0618 BODY_0610: 0618 00cf | | Action Mark_Auxiliary 0619 e5ff | | Load 0x2,-0x1 ; Debug Table 0x23.0x1 = 0x619,0x1 061a 01d9 | | Execute Vector,Reverse_Bounds 061b 0263 | c | Execute Discrete,Above_Bound 061c 7009 |p | Jump_Nonzero 0x626 061d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x23.0x2 = 0x61d,0x2 061e e5ff | | Load 0x2,-0x1 061f 01d5 | | Execute Vector,Field_Reference 0620 821c | | Call 0x1,0x1c 0621 00d9 | | Load_Top At_Offset_1 0622 e402 | | Load 0x2,0x2 0623 01d6 | | Execute Vector,Field_Write 0624 00c8 | | Action Pop_Auxiliary_Range 0625 3ff7 |? | Loop_Increasing 0x61d 0626 00ce | | Action Pop_Auxiliary 0627 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x23.0x3 = 0x627,0x3 0628 e215 | | Load 0x1,0x15 0629 01c6 | | Execute Vector,Convert_To_Formal 062a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 062b 0000 0000 | | .BLANK 0000[0x5] 0630 ; -------------------------------------------------------------------------------------- 0630 ; SUBPROGRAM 0630 ; -------------------------------------------------------------------------------------- 0630 063d | = | .CONST 0x063d ; Address of begin 0631 0004 | | .CONST 0x0004 ; Address of exception handler 0632 0002 | | .CONST 0x0002 ; Number of locals 0633 INIT_0630: 0633 e002 | | Load 0x0,0x2 ; Debug Table 0x24 = .DEBUG 0x0633,0x098c,0x0001,0x0000,0x0058,0x78f5,0x0000,0x015a ; Debug Table 0x24.0x0 = 0x633,0xffff 0634 180e | | Execute Package,Field_Execute,Field_Number 0xe 0635 e001 | | Load 0x0,0x1 0636 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0637 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0638 e001 | | Load 0x0,0x1 0639 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 063a e00c | | Load 0x0,0xc 063b 1b15 | | Execute Package,Field_Read,Field_Number 0x15 063c 03f1 | | Declare_Variable Discrete,With_Value 063d BODY_0630: 063d e002 | | Load 0x0,0x2 ; Debug Table 0x24.0x1 = 0x63d,0xfffe ; Debug Table 0x24.0x2 = 0x63d,0x1 063e 180e | | Execute Package,Field_Execute,Field_Number 0xe 063f 00d9 | | Load_Top At_Offset_1 0640 027f | | Execute Discrete,Equal 0641 7007 |p | Jump_Nonzero 0x649 0642 821a | | Call 0x1,0x1a 0643 00d9 | | Load_Top At_Offset_1 0644 027f | | Execute Discrete,Equal 0645 7003 |p | Jump_Nonzero 0x649 0646 e005 | | Load 0x0,0x5 ; Debug Table 0x24.0x3 = 0x646,0x2 0647 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0648 0257 | W | Execute Discrete,Raise 0649 00db | | Load_Top At_Offset_3 ; Debug Table 0x24.0x4 = 0x649,0x3 064a 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 064b e001 | | Load 0x0,0x1 064c 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 064d 0f05 | | Execute_Immediate Equal,0x5 064e 6803 |h | Jump_Zero 0x652 064f e005 | | Load 0x0,0x5 ; Debug Table 0x24.0x5 = 0x64f,0x4 0650 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0651 0257 | W | Execute Discrete,Raise 0652 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0653 ; -------------------------------------------------------------------------------------- 0653 ; STRING TABLE 0653 ; -------------------------------------------------------------------------------------- 0653 0008 | | .STRTAB 0x0008->0x0657 ; "TEXT" 0654 000a | | .STRTAB 0x000a->0x0659 ; "PROMPT" 0655 000e | | .STRTAB 0x000e->0x065c ; "PROTECTED" 0656 0015 | | .STREND 0x0015->0x0660 0657 5445 5854 |TEXT| .STRTAB_STRINGS 0661 0000 0000 | | .BLANK 0000[0x7] 0668 ; -------------------------------------------------------------------------------------- 0668 ; Debug Table 0668 ; -------------------------------------------------------------------------------------- 0668 0003 0025 | %| .CONST 0x0003,0x0025 066a 000b 0792 | | .DEBUG 0x000b,0x0792,0x8000,0x0000,0x0058,0x78d5,0x0000,0x000c 0672 0065 07bc | e | .DEBUG 0x0065,0x07bc,0x8000,0x0000,0x0058,0x78f5,0x0000,0x0019 067a 0093 07ce | | .DEBUG 0x0093,0x07ce,0x0002,0x0000,0x0058,0x78d5,0x0000,0x0026 0682 00a3 07d2 | | .DEBUG 0x00a3,0x07d2,0x0002,0x0000,0x0058,0x78d5,0x0000,0x002f 068a 00b3 07d6 | | .DEBUG 0x00b3,0x07d6,0x0005,0x0000,0x0058,0x78d5,0x0000,0x01a6 0692 00cb 07d8 | | .DEBUG 0x00cb,0x07d8,0x0002,0x0000,0x0058,0x78f5,0x0000,0x001d 069a 00db 07dc | | .DEBUG 0x00db,0x07dc,0x0002,0x0000,0x0058,0x78f5,0x0000,0x0034 06a2 00eb 07e0 | | .DEBUG 0x00eb,0x07e0,0x0001,0x0000,0x0058,0x78f5,0x0000,0x004b 06aa 0123 07ec | # | .DEBUG 0x0123,0x07ec,0x4000,0x0000,0x0058,0x78d5,0x0000,0x013f 06b2 012c 07f6 | , | .DEBUG 0x012c,0x07f6,0x4000,0x0000,0x0058,0x78f5,0x0000,0x049c 06ba 014b 0806 | K | .DEBUG 0x014b,0x0806,0x1001,0x0000,0x0058,0x78d5,0x0000,0x014e 06c2 01a3 0824 | $| .DEBUG 0x01a3,0x0824,0x1001,0x0000,0x0058,0x78d5,0x0000,0x015a 06ca 01e3 0838 | 8| .DEBUG 0x01e3,0x0838,0x1002,0x0000,0x0058,0x78d5,0x0000,0x016a 06d2 020b 0846 | F| .DEBUG 0x020b,0x0846,0x3801,0x0002,0x0058,0x78d5,0x0000,0x0177 06da 0263 0862 | c b| .DEBUG 0x0263,0x0862,0x1002,0x0000,0x0058,0x78f5,0x0000,0x049d 06e2 02b3 0878 | x| .DEBUG 0x02b3,0x0878,0x1001,0x0000,0x0058,0x78f5,0x0000,0x0521 06ea 02e3 0886 | | .DEBUG 0x02e3,0x0886,0x1001,0x0000,0x0058,0x78f5,0x0000,0x06af 06f2 030b 0896 | | .DEBUG 0x030b,0x0896,0x1801,0x0002,0x0058,0x78f5,0x0000,0x0750 06fa 0343 089c | C | .DEBUG 0x0343,0x089c,0x0000,0x0000,0x0058,0x78d5,0x0000,0x0072 0702 036f 08b8 | o | .DEBUG 0x036f,0x08b8,0x0000,0x0000,0x0058,0x78f5,0x0000,0x00b7 070a 0393 08d8 | | .DEBUG 0x0393,0x08d8,0x0002,0x0000,0x0058,0x78d5,0x0000,0x0073 0712 03db 08e6 | | .DEBUG 0x03db,0x08e6,0x0002,0x0000,0x0058,0x78d5,0x0000,0x0078 071a 03eb 08ea | | .DEBUG 0x03eb,0x08ea,0x0002,0x0000,0x0058,0x78d5,0x0000,0x0081 0722 03fb 08f2 | | .DEBUG 0x03fb,0x08f2,0x0002,0x0000,0x0058,0x78d5,0x0000,0x008a 072a 041b 08fc | | .DEBUG 0x041b,0x08fc,0x0001,0x0000,0x0058,0x78d5,0x0000,0x0093 0732 045b 0910 | [ | .DEBUG 0x045b,0x0910,0x0002,0x0000,0x0058,0x78d5,0x0000,0x00a0 073a 046b 0914 | k | .DEBUG 0x046b,0x0914,0x0001,0x0000,0x0058,0x78d5,0x0000,0x00a9 0742 0483 091c | | .DEBUG 0x0483,0x091c,0x0005,0x0000,0x0058,0x78d5,0x0000,0x00b5 074a 049b 091e | | .DEBUG 0x049b,0x091e,0x0005,0x0000,0x0058,0x78d5,0x0000,0x00c5 0752 04cb 0920 | | .DEBUG 0x04cb,0x0920,0x0002,0x0000,0x0058,0x78d5,0x0000,0x00df 075a 0553 0940 | S @| .DEBUG 0x0553,0x0940,0x0001,0x0000,0x0058,0x78d5,0x0000,0x00ec 0762 0573 094c | s L| .DEBUG 0x0573,0x094c,0x0001,0x0000,0x0058,0x78d5,0x0000,0x0100 076a 05e3 0968 | h| .DEBUG 0x05e3,0x0968,0x0002,0x0000,0x0058,0x78f5,0x0000,0x00b8 0772 05f3 096e | n| .DEBUG 0x05f3,0x096e,0x0002,0x0000,0x0058,0x78f5,0x0000,0x00da 077a 0603 0978 | x| .DEBUG 0x0603,0x0978,0x0002,0x0000,0x0058,0x78f5,0x0000,0x0101 0782 0613 0982 | | .DEBUG 0x0613,0x0982,0x0002,0x0000,0x0058,0x78f5,0x0000,0x012d 078a 0633 098c | 3 | .DEBUG 0x0633,0x098c,0x0001,0x0000,0x0058,0x78f5,0x0000,0x015a 0792 ; -------------------------------------------------------------------------------------- 0792 ; Debug3 Subtable 0x0 0792 ; -------------------------------------------------------------------------------------- 0792 0014 0000 | | .DBG3TAB 0x0014,0x0000 0794 000b ffff | | .CONST 0x000b,0xffff 0796 000b fffe | | .CONST 0x000b,0xfffe 0798 000b fffd | | .CONST 0x000b,0xfffd 079a 000b fffc | | .CONST 0x000b,0xfffc 079c 000d fffb | | .CONST 0x000d,0xfffb 079e 000e fffa | | .CONST 0x000e,0xfffa 07a0 0010 fff9 | | .CONST 0x0010,0xfff9 07a2 0012 fff8 | | .CONST 0x0012,0xfff8 07a4 0017 fff7 | | .CONST 0x0017,0xfff7 07a6 0020 fff6 | | .CONST 0x0020,0xfff6 07a8 0029 fff5 | ) | .CONST 0x0029,0xfff5 07aa 002b fff4 | + | .CONST 0x002b,0xfff4 07ac 002d fff3 | - | .CONST 0x002d,0xfff3 07ae 002f fff2 | / | .CONST 0x002f,0xfff2 07b0 0031 fff1 | 1 | .CONST 0x0031,0xfff1 07b2 0036 fff0 | 6 | .CONST 0x0036,0xfff0 07b4 003c ffef | < | .CONST 0x003c,0xffef 07b6 0048 ffee | H | .CONST 0x0048,0xffee 07b8 004c ffed | L | .CONST 0x004c,0xffed 07ba 0054 ffec | T | .CONST 0x0054,0xffec 07bc ; -------------------------------------------------------------------------------------- 07bc ; Debug3 Subtable 0x1 07bc ; -------------------------------------------------------------------------------------- 07bc 0008 0000 | | .DBG3TAB 0x0008,0x0000 07be 0065 ffff | e | .CONST 0x0065,0xffff 07c0 0065 fffe | e | .CONST 0x0065,0xfffe 07c2 0067 fffd | g | .CONST 0x0067,0xfffd 07c4 0069 fffc | i | .CONST 0x0069,0xfffc 07c6 006b fffb | k | .CONST 0x006b,0xfffb 07c8 006d fffa | m | .CONST 0x006d,0xfffa 07ca 006f fff9 | o | .CONST 0x006f,0xfff9 07cc 0080 fff8 | | .CONST 0x0080,0xfff8 07ce ; -------------------------------------------------------------------------------------- 07ce ; Debug3 Subtable 0x2 07ce ; -------------------------------------------------------------------------------------- 07ce 0000 0001 | | .DBG3TAB 0x0000,0x0001 07d0 0093 0001 | | .CONST 0x0093,0x0001 07d2 ; -------------------------------------------------------------------------------------- 07d2 ; Debug3 Subtable 0x3 07d2 ; -------------------------------------------------------------------------------------- 07d2 0000 0001 | | .DBG3TAB 0x0000,0x0001 07d4 00a3 0001 | | .CONST 0x00a3,0x0001 07d6 ; -------------------------------------------------------------------------------------- 07d6 ; Debug3 Subtable 0x4 07d6 ; -------------------------------------------------------------------------------------- 07d6 0000 0000 | | .DBG3TAB 0x0000,0x0000 07d8 ; -------------------------------------------------------------------------------------- 07d8 ; Debug3 Subtable 0x5 07d8 ; -------------------------------------------------------------------------------------- 07d8 0000 0001 | | .DBG3TAB 0x0000,0x0001 07da 00cb 0001 | | .CONST 0x00cb,0x0001 07dc ; -------------------------------------------------------------------------------------- 07dc ; Debug3 Subtable 0x6 07dc ; -------------------------------------------------------------------------------------- 07dc 0000 0001 | | .DBG3TAB 0x0000,0x0001 07de 00db 0001 | | .CONST 0x00db,0x0001 07e0 ; -------------------------------------------------------------------------------------- 07e0 ; Debug3 Subtable 0x7 07e0 ; -------------------------------------------------------------------------------------- 07e0 0000 0005 | | .DBG3TAB 0x0000,0x0005 07e2 00eb 0001 | | .CONST 0x00eb,0x0001 07e4 00fb 0003 | | .CONST 0x00fb,0x0003 07e6 00fd 0004 | | .CONST 0x00fd,0x0004 07e8 00ff 0005 | | .CONST 0x00ff,0x0005 07ea 0101 0006 | | .CONST 0x0101,0x0006 07ec ; -------------------------------------------------------------------------------------- 07ec ; Debug3 Subtable 0x8 07ec ; -------------------------------------------------------------------------------------- 07ec 0004 0000 | | .DBG3TAB 0x0004,0x0000 07ee 0123 ffff | # | .CONST 0x0123,0xffff 07f0 0125 fffe | % | .CONST 0x0125,0xfffe 07f2 0127 fffd | ' | .CONST 0x0127,0xfffd 07f4 0129 fffc | ) | .CONST 0x0129,0xfffc 07f6 ; -------------------------------------------------------------------------------------- 07f6 ; Debug3 Subtable 0x9 07f6 ; -------------------------------------------------------------------------------------- 07f6 0007 0000 | | .DBG3TAB 0x0007,0x0000 07f8 012c ffff | , | .CONST 0x012c,0xffff 07fa 012e fffe | . | .CONST 0x012e,0xfffe 07fc 0130 fffd | 0 | .CONST 0x0130,0xfffd 07fe 0138 fffc | 8 | .CONST 0x0138,0xfffc 0800 013a fffb | : | .CONST 0x013a,0xfffb 0802 013c fffa | < | .CONST 0x013c,0xfffa 0804 013e fff9 | > | .CONST 0x013e,0xfff9 0806 ; -------------------------------------------------------------------------------------- 0806 ; Debug3 Subtable 0xa 0806 ; -------------------------------------------------------------------------------------- 0806 0004 000a | | .DBG3TAB 0x0004,0x000a 0808 014b ffff | K | .CONST 0x014b,0xffff 080a 0150 fffe | P | .CONST 0x0150,0xfffe 080c 0152 fffd | R | .CONST 0x0152,0xfffd 080e 0155 fffc | U | .CONST 0x0155,0xfffc 0810 0157 0001 | W | .CONST 0x0157,0x0001 0812 016a 0002 | j | .CONST 0x016a,0x0002 0814 016c 0003 | l | .CONST 0x016c,0x0003 0816 017a 0004 | z | .CONST 0x017a,0x0004 0818 0180 0005 | | .CONST 0x0180,0x0005 081a 0183 0006 | | .CONST 0x0183,0x0006 081c 0186 0007 | | .CONST 0x0186,0x0007 081e 018e 0008 | | .CONST 0x018e,0x0008 0820 0190 0009 | | .CONST 0x0190,0x0009 0822 0198 000a | | .CONST 0x0198,0x000a 0824 ; -------------------------------------------------------------------------------------- 0824 ; Debug3 Subtable 0xb 0824 ; -------------------------------------------------------------------------------------- 0824 0003 0006 | | .DBG3TAB 0x0003,0x0006 0826 01a3 ffff | | .CONST 0x01a3,0xffff 0828 01a8 fffe | | .CONST 0x01a8,0xfffe 082a 01ad fffd | | .CONST 0x01ad,0xfffd 082c 01b2 0001 | | .CONST 0x01b2,0x0001 082e 01b7 0002 | | .CONST 0x01b7,0x0002 0830 01ba 0003 | | .CONST 0x01ba,0x0003 0832 01c7 0004 | | .CONST 0x01c7,0x0004 0834 01ca 0005 | | .CONST 0x01ca,0x0005 0836 01d7 0006 | | .CONST 0x01d7,0x0006 0838 ; -------------------------------------------------------------------------------------- 0838 ; Debug3 Subtable 0xc 0838 ; -------------------------------------------------------------------------------------- 0838 0004 0002 | | .DBG3TAB 0x0004,0x0002 083a 01e3 ffff | | .CONST 0x01e3,0xffff 083c 01ea fffe | | .CONST 0x01ea,0xfffe 083e 01ec fffd | | .CONST 0x01ec,0xfffd 0840 01ee fffc | | .CONST 0x01ee,0xfffc 0842 01f7 0001 | | .CONST 0x01f7,0x0001 0844 0205 0002 | | .CONST 0x0205,0x0002 0846 ; -------------------------------------------------------------------------------------- 0846 ; Debug3 Subtable 0xd 0846 ; -------------------------------------------------------------------------------------- 0846 0006 0007 | | .DBG3TAB 0x0006,0x0007 0848 020b ffff | | .CONST 0x020b,0xffff 084a 0210 fffe | | .CONST 0x0210,0xfffe 084c 0212 fffd | | .CONST 0x0212,0xfffd 084e 0214 fffc | | .CONST 0x0214,0xfffc 0850 0214 fffb | | .CONST 0x0214,0xfffb 0852 0216 fffa | | .CONST 0x0216,0xfffa 0854 021f 0001 | | .CONST 0x021f,0x0001 0856 0232 0002 | 2 | .CONST 0x0232,0x0002 0858 0234 0003 | 4 | .CONST 0x0234,0x0003 085a 0244 0004 | D | .CONST 0x0244,0x0004 085c 024c 0005 | L | .CONST 0x024c,0x0005 085e 0252 0006 | R | .CONST 0x0252,0x0006 0860 025a 0007 | Z | .CONST 0x025a,0x0007 0862 ; -------------------------------------------------------------------------------------- 0862 ; Debug3 Subtable 0xe 0862 ; -------------------------------------------------------------------------------------- 0862 0003 0007 | | .DBG3TAB 0x0003,0x0007 0864 0263 ffff | c | .CONST 0x0263,0xffff 0866 0268 fffe | h | .CONST 0x0268,0xfffe 0868 0270 fffd | p | .CONST 0x0270,0xfffd 086a 027b 0001 | { | .CONST 0x027b,0x0001 086c 027f 0002 | | .CONST 0x027f,0x0002 086e 0287 0003 | | .CONST 0x0287,0x0003 0870 0290 0004 | | .CONST 0x0290,0x0004 0872 0294 0005 | | .CONST 0x0294,0x0005 0874 0297 0006 | | .CONST 0x0297,0x0006 0876 02ab 0007 | | .CONST 0x02ab,0x0007 0878 ; -------------------------------------------------------------------------------------- 0878 ; Debug3 Subtable 0xf 0878 ; -------------------------------------------------------------------------------------- 0878 0002 0004 | | .DBG3TAB 0x0002,0x0004 087a 02b3 ffff | | .CONST 0x02b3,0xffff 087c 02b8 fffe | | .CONST 0x02b8,0xfffe 087e 02bb 0001 | | .CONST 0x02bb,0x0001 0880 02bf 0002 | | .CONST 0x02bf,0x0002 0882 02c1 0003 | | .CONST 0x02c1,0x0003 0884 02c5 0004 | | .CONST 0x02c5,0x0004 0886 ; -------------------------------------------------------------------------------------- 0886 ; Debug3 Subtable 0x10 0886 ; -------------------------------------------------------------------------------------- 0886 0000 0007 | | .DBG3TAB 0x0000,0x0007 0888 02e3 0001 | | .CONST 0x02e3,0x0001 088a 02e5 0002 | | .CONST 0x02e5,0x0002 088c 02ec 0003 | | .CONST 0x02ec,0x0003 088e 02ed 0004 | | .CONST 0x02ed,0x0004 0890 02fe 0005 | | .CONST 0x02fe,0x0005 0892 0302 0006 | | .CONST 0x0302,0x0006 0894 0305 0007 | | .CONST 0x0305,0x0007 0896 ; -------------------------------------------------------------------------------------- 0896 ; Debug3 Subtable 0x11 0896 ; -------------------------------------------------------------------------------------- 0896 0001 0001 | | .DBG3TAB 0x0001,0x0001 0898 030b ffff | | .CONST 0x030b,0xffff 089a 0314 0001 | | .CONST 0x0314,0x0001 089c ; -------------------------------------------------------------------------------------- 089c ; Debug3 Subtable 0x12 089c ; -------------------------------------------------------------------------------------- 089c 000d 0000 | | .DBG3TAB 0x000d,0x0000 089e 0343 ffff | C | .CONST 0x0343,0xffff 08a0 0345 fffe | E | .CONST 0x0345,0xfffe 08a2 0347 fffd | G | .CONST 0x0347,0xfffd 08a4 0349 fffc | I | .CONST 0x0349,0xfffc 08a6 034b fffb | K | .CONST 0x034b,0xfffb 08a8 034d fffa | M | .CONST 0x034d,0xfffa 08aa 034f fff9 | O | .CONST 0x034f,0xfff9 08ac 0351 fff8 | Q | .CONST 0x0351,0xfff8 08ae 0356 fff7 | V | .CONST 0x0356,0xfff7 08b0 035c fff6 | \ | .CONST 0x035c,0xfff6 08b2 0368 fff5 | h | .CONST 0x0368,0xfff5 08b4 036a fff4 | j | .CONST 0x036a,0xfff4 08b6 036c fff3 | l | .CONST 0x036c,0xfff3 08b8 ; -------------------------------------------------------------------------------------- 08b8 ; Debug3 Subtable 0x13 08b8 ; -------------------------------------------------------------------------------------- 08b8 000f 0000 | | .DBG3TAB 0x000f,0x0000 08ba 036f ffff | o | .CONST 0x036f,0xffff 08bc 0371 fffe | q | .CONST 0x0371,0xfffe 08be 0373 fffd | s | .CONST 0x0373,0xfffd 08c0 0375 fffc | u | .CONST 0x0375,0xfffc 08c2 0377 fffb | w | .CONST 0x0377,0xfffb 08c4 0379 fffa | y | .CONST 0x0379,0xfffa 08c6 037b fff9 | { | .CONST 0x037b,0xfff9 08c8 037d fff8 | } | .CONST 0x037d,0xfff8 08ca 037f fff7 | | .CONST 0x037f,0xfff7 08cc 0381 fff6 | | .CONST 0x0381,0xfff6 08ce 0383 fff5 | | .CONST 0x0383,0xfff5 08d0 0385 fff4 | | .CONST 0x0385,0xfff4 08d2 0387 fff3 | | .CONST 0x0387,0xfff3 08d4 0389 fff2 | | .CONST 0x0389,0xfff2 08d6 038b fff1 | | .CONST 0x038b,0xfff1 08d8 ; -------------------------------------------------------------------------------------- 08d8 ; Debug3 Subtable 0x14 08d8 ; -------------------------------------------------------------------------------------- 08d8 0001 0005 | | .DBG3TAB 0x0001,0x0005 08da 0393 ffff | | .CONST 0x0393,0xffff 08dc 039c 0001 | | .CONST 0x039c,0x0001 08de 039d 0401 | | .CONST 0x039d,0x0401 08e0 03c3 0001 | | .CONST 0x03c3,0x0001 08e2 03c5 0002 | | .CONST 0x03c5,0x0002 08e4 03c8 0003 | | .CONST 0x03c8,0x0003 08e6 ; -------------------------------------------------------------------------------------- 08e6 ; Debug3 Subtable 0x15 08e6 ; -------------------------------------------------------------------------------------- 08e6 0000 0001 | | .DBG3TAB 0x0000,0x0001 08e8 03db 0001 | | .CONST 0x03db,0x0001 08ea ; -------------------------------------------------------------------------------------- 08ea ; Debug3 Subtable 0x16 08ea ; -------------------------------------------------------------------------------------- 08ea 0000 0003 | | .DBG3TAB 0x0000,0x0003 08ec 03eb 0001 | | .CONST 0x03eb,0x0001 08ee 03ef 0002 | | .CONST 0x03ef,0x0002 08f0 03f4 0003 | | .CONST 0x03f4,0x0003 08f2 ; -------------------------------------------------------------------------------------- 08f2 ; Debug3 Subtable 0x17 08f2 ; -------------------------------------------------------------------------------------- 08f2 0001 0003 | | .DBG3TAB 0x0001,0x0003 08f4 03fb ffff | | .CONST 0x03fb,0xffff 08f6 0404 0001 | | .CONST 0x0404,0x0001 08f8 040a 0002 | | .CONST 0x040a,0x0002 08fa 040e 0003 | | .CONST 0x040e,0x0003 08fc ; -------------------------------------------------------------------------------------- 08fc ; Debug3 Subtable 0x18 08fc ; -------------------------------------------------------------------------------------- 08fc 0003 0006 | | .DBG3TAB 0x0003,0x0006 08fe 041b ffff | | .CONST 0x041b,0xffff 0900 0421 fffe | ! | .CONST 0x0421,0xfffe 0902 0428 fffd | ( | .CONST 0x0428,0xfffd 0904 042d 0001 | - | .CONST 0x042d,0x0001 0906 043d 0002 | = | .CONST 0x043d,0x0002 0908 0441 0003 | A | .CONST 0x0441,0x0003 090a 0445 0004 | E | .CONST 0x0445,0x0004 090c 044a 0005 | J | .CONST 0x044a,0x0005 090e 044e 0006 | N | .CONST 0x044e,0x0006 0910 ; -------------------------------------------------------------------------------------- 0910 ; Debug3 Subtable 0x19 0910 ; -------------------------------------------------------------------------------------- 0910 0000 0001 | | .DBG3TAB 0x0000,0x0001 0912 045b 0001 | [ | .CONST 0x045b,0x0001 0914 ; -------------------------------------------------------------------------------------- 0914 ; Debug3 Subtable 0x1a 0914 ; -------------------------------------------------------------------------------------- 0914 0001 0002 | | .DBG3TAB 0x0001,0x0002 0916 046b ffff | k | .CONST 0x046b,0xffff 0918 046d 0001 | m | .CONST 0x046d,0x0001 091a 047a 0002 | z | .CONST 0x047a,0x0002 091c ; -------------------------------------------------------------------------------------- 091c ; Debug3 Subtable 0x1b 091c ; -------------------------------------------------------------------------------------- 091c 0000 0000 | | .DBG3TAB 0x0000,0x0000 091e ; -------------------------------------------------------------------------------------- 091e ; Debug3 Subtable 0x1c 091e ; -------------------------------------------------------------------------------------- 091e 0000 0000 | | .DBG3TAB 0x0000,0x0000 0920 ; -------------------------------------------------------------------------------------- 0920 ; Debug3 Subtable 0x1d 0920 ; -------------------------------------------------------------------------------------- 0920 0003 000c | | .DBG3TAB 0x0003,0x000c 0922 04cb 0001 | | .CONST 0x04cb,0x0001 0924 04cd 0002 | | .CONST 0x04cd,0x0002 0926 04d8 0003 | | .CONST 0x04d8,0x0003 0928 050c 0004 | | .CONST 0x050c,0x0004 092a 050d fbff | | .CONST 0x050d,0xfbff 092c 0521 fbfe | ! | .CONST 0x0521,0xfbfe 092e 0526 fbfd | & | .CONST 0x0526,0xfbfd 0930 0529 0401 | ) | .CONST 0x0529,0x0401 0932 052b 0402 | + | .CONST 0x052b,0x0402 0934 0531 0403 | 1 | .CONST 0x0531,0x0403 0936 0538 0404 | 8 | .CONST 0x0538,0x0404 0938 053a 0405 | : | .CONST 0x053a,0x0405 093a 053e 0005 | > | .CONST 0x053e,0x0005 093c 0545 0006 | E | .CONST 0x0545,0x0006 093e 0548 0007 | H | .CONST 0x0548,0x0007 0940 ; -------------------------------------------------------------------------------------- 0940 ; Debug3 Subtable 0x1e 0940 ; -------------------------------------------------------------------------------------- 0940 0002 0003 | | .DBG3TAB 0x0002,0x0003 0942 0553 ffff | S | .CONST 0x0553,0xffff 0944 055a fffe | Z | .CONST 0x055a,0xfffe 0946 055c 0001 | \ | .CONST 0x055c,0x0001 0948 0568 0002 | h | .CONST 0x0568,0x0002 094a 056a 0003 | j | .CONST 0x056a,0x0003 094c ; -------------------------------------------------------------------------------------- 094c ; Debug3 Subtable 0x1f 094c ; -------------------------------------------------------------------------------------- 094c 0005 0008 | | .DBG3TAB 0x0005,0x0008 094e 0573 ffff | s | .CONST 0x0573,0xffff 0950 057a fffe | z | .CONST 0x057a,0xfffe 0952 057c fffd | | | .CONST 0x057c,0xfffd 0954 0585 fffc | | .CONST 0x0585,0xfffc 0956 058b fffb | | .CONST 0x058b,0xfffb 0958 05a7 0001 | | .CONST 0x05a7,0x0001 095a 05ac 0002 | | .CONST 0x05ac,0x0002 095c 05b4 0003 | | .CONST 0x05b4,0x0003 095e 05ba 0004 | | .CONST 0x05ba,0x0004 0960 05c0 0005 | | .CONST 0x05c0,0x0005 0962 05c7 0006 | | .CONST 0x05c7,0x0006 0964 05d4 0007 | | .CONST 0x05d4,0x0007 0966 05d6 0008 | | .CONST 0x05d6,0x0008 0968 ; -------------------------------------------------------------------------------------- 0968 ; Debug3 Subtable 0x20 0968 ; -------------------------------------------------------------------------------------- 0968 0000 0002 | | .DBG3TAB 0x0000,0x0002 096a 05e3 0001 | | .CONST 0x05e3,0x0001 096c 05ec 0002 | | .CONST 0x05ec,0x0002 096e ; -------------------------------------------------------------------------------------- 096e ; Debug3 Subtable 0x21 096e ; -------------------------------------------------------------------------------------- 096e 0001 0003 | | .DBG3TAB 0x0001,0x0003 0970 05f3 ffff | | .CONST 0x05f3,0xffff 0972 05f7 0001 | | .CONST 0x05f7,0x0001 0974 05f9 0002 | | .CONST 0x05f9,0x0002 0976 05fc 0003 | | .CONST 0x05fc,0x0003 0978 ; -------------------------------------------------------------------------------------- 0978 ; Debug3 Subtable 0x22 0978 ; -------------------------------------------------------------------------------------- 0978 0000 0004 | | .DBG3TAB 0x0000,0x0004 097a 0603 0001 | | .CONST 0x0603,0x0001 097c 0609 0002 | | .CONST 0x0609,0x0002 097e 060b 0003 | | .CONST 0x060b,0x0003 0980 060d 0004 | | .CONST 0x060d,0x0004 0982 ; -------------------------------------------------------------------------------------- 0982 ; Debug3 Subtable 0x23 0982 ; -------------------------------------------------------------------------------------- 0982 0001 0003 | | .DBG3TAB 0x0001,0x0003 0984 0613 ffff | | .CONST 0x0613,0xffff 0986 0619 0001 | | .CONST 0x0619,0x0001 0988 061d 0002 | | .CONST 0x061d,0x0002 098a 0627 0003 | ' | .CONST 0x0627,0x0003 098c ; -------------------------------------------------------------------------------------- 098c ; Debug3 Subtable 0x24 098c ; -------------------------------------------------------------------------------------- 098c 0002 0004 | | .DBG3TAB 0x0002,0x0004 098e 0633 ffff | 3 | .CONST 0x0633,0xffff 0990 063d fffe | = | .CONST 0x063d,0xfffe 0992 063d 0001 | = | .CONST 0x063d,0x0001 0994 0646 0002 | F | .CONST 0x0646,0x0002 0996 0649 0003 | I | .CONST 0x0649,0x0003 0998 064f 0004 | O | .CONST 0x064f,0x0004 099a 0000 0000 | | .BLANK 0000[0x66]